Майте колоду ASCII


13

Ніколи насправді не було остаточного виклику ASCII-карт AFAIK. Отже, використовуючи таку колоду карт ASCII:

.------..------..------..------..------..------..------..------..------..------..------..------..------.
|2.--. ||3.--. ||4.--. ||5.--. ||6.--. ||7.--. ||8.--. ||9.--. ||T.--. ||J.--. ||Q.--. ||K.--. ||A.--. |
| (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) || (\/) |
| :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: |
| '--'2|| '--'3|| '--'4|| '--'5|| '--'6|| '--'7|| '--'8|| '--'9|| '--'T|| '--'J|| '--'Q|| '--'K|| '--'A|
'------''------''------''------''------''------''------''------''------''------''------''------''------'
.------..------..------..------..------..------..------..------..------..------..------..------..------.
|2.--. ||3.--. ||4.--. ||5.--. ||6.--. ||7.--. ||8.--. ||9.--. ||T.--. ||J.--. ||Q.--. ||K.--. ||A.--. |
| :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: |
| :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: || :\/: |
| '--'2|| '--'3|| '--'4|| '--'5|| '--'6|| '--'7|| '--'8|| '--'9|| '--'T|| '--'J|| '--'Q|| '--'K|| '--'A|
'------''------''------''------''------''------''------''------''------''------''------''------'
.------..------..------..------..------..------..------..------..------..------..------..------..------.
|2.--. ||3.--. ||4.--. ||5.--. ||6.--. ||7.--. ||8.--. ||9.--. ||T.--. ||J.--. ||Q.--. ||K.--. ||A.--. |
| :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: || :/\: |
| (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) || (__) |
| '--'2|| '--'3|| '--'4|| '--'5|| '--'6|| '--'7|| '--'8|| '--'9|| '--'T|| '--'J|| '--'Q|| '--'K|| '--'A|
'------''------''------''------''------''------''------''------''------''------''------''------''------'
.------..------..------..------..------..------..------..------..------..------..------..------..------.
|2.--. ||3.--. ||4.--. ||5.--. ||6.--. ||7.--. ||8.--. ||9.--. ||T.--. ||J.--. ||Q.--. ||K.--. ||A.--. |
| :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): || :(): |
| ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() || ()() |
| '--'2|| '--'3|| '--'4|| '--'5|| '--'6|| '--'7|| '--'8|| '--'9|| '--'T|| '--'J|| '--'Q|| '--'K|| '--'A|
'------''------''------''------''------''------''------''------''------''------''------''------''------'

Візьміть два цілих числа pі qяк вхідні дані; де pкількість гравців і qкількість карт, які отримує кожен гравець.

  • Випадково переміщати колоду карт (це неоднозначно, але означає, що всі карти повинні бути однаковою мірою, коли вони з’являться в будь-якому місці один раз).
  • Проведіть 1 раунд карт на гравця, виводячи qрядки pкарт у кожному рядку.

Правила:

  • Результати повинні бути рівномірно випадковими, кожна картка повинна бути однаковою мірою в будь-якому місці.
  • Це гарантовано, що у 0 < p*q <= 52 and p < 10вас можуть бути невизначені поведінки для сценаріїв, коли це не дотримано.
  • Ви повинні виводити qрядки карт з pкартками в ряд.
  • Кожен стовпчик повинен бути відокремлений | (трубопровід, оточений пробілами); якщо ви обираєте інший, ніж цей, поясніть, чому. Навколишні простори тут НЕ обов’язкові.
  • Кожен рядок повинен мати між собою 1 або більше нових рядків, більше одного допустимого, 0 - ні (1 новий рядок означає новий рядок за замовчуванням).
  • Кожен рядок має бути позначений гравцем, який володіє ним, у форматі "Player N" (0 або 1-індексований).
  • Жодна картка може з’являтися не один раз.
  • T є для Десяти.

Приклади:

Функція ( p=1,q=1):

Player 1 # Can also be 0.
.------.
|2.--. |
| (\/) |
| :\/: |
| '--'2|
'------'

Функція ( p=2,q=1):

Player 1 | Player 2 # Can also be "Player 0 | Player 1"
.------. | .------.
|2.--. | | |T.--. |
| (\/) | | | (\/) |
| :\/: | | | :\/: |
| '--'2| | | '--'T|
'------' | '------'

Функція ( p=2,q=2):

Player 1 | Player 2 # Can also be "Player 0 | Player 1"
.------. | .------.
|J.--. | | |3.--. |
| (\/) | | | :/\: |
| :\/: | | | :\/: |
| '--'J| | | '--'3|
'------' | '------'
.------. | .------.
|8.--. | | |6.--. |
| :(): | | | :/\: |
| ()() | | | (__) |
| '--'8| | | '--'6|
'------' | '------'

Художній кредит на шрифт на: http://patorjk.com/software/taag


5
Чи збираєтесь ви розміщувати багато викликів на картках із карт, які ви знайшли на сайті patorjk.com/software/taag ?

1
Soooo ... Чи можемо ми "використати" цей сайт для отримання результату ???
J42161217

1
Я маю на увазі: чи можу я зробити програму, яка виводить patorjk.com/software/taag/… це для вашого останнього тестового випадку?
J42161217

5
Крім того, Each row must have 1 or more newlines inbetween them, more than one is acceptable, 0 is not.... Але у ваших тестових випадках немає нових рядків між картками ..?
повністюлюдський

1
На картках ASCII був майже один виклик: час відтворення, розміщений мною.
серхіол

Відповіді:


6

Деревне вугілля , 142 133 125 байт

NθFN«F¬¬ι«→↑×⁶θ| »Player IιFθ«↙↓.↓⁴←'←⁶↑'↑⁴.P⁶↓≔‽⁵²εW№υε≔‽⁵²ε⊞υε≔§”w↘τ[⁵PkxτG”εδδ.--.¶✂”{➙aETê;s∨Hμ⁼⎚↑Z~SÀd~⌀Tê”﹪ε⁴φ⁴'--'δ↘

Спробуйте в Інтернеті! Посилання на багатослівну версію коду. Редагувати: Збережено 9 байт, покращивши мій код випадкової вибірки. Зберегли ще 8 байт, покращивши код друку мого костюма. Пояснення:

Nθ

Прочитайте кількість карт на q.

FN«

Переведіть петлю на кожного гравця.

F¬¬ι«→↑×⁶θ| »

Якщо це не перший гравець, надрукуйте вертикальну лінію між попереднім та цим програвачем.

Player Iι

Роздрукуйте номер програвача.

Fθ«

Петля над кожною карткою.

↙↓.↓⁴←'←⁶↑'↑⁴.P⁶↓

Надрукуйте краю картки.

≔‽⁵²εW№υε≔‽⁵²ε⊞υε

Виберіть індекс картки, який ще не був вибраний, і додайте його до списку вибраних індексів карт.

≔§”w↘τ[⁵PkxτG”εδδ

Виберіть та роздрукуйте ранг картки, циклічно індексуючи в рядок дійсних рангів картки ( 2-9, T, J, Q, K, A).

.--.¶

Роздрукуйте верх костюма.

✂”{➙aETê;s∨Hμ⁼⎚↑Z~SÀd~⌀Tê”﹪ε⁴φ⁴

Роздрукуйте середину костюма, нарізавши на рядок. Фрагмент починається з модуля 4 індексу картки і приймає кожен четвертий символ, поки рядок не закінчиться (або не fбуде досягнуто = 1000-го символу). Оскільки 4 і 13 є одночасними, це забезпечує можливість всіх 52 карт.

'--'δ↘

Надрукуйте нижню частину костюма та копію звання, а потім перейдіть до точки, яка зручно знаходиться не так вже й від копії чину, початку наступної картки або початку лінії розмежування для наступний гравець.


Коли я побачив це в пісочниці, було надрукувати кк надрукувати колоду, яка зайняла мені 102 байти: Спробуйте це в Інтернеті! Посилання на багатослівну версію коду.
Ніл

3

Python 2 , 357 байт

from random import*
p,q=input()
A,V=':/\:',':\/:'
c=sample([(""".------.
|%s.--. |
| %s |
| %s |
| '--'%s|
'------'"""%(n,s,t,n)).split('\n')for s,t in('(\/)',V),(A,V),(A,'(__)'),(':():','()()')for n in'123456789TJQKA'],p*q)
print' | '.join('Player '+`i`for i in range(p))
for i in range(0,p*q,p):print'\n'.join(map(' | '.join,zip(c[i:i+p][0],c[i:i+p][1])))

Спробуйте в Інтернеті!

Я не маю жодної ідеї.



3

JavaScript (ES6), 328 ... 312 байт

Здійснює введення в синтаксис currying (p)(q). Гравці 0-індексовані.

p=>g=(q,i=p*q*6,d=[...Array(52).keys(a=`:\\/:,(__),()(),(\\/),:/\\:,:():, | ,
,.3.,|0.--. |,| 1 |,| 2 |,| '--'0|,'3',Player 4`.split`,`)].sort(_=>Math.random()-.5))=>i--+p?g(q,i,d)+a[i%p?6:7]+a[i<0?14:i/p%6|8].replace(/\d/,c=>['TJQKA'[j=x>>2]||j-3,a['3454'[x&=3]],a[x%3],'------',p+i][c],x=d[i%p+p*(i/p/6|0)]):''

Демо

Як?

Це рекурсивна функція, будуючи вихід від низу до верху. Під час основної частини, в якій малюються картки, iініціалізується до p*q*6та зменшується, поки вона не досягне 0. Потім ми малюємо заголовок шляхом подальшого зменшення, iпоки він не досягне -p.

Мистецтво ASCII розділено на невеликі шматочки, що зберігаються в масиві a[]. У таблиці нижче описаний вміст a[], що полегшує розуміння решти коду.

 Index | Content    | Description
-------+------------+------------------------------------------------
    0  | ":\\/:"    | bottom of 'diamonds' and 'hearts'
    1  | "(__)"     | bottom of 'spades'
    2  | "()()"     | bottom of 'clubs'
    3  | "(\\/)"    | top of 'hearts'
    4  | ":/\\:"    | top of 'diamonds' and 'spades'
    5  | ":():"     | top of 'clubs'
    6  | " | "      | player separator
    7  | "\n"       | line-feed
    8  | ".3."      | card row #1, "3" --> "------"
    9  | "|0.--. |" | card row #2, "0" --> symbol of card value
   10  | "| 1 |"    | card row #3, "1" --> top of color ASCII art
   11  | "| 2 |"    | card row #4, "2" --> bottom of color ASCII art
   12  | "| '--'0|" | card row #5, "0" --> symbol of card value
   13  | "'3'"      | card row #6, "3" --> "------"
   14  | "Player 4" | header, "4" --> player ID

Відформатовано та прокоментовано

p => g = (                                // p = number of players
  q,                                      // q = number of cards
  i = p * q * 6,                          // i = counter
  d = [...Array(52).keys(                 // d = deck
    a = `:\\/:,(__),...`.split`,`         // a = ASCII art pieces (truncated, see above)
  )].sort(_ => Math.random() - .5)        // shuffle the deck
) =>                                      //
  i-- + p ?                               // if i is greater than -p:
    g(q, i, d) +                          //   do a recursive call and append ...
    a[i % p ? 6 : 7] +                    //   separator or line-feed
    a[i < 0 ? 14 : i / p % 6 | 8]         //   header or card row
    .replace(/\d/, c => [                 //   where digits are replaced with:
        'TJQKA'[j = x >> 2] || j - 3,     //     0: symbol of card value
        a['3454'[x &= 3]],                //     1: top of color ASCII art
        a[x % 3],                         //     2: bottom of color ASCII art
        '------',                         //     3: horizontal border
        p + i                             //     4: player ID
      ][c],                               //
      x = d[i % p + p * (i / p / 6 | 0)]  //   x = current card with: bits 0-1 = color
    )                                     //                          bits 2-5 = value
  :                                       // else:
    ''                                    //   stop recursion

2

Python 2 , 382 358 346 338 332 байт

from random import*
p,n=input()
d=zip([0,1,2,3]*13,'23456789TJQKA'*4)
shuffle(d)
C=""".------.
|%s.--. |
| %s |
| %s |
| '--'%s|
'------'"""
print' | '.join('Player '+`i`for i in range(p))
exec"for l in zip(*[(C%(v,'(:::\/(//\)\):::'[s::4],':((:\_)\/_(/:)):'[s::4],v)).split('\\n')for s,v in d[:p]]):print' | '.join(l)\nd=d[p:]\n"*n

Спробуйте в Інтернеті!


2

SOGL V0.12 , 106 байт

E⁽⁰⅜║(Ηe─t¦4»\$²‘8n{"1<ω⅛┘‘4n╬¡;4n33žASUjk"TJQKA”+{a;22žF75ž}}'#δ№{ψ⌡≤οc+C}c_.∫:"▓⅛▲ŗ‘Κ⁽e{≤+};H?;lƧ |Γ∙┼;┼

Спробуйте тут!

Генерація карт:

...‘                     push "(\/):\/::/\::\/::/\:(__):():()()" - the suits
    8n                   split to line lengths of 8 - individual suits
      {                  for each suit
       "...‘               push ".---| .-|   " - a quarter of a suit
            4n             split to line lengths of 4 - [".---", "| .-", "|   "]
              έ           quad palindromize - empty card
                ;          get the suit on top
                 4n        split to line lengths of 4
                   33ž     insert in the card at [3; 3]
                      A    save on variable A - card template
SU                         push "1234567890"
  jk                       remove the first and last digits
    "TJQKA”+               append "TJQKA"
            {         }    for each number - "23456789TJQKA"
             a               load the template
              ;22ž           at [2; 2] insert the current number
                  F75ž       at [7; 5] insert the current number

Перемішування:

'#             push 52
  δ            lower range - [0, 1, ..., 50, 51]
   №           reverse - [51, 50, ..., 1, 0]
    {       }  for each, pushing the current item
     ψ           get a random number from 0 to ToS (inclusive)
      ⌡          that many times
       ≤           put the first item of the stack on the top
        οc+C     prepend that to the variable C, predefined with an empty array

Угода:

c_              push Cs contents on the stack - the stack is now a mess of cards
  .∫            repeat input times - each player - pushing the current player number
    :             duplicate the number
     "..‘         push "player "
         Κ        prepend "player " to the number
          ⁽       uppercase the 1st letter
           e{  }  repeat 2nd input times
             ≤      put the first stack item on the top
              +     append it to "Player X" vertically (making an array)
;                 get the other copy of the player number
 H?               if POP-1 (aka if it's not 1)
   ;                swap the top 2 items - the current collumn and all the previous ones (by then they've been joined together)
    l               get its (vertical) length
     Ƨ |            push " |"
        Γ           palindromize - [" | "]
         ∙          multiply " | " vertically that length times
          ┼         append it horizontally (to the previous collumns)
           ;┼       append the current collumn

2

Рубін, 262 байти

->p,q{a=[*0..51].shuffle
puts ["Player %d"]*p*(d=" | ")%[*1..p],(1..q*6).map{|i|(["'------'
.------.
|%X.--. |
| %s |
| %s |
| '--'%X|".split($/)[i%6]]*p*d%a[i/6*p,p].map{|j|["(\\/):()::/\\:"[u=j%4*4-4,4],":\\/:()():\\/:(__)"[u,4],j/4][i%3]}).tr("01BC","TJQK")}}

Важче дотримуватися, але коротше!

Рубін, 279 байт

->p,q{puts [*1..p].map{|k|"Player #{k}"}*" | "
a=[*0..51].shuffle
(q*6).times{|i|puts [".------.
|%s.--. |
| %s |
| %s |
| '--'%s|
'------'".split($/)[i%6]]*p*" | "%a[i/6*p,p].map{|j|[":\\/:()():\\/:(__)"[u=j%4*4-4,4],("%X"%(j/4)).tr("01BC","TJQK"),"(\\/):()::/\\:"[u,4]][i%3]}}}

Створює формат для кожного рядка, а потім використовує %оператор, як, sprintfщоб заповнити його.

Справа в тому, що значення картки відображається в кожному третьому ряду. Значення карт представлені у шістнадцятковій формі з цифрами, 01BCзаміненими на TJQK.

Збережено 4 байти з символів костюма, врахувавши, що вершина алмазів і лопат однакова, але додано 2 назад на -4кінці j%4*4-4коду костюмів - -4 0 4 або 8, де [-4,4]означає, що 4 символи починають четвертий останній символ у полі рядок.

Можливо, можливо, зберегти ще кілька байт. Необхідно повторити код для ідентифікацій гравця некрасиво.


2

PHP, 509 байт

<?$hu='(\/}';$hv=$dv=':\/:';$du=$su=':/\:';$sv='(__)';$cu=':():';$cv='()()';$q="------";$t=$argv[1];foreach([h,d,s,c]as$a)foreach([2,3,4,5,6,7,8,9,T,J,Q,K,A]as$b)$c[]=[$b,$a];shuffle($c);$h=$a=0;for(;$a<$t;$a++)$e[]="Player $a";$f[]=join(" | ",$e);for($g=$argv[2];$g--;){$p=$i=$k=$l=$m=$r=[];$j=$h+$t;for(;$h<$j;$h++){$n=$c[$h][0];$o=$c[$h][1];$p[]=".$q.";$i[]="|$n.--. |";$k[]="| ${$o.u} |";$l[]="| ${$o.v} |";$m[]="| '--'$n|";$r[]="'$q'";}foreach([p,i,k,l,m,r]as$b)$f[]=join(" | ",${$b});}echo join('
',$f);

Спробуйте в Інтернеті!

Це моя перша спроба кодового гольфу, тому його, мабуть, можна значно покращити. Я подумав, що треба десь починати. :)


1

Java (OpenJDK 8) , 784 835 843 826 815 781 775 байт

String k(String s){return s.replaceAll("...$","\n");}
p->q->{int c=0,l=0,s[]=new int[p*q],i=0,j,t,b;java.util.List e=new java.util.Stack();String v="TJQK",o="",n[]=new String[p*q],x=o;for(;i<p;o+="Player "+i+++" | ",x+=v);o=k(o);for(i=0;i<q;i++){o=k(o+x.replace(v,".------. | "));for(j=0;j<p;j++){do{t=(int)(Math.random()*13)+1;b=(int)(Math.random()*4);}while(e.contains(t+""+v.charAt(b)));e.add(t+""+v.charAt(b));s[c]=b;n[c]=t<2?"A":t<10?""+t:""+v.charAt(t-10);o+="|2.--. | | ".replace("2",n[c++]);}o=k(o);for(j=0;j<p;j++,l++)o+="| "+(s[l]<1?"(\\/)":s[l]<3?":/\\:":":():")+" | | ";o=k(o);for(j=0;j<p;j++)o+="| "+(s[i*p+j]<2?":\\/:":s[i*p+j]<3?"(__)":"()()")+" | | ";o=k(o);for(j=0;j<p;)o+="| '--'2| | ".replace("2",n[i*p+j++]);o=k(k(o)+x.replace(v,"'------' | "));}return o;}

Спробуйте в Інтернеті!

Чому потік, він відповідає специфікації


Крім того, вам слід створити альтернативні методи замість створення Function<String,String>: останній дуже і дуже затратний. Як при створенні, так і при використанні.
Олів'є Грегоар

Я припускаю, що нижченаведена відповідь була оригінальною помилковою відповіддю, але течія здається правильною, тому я намагався нейтралізувати її. Деякі невеликі речі для гольфу: круглі дужки можна видалити на n[c]=t<2?"A":t<10?""+t:""+"TJQK".charAt(t-10); for(j=0;j<p;j++){o+=...;l++;}може бути for(j=0;j<p;l++,j++)o+=...;; ви можете return o;замість System.out.print(o);, використовуючи секунду Functionзамість Consumer; ,y=p*qможна видалити, а ви можете використовувати p*qдва рази безпосередньо замість y. Немає сумнівів, що набагато більше гольфу, але я не
встигаю

1
@KevinCruijssen Власне, ні. Після першого редагування я прийняв рішення "не докладати зусиль у гольфі" за межі видалення пробілів та використання 1-char змінних імен. Я здогадуюсь, що Роберто Грехем повинен повністю перечитати поради щодо гольфу на Java . Справа в тому, що вона дійсно відповідає специфікації виклику, але не специфікації тегу код-гольф.
Олів'є Грегоар

Звідки я знаю, що можна продовжити гольф далі? Коли я відмовився, побачивши цю відповідь, у мене було близько 400 байтів, і я підрахував ще близько 50 байтів, щоб закінчити її. 450 байт проти 850, тут ледве не бере участь жоден гольф.
Олів'є Грегоар

s[l]<2?":/\\:":s[l]<3?":/\\:"може бути s[l]<3?":/\\:"і s[i*p+j]<1?":\\/:":s[i*p+j]<2?":\\/:"може бути s[i*p+j]<2?":\\/:". @ OlivierGrégoire І я знаю, що це, швидше за все, може бути майже вдвічі меншим, тому я розумію протилежний результат. Але це здебільшого брак досвіду, і справді, не читаючи всі поради кілька разів. Деякі речі у відповіді, які я робив і в минулому, і це не особливо легке завдання для Java. До речі, якщо у вас є відповідь на 400-450 байт, чому б тоді не опублікувати її як окрему відповідь (якщо вона суттєво відрізняється)? Ви отримали б мою нагороду. ;)
Кевін Круїссен

1

Пітон 3, 332 байт

from random import*
P=lambda x:print(*x,sep=' | ')
R=range
def f(p,c):
 P(f"Player {i}"for i in R(p))
 d=[f".------.,|{n}.--. |,| {a[:4]} |,| {a[4:]} |,| '--'{n}|,'------'".split(",")for a,n in sample([*zip(r':/\:(__) (\/):\/: :/\::\/: :():()()'.split()*13,'A23456789TJQK'*4)],p*c)]
 for i in R(c):
  for t in zip(*d[i::c]):
   P(t)
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.