Перевести RoboCritters на Brainf ***

15

RoboCritters ( этимология ) - это совершенно новый эзотерический язык программирования (не ищите его, я только что изобрел его). Это вариант из Brainfuck (BF), несколько более сложным , чем обычные схемы замещения оператора. Каждая программа в RoboCritters представляет собой прямоугольную сетку текста, которая содержит только семь символов . []/\|, а также новые строки для формирования сетки.

Пример программы RoboCritters:

|\/||./|[]||
[..][][]   |
|/\|[..][..]
[..]    \/\/

Чтобы перевести программу RoboCritters в BF, посмотрите на каждый не-символ новой строки в сетке в обычном порядке чтения (слева направо, затем сверху вниз), например |\/||./|[]||[..][][] ||/\|[..][..][..] \/\/.

Если раздел сетки 4 × 2, идущий вправо и вниз от текущего символа, точно соответствует одному из восьми перечисленных ниже критериев робота , добавьте соответствующую команду BF ( ><+-.,[]) к (изначально пустой) программе BF.

Если участок сетки 4 × 2 не соответствует ни одному из объектов-роботов или выходит за границы , в программу BF ничего не добавляется.

  1. Joybot, >команда:

    [..]
    \][/
    
  2. Calmbot, <команда:

    [..]
    /][\
    
  3. Squidbot, +команда:

    [..]
    //\\
    
  4. Spiderbot, -команда:

    [..]
    ||||
    
  5. Баннибот, .команда:

    [][]
    [..]
    
  6. Зубной бот, ,команда:

    [..]
    |/\|
    
  7. Foxbot, [команда:

    |\/|
    [..]
    
  8. Batbot, ]команда:

    [..]
    \/\/
    

Итак, читая пример программы

|\/||./|[]||
[..][][]   |
|/\|[..][..]
[..]    \/\/

мы можем видеть, что сначала мы сталкиваемся с Foxbot (в столбце 1, строка 1), затем с Toothbot (c1, r2), затем с Bunnybot (c5, r2) и, наконец, с Batbot (c9, r3). Это соответствует программе BF [,.].

Обратите внимание, что Foxbot и Toothbot перекрываются. Это намеренно; роботы-твари не интерпретируются по-разному, когда они перекрываются .

Вызов

Напишите самую короткую возможную программу, которая принимает программу RoboCritters и выводит ее эквивалент BF. Вам не нужно запускать BF или проверять его действительность, только перевод кода RoboCritters в код BF.

Детали

  • Все входные программы RoboCritters будут действительны, то есть они будут точно прямоугольным блоком текста, содержащим только семь символов . []/\|, плюс символы новой строки для его формирования. Новые строки могут быть в любом удобном общем представлении . При желании вы можете предположить, что программы имеют один завершающий перевод строки.

  • Вы должны поддерживать программы RoboCritters размером менее 4 × 2, включая пустую (или одну новую строку) программу 0 × 0. Все они соответствуют пустой программе BF (пустой строке).

  • Выходная программа BF должна представлять собой строку из одной строки, содержащую только восемь символов команды BF ><+-.,[]. При желании может быть один завершающий символ новой строки.

  • Возьмите ввод любым обычным способом (stdin / text file / command line) и выведите на stdout или ближайшую альтернативу вашего языка.

  • Вместо программы вы можете написать функцию, которая принимает программу RoboCritters как строку и печатает или возвращает строку программы BF.

Примеры

  1. Вход: (вариант примера выше)

    |\/|[][]
    [..][][]
    |/\|[..]
        \/\/
    

    Выход: [,.]

  2. Вход: (тестирует всех роботов-тварей)

    [..][[[[[..]]. ]|\/|
    \][/[..]//\\[..][..]
    [..]/][\[][]|/\|[..]
    ||||/\| [..]|  |\/\/
    

    Выход: >+[<,-.]

  3. Входные данные:

    [..] [..] [..] [..] [..] [..] [..] [..] |\/| [..] [..] [..] [..] [..] |\/| [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] [..] |\/| [..] [..] [..] [..] [..] [..] [..] [][] [..] [..] [..] [..] [][] [..] [..] [..] [..] [..] [..] [..] [][] [][] [..] [..] [..] [][] [..] [..] [][] [..] [..] [][] [..] [][] [..] [..] [..] [][] [..] [..] [..] [..] [..] [..] [][] [..] [..] [..] [..] [..] [..] [..] [..] [][] [..] [..] [..] [][] [..] [..] [..] [][]
    //\\ //\\ //\\ //\\ //\\ //\\ //\\ //\\ [..] \][/ //\\ //\\ //\\ //\\ [..] \][/ //\\ //\\ \][/ //\\ //\\ //\\ \][/ //\\ //\\ //\\ \][/ //\\ /][\ /][\ /][\ /][\ |||| \/\/ \][/ //\\ \][/ //\\ \][/ |||| \][/ \][/ //\\ [..] /][\ \/\/ /][\ |||| \/\/ \][/ \][/ [..] \][/ |||| |||| |||| [..] //\\ //\\ //\\ //\\ //\\ //\\ //\\ [..] [..] //\\ //\\ //\\ [..] \][/ \][/ [..] /][\ |||| [..] /][\ [..] //\\ //\\ //\\ [..] |||| |||| |||| |||| |||| |||| [..] |||| |||| |||| |||| |||| |||| |||| |||| [..] \][/ \][/ //\\ [..] \][/ //\\ //\\ [..]
    

    Вывод: (программа BF Hello World )

    ++++++++[>++++[>++>+++>+++>+<<<<-]>+>+>->>+[<]<-]>>.>---.+++++++..+++.>>.<-.<.+++.------.--------.>>+.>++.
    
  4. Вход: (нет роботов-тварей)

    /\\\[].
    ]..[..]
    \\//||\
    

    Выход: (пустая строка)

счет

Самая короткая подача в байтах побеждает. ( Удобный счетчик байтов. ) Tiebreaker имеет самый высокий пост.

Кальвин Хобби
источник

Ответы:

9

CJam, 86 85 байт

qN/S4*f+_W<\1>]z:z4few:~"¨Ý³5&ágûò{wÉ](Ý"296b6b"|[\.]/"f=2/4/"><+-.,[]":Ler{L&},

Проверьте это здесь.

объяснение

qN/    e# Read input and split into lines.
S4*f+  e# Append four spaces to each line. This has two purposes. a) We can later join all
       e# the lines together without worrying about critters appearing across the line
       e# edges because no critter contains spaces. b) It works around a bug in CJam where
       e# the command `ew` crashes when the substring length is longer than the string.
_W<    e# Copy the lines and discard the last one.
\1>    e# Swap with the other copy and discard the first one.
]z     e# Wrap both in an array and zip them up. Now we've got an array which contains
       e# all consecutive pairs of lines.
:z     e# Zip up each of those pairs, such it becomes an array of two-character strings.
       e# We can now find the critters as 4-element subarrays in each of those arrays.
4few   e# Turn each of those arrays into a list of its (overlapping) 4-element subarrays.
:~     e# Flatten those lists, such that we get one huge array of all 4x2 blocks, in order.
"gibberish"296b6b
       e# This is an encoded form of the critters. The above produces a string of the
       e# critters in column-major order, all joined together, where the characters are
       e# represented by numbers 0 to 5.
"|[\.]/"f=
       e# Turn each number into the correct character.
2/4/   e# Split first into columns, then into critters. Now all we need to do is find these
       e# the elements of this array in the processed input.
"><+-.,[]":L
       e# A string of all BF characters in the same order as the critters. Store this in L.
er     e# Do an element-wise replacement. This will leave non-critter blocks untouched.
{L&},  e# Filter the result. The elements are now either characters, or still full 4x2
       e# blocks. We take the set intersection with the array (string) of BF characters.
       e# If the current element is itself a character, it will be coerced into an array
       e# containing that character, such that we get a non-empty intersection. If the
       e# current element is a block instead, if contains arrays itself, so the set
       e# intersection will always be empty.

       e# The resulting array of characters is the desired BF program and will be printed
       e# automatically at the end of the program.

Твари были закодированы с помощью этого сценария . Я нашел базу 296 для кодирования с помощью следующего довольно наивного скрипта Mathematica (который все еще работает в поисках лучшей базы):

b = 256;
While[True,
  If[
    FreeQ[
      d = IntegerDigits[15177740418102340299431215985689972594497307279709, b], 
      x_ /; x > 255
    ], 
    Print@{b, Length@d}
  ];
  b += 1;
]
Мартин Эндер
источник
3

JavaScript ES6, 209 198 192 байта

f=c=>{s=''
b=o=>c.substr(o,4)||1
for(i in c)s+=!~(d='1\\][/1/][\\1//\\\\1||||[][]11|/\\||\\/|11\\/\\/'.replace(/1/g,'[..]').indexOf(b(i)+b(++i+c.search(`
`))))|d%8?'':'><+-.,[]'[d/8]
return s}

Приведенный ниже фрагмент стека содержит код без кода, который можно легко запустить в любом браузере.

var f = function(c) {
  var s = '';
  var b = function(o) {
    // If it is looking on the last line, this will return an empty string
    // the second time, which could cause an inaccurate match.
    // `||1` makes it return 1 instead of '', which won't match.
    return c.substr(o, 4) || 1;
  }
  for (var i in c) {
    r = b(i) + b(++i + c.search('\n'));
    d = '1\\][/1/][\\1//\\\\1||||[][]11|/\\||\\/|11\\/\\/'.replace(/1/g, '[..]').indexOf(r);
    s += !~d || d % 8 ? '' : '><+-.,[]' [d / 8];
  }
  return s;
}

// GUI code below
function run(){document.getElementById('s').innerHTML=f(document.getElementById('t').value);};document.getElementById('run').onclick=run;run()
<textarea id="t" cols="30" rows="10">
[..][[[[[..]]. ]|\/|
\][/[..]//\\[..][..]
[..]/][\[][]|/\|[..]
||||/\| [..]|  |\/\/</textarea><br /><button id="run">Run</button><br /><code id="s"></code>

NinjaBearMonkey
источник