Напечатайте эту доску с крестиками!


9

Вот доска для игры в крестики-нолики:

   a     b     c
      |     |     
1  -  |  -  |  -  
 _____|_____|_____
      |     |     
2  -  |  -  |  -  
 _____|_____|_____
      |     |     
3  -  |  -  |  -  
      |     |     

Учитывая набор ходов, распечатайте доску с жетонами.

Входные данные будут приниматься в виде ходов, разделенных пробелами, причем каждый ход будет:

  • Во-первых, токен, который собирается
  • Далее буква столбца, по которому он движется
  • Наконец, номер строки, по которой он движется

Обратите внимание, что нормальные правила крестики-нолики не имеют значения.

Также нет необходимости печатать буквы и цифры.

Например, ввод Ob2 Xc2 Ob3 Xa1приведет к

     |     |     
  X  |  -  |  -  
_____|_____|_____
     |     |     
  -  |  O  |  X  
_____|_____|_____
     |     |     
  -  |  O  |  -  
     |     |     

Помните, это Таким образом, код с наименьшим числом байтов выигрывает.

Leaderboards

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

Чтобы убедиться, что ваш ответ отображается, начните его с заголовка, используя следующий шаблон уценки:

# Language Name, N bytes

где Nразмер вашего представления. Если вы улучшите свой счет, вы можете сохранить старые результаты в заголовке, вычеркнув их. Например:

# Ruby, <s>104</s> <s>101</s> 96 bytes

Если вы хотите включить в заголовок несколько чисел (например, потому что ваш результат равен сумме двух файлов или вы хотите перечислить штрафы за флаг интерпретатора отдельно), убедитесь, что фактический результат является последним числом в заголовке:

# Perl, 43 + 2 (-p flag) = 45 bytes

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

# [><>](http://esolangs.org/wiki/Fish), 121 bytes


При написании задач следует избегать громоздких форматов ввода / вывода . Пожалуйста, сделайте ваш формат ввода достаточно гибким. В следующий раз попробуй Песочницу .
Эрик Outgolfer

1
@EriktheGolfer громоздко? Этот формат ввода прост и очевиден
edc65

@ edc65 Я имел в виду, что я хочу получать информацию в любом формате, не только в этом, но я думаю, что уже поздно. Я думаю, вы имеете в виду, что это визуально ясно, но я не мог справиться с этим вообще. Почему пробелы, а не какой-то другой разделитель, например?
Эрик Outgolfer

1
@EriktheGolfer не поймите меня неправильно, но если ваш супер-сверхэзотерический язык не может обрабатывать пробелы, очень плохо ... вам придется использовать что-то еще только в этот раз.
edc65

1
@ edc65 Например, в Sesos было бы довольно сложно даже загрузить входные данные. Я бы предпочел список целых чисел (три целых числа за один ход), например, 1 2 3для Xb3(не обязательно должен быть именно такой).
Эрик Outgolfer

Ответы:


7

JavaScript (ES6), 136 133 129 байт

let f =

i=>eval("for(y=9,s='';y--;s+=`\n`)for(x=18;--x;)s+=x%6-3|y%3-1?' __|'[x%6?y/3:3]||' ':i[i.search('cba'[x/6|0]+(10-y)/3)-1]||'-'")

console.log(f("Ob2 Xc2 Ob3 Xa1"))


5

Python (2.7), 188 180 байт

def f(s):a,b=3*[' '*5],3*['_'*5];c,d,e=[['  '+dict((m[1:],m[0])for m in s.split(' ')).get(x+y,'-')+'  'for x in'abc']for y in'123'];print'\n'.join(map('|'.join,[a,c,b,a,d,b,a,e,a]))

В третьей строке вы можете удалить пробелы перед 'с
Даниил

Добро пожаловать в гольф на питоне! Взгляните на советы по игре в гольф Python . Вы можете разделить операторы, ;позволив поместить весь код в одну строку, чтобы сэкономить на отступе.
xnor

for y in '123'-> for y in'123'. Кроме того, что сказал xnor: вы можете сделать свою функцию однострочной, используя ;для разделения операторов. Используя все эти советы по игре в гольф, вы можете играть в гольф 6 байтов.
Эрик Outgolfer

4

Python 2, 112 байт

s=input()+'- '
r=3;exec"print'|'.join([' '*5,'  %s  '%s[s.find(c+`r/3`)-1],'_'*5][r%11%3]for c in'abc');r+=1;"*9

Девять строк печатаются в соответствии с индексами строк r. Индекс строки отсчитывается от 3до 11в execцикле. Каждая строка состоит из вертикальных линий, |соединяющих три 5-символьных сегмента, которые чередуются между:

  • Пять мест
  • Два пробела, символ игрока, затем два пробела
  • Пять подчеркиваний

Тип сделан с циклом r%3, за исключением того, что в последней строке есть пробелы, а не подчеркивания, достигнутые с помощью r%11%3.

Чтобы найти символ игрока для текущей ячейки, мы смотрим на номер строки r/3и букву столбца cиз "abc". Мы объединяем их для создания двухсимвольной строки b3, находим ее индекс во входной строке, а затем принимаем символ ( Xили O) на один индекс раньше. Если ни один из игроков не сыграл там, по findумолчанию будет установлено значение -1, которое уменьшается до -2. Мы взламывать s[-2]быть -, присоединяя два символа , когда мы берем вход.


1

PHP, 187 байт

<?for(;$i++<162;)$s.=$i%18?($i%6?($i<144&&$i%54>36?"_":($i<144&&$i%54>18&&$i%6==3?"-":" ")):"|"):"\n";foreach(explode(" ",$_GET[a])as$t)$s[20+6*(1+($t[1]<=>b))+54*($t[2]-1)]=$t[0];echo$s;

Принимает ввод как строку. Если бы я мог использовать массив, его можно уменьшить $_GET[a]вместоexplode(" ",$_GET[a])

207 байт

<?foreach(explode(" ",$_GET[a])as$t)$a[(1+($t[1]<=>b))+3*($t[2]-1)]=$t[0];for(;$i++<162;)$s.=$i%18?($i%6?($i<144&&$i%54>36?"_":" "):"|"):"\n";for(;$x<9;)$s[18+54*(($x/3)^0)+2+6*($x%3)]=$a[+$x++]??"-";echo$s;

Самая простая идея для создания этого 194 байта

<?for(;++$i<10;)$s.=($i==9||$i%3?($i%3==2?"  -  |  -  |  -  ":"     |     |     "):"_____|_____|_____")."\n";foreach(explode(" ",$_GET[a])as$t)$s[20+6*(1+($t[1]<=>b))+54*($t[2]-1)]=$t[0];echo$s;

1

Mathematica, 205 байтов

StringReplacePart[a="     |     |     
";b="  -  |  -  |  -  
";c="_____|_____|_____
";{a,b,c,a,b,c,a,b,a}<>"",##]&@@Transpose[{#,{#,#}&[54LetterNumber@#2+6FromDigits@#3-39]}&@@@Characters/@StringSplit@#]&

Это было бы намного короче, если бы я мог использовать встроенный ... (92 байта)

Grid@SparseArray[{LetterNumber@#2,FromDigits@#3}->#&@@@Characters/@StringSplit@#,{3,3},"-"]&

1

Java, 138 байт

Редактировать:

  • -2 байта выкл. Спасибо @Kevin Kruijssen

Snipet:

m->{char[][]o=new char[3][3];for(char[]a:m)o[a[1]-'a'][a[2]-'0']=a[0];for(char[]a:o)System.out.println(a[0]+'|'+a[1]+'|'+a[2]+"\n-----");}

Код:

public static void tictactoe(char[][]moves){
  char[][]o=new char[3][3];
  for(char[]a:moves){
    o[a[1]-79][a[2]-48]=a[0];
  }
  for(char[]a:o){
    System.out.println(a[0]+'|'+a[1]+'|'+a[2]+"\n-----");
  }
}

o[a[1]-'a'][a[2]-'0']=a[0]можно сыграть в гольф на два байта доo[a[1]-97][a[2]-48]=a[0]
Кевин Круйссен

но если неправильный вывод, не так ли?
Норганос

Какую ошибку вы имеете в виду?
Роман Грэф

Формат вывода не совпадает с запросом OP.
сешумара

1

Пакет, 341 339 305 287 байт

@for %%a in (a1 a2 a3 b1 b2 b3 c1 c2 c3)do @set %%a=-
@for %%a in (%*)do @set s=%%a&call call set %%s:~1%%=%%s:~0,1%%
@set s="     |     |     "
@for %%l in (%s% "  %a1%  |  %b1%  |  %c1%" %s: =_% %s% "  %a2%  |  %b2%  |  %c2%" %s: =_% %s% "  %a3%  |  %b3%  |  %c3%" %s%)do @echo %%~l

Предполагает последовательный вывод. Редактировать: 2 байта сохранены путем удаления ненужных пробелов. Сохранено 34 байта путем записи вывода с использованием forцикла. Сохранено 18 байт за счет исключения подпрограммы.


0

Autovim , 110 байт (не конкурирует)

Тест вождения Autovim ... Это в значительной степени Vimscript ответ. Не конкурировать, потому что Autovim все еще разрабатывается.

ñ5i ␛a|␛ÿp3hr-phv0r_⌥v$kkyPPy2jPP$⌥vG$xGđkÿjp
…nsplit(@m)
ñğ0(@n[2]*3-2)j((char2nr(@n[1])-96)*6-4)lr(@n[0])
e…

Чтобы запустить это:

./bin/autovim run tictactoe.autovim -ni -@m "Ob2 Xc2 Ob3 Xa1"

Ungolfed:

execute "normal 5i \<esc>a|\<esc>yyp3hr-phv0r_\<c-v>$kkyPPy2jPP$\<c-v>G$xGddkyyjp"
for @n in split(@m)
execute "normal gg0".(@n[2]*3-2)."j".((char2nr(@n[1])-96)*6-4)."lr".(@n[0]).""
endfor

Объяснение, чтобы следовать, если есть интерес :)


0

Groovy, 174 байта

{s->def r=0,o,t=[:];s.split(' ').each{t[it[1..2]]=it[0]};9.times{y->o='';17.times{x->o+=x%6==5?'|':y in [2,5]?'_':x%6==2&&y%3==1?t['abc'[r++%3]+(y+2)/3]?:'-':' '};println o}}

ungolfed:

{s->
    def r=0, o, t=[:];
    s.split(' ').each{
        t[it[1..2]]=it[0]
    };
    9.times{y->
        o='';
        17.times{x->
            o+= x%6==5 ? '|' : y in [2,5]? '_' : x%6==2 && y%3==1 ? t['abc'[r++%3]+(y+2)/3]?:'-' : ' '
        };
        println o
    }
}

0

CJam, 62 байта

" -_ -_ - "_'-Ser_+_@\]3*sqS/{)~\)'a-F*@+3*G+\t}/9/5/'|9*a*zN*

Попробуйте онлайн

Объяснение:

" -_ -_ - "_'-Ser_+_@\]3*s e# Build a 135 character string representing the 
                           e# columns of the board (top to bottom, left to right)
qS/{)~\)'a-F*@+3*G+\t}/    e# Process the input, put the tokens (O,X) in the string
                           e# The tokens have to placed at indexes 
                           e# [19 22 25 64 67 70 109 112 115]
                           e# This is done with the formula 3*(15x+y)+16,
                           e# where x is the code point of the column letter 
                           e# (minus 'a') and y is the row number.
9/5/'|9*a*zN*              e# Split into its parts, add the column separators, zip 
                           e# and join with newlines.
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.