Rozdaj talię ASCII

13

Tak naprawdę nigdy nie było ostatecznego wyzwania dla kart ASCII AFAIK. Korzystając z następującej talii kart 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|
'------''------''------''------''------''------''------''------''------''------''------''------''------'

Weź dwie liczby całkowite pi qjako dane wejściowe; gdzie pjest liczba graczy i qliczba kart, które otrzymuje każdy gracz.

  • Losowo tasuj talię kart (jest to niejednoznaczne, ale oznacza, że ​​wszystkie karty muszą się jednakowo pojawić gdziekolwiek).
  • Rozdaj 1 rundę kart na gracza, wyprowadzając qrzędy pkart w każdym rzędzie.

Zasady:

  • Wyniki powinny być równomiernie losowe, każda karta powinna równie dobrze pojawić się w dowolnym miejscu.
  • Gwarantujemy 0 < p*q <= 52 and p < 10, że zachowanie może być niezdefiniowane w scenariuszach, w których nie jest to spełnione.
  • Powinieneś wypisywać qrzędy kart z pkartami w rzędzie.
  • Każda kolumna powinna być oddzielona | (znak rury otoczony spacjami); jeśli wybierzesz inny znak niż ten, wyjaśnij dlaczego. Przestrzenie otaczające tutaj NIE są opcjonalne.
  • Każdy wiersz musi mieć między sobą 1 lub więcej nowych wierszy, więcej niż jeden jest akceptowalny, 0 nie jest (1 nowy wiersz oznacza domyślnie nowy wiersz).
  • Każdy wiersz powinien być oznaczony odtwarzaczem, który jest jego właścicielem, w formacie „Gracz N” (0 lub 1 indeksowany jest w porządku).
  • Żadna karta nie może pojawić się więcej niż raz.
  • T jest dla dziesięciu.

Przykłady:

Funkcja ( p=1,q=1):

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

Funkcja ( p=2,q=1):

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

Funkcja ( p=2,q=2):

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

Kredyt artystyczny czcionki: http://patorjk.com/software/taag

Urna Magicznej Ośmiornicy
źródło
5
Czy zamieścisz wiele wyzwań dotyczących kart z kart znalezionych na stronie patorjk.com/software/taag ?
1
Soooo ... Czy możemy „użyć” tej strony do wyświetlenia wyniku?
J42161217,
1
Mam na myśli: Czy mogę stworzyć program, który wypisuje patorjk.com/software/taag/... to dla twojego ostatniego przypadku testowego?
J42161217,
5
Ponadto Each row must have 1 or more newlines inbetween them, more than one is acceptable, 0 is not.... Ale twoje przypadki testowe nie mają znaków nowej linii między kartami ..?
totalnie ludzki,
1
Było prawie wyzwanie na kartach ASCII: Czas odtwarzania wysłane przez mnie.
sergiol,

Odpowiedzi:

6

Węgiel drzewny , 142 133 125 bajtów

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

Wypróbuj online! Link jest do pełnej wersji kodu. Edycja: Zapisałem 9 bajtów, ulepszając mój losowy kod próbkowania. Zaoszczędziłem kolejne 8 bajtów, poprawiając kod drukowania kombinezonu. Wyjaśnienie:

Nθ

Wczytaj liczbę kart do q.

FN«

Pętla nad każdym graczem.

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

Jeśli nie jest to pierwszy odtwarzacz, wydrukuj linię pionową między poprzednim a tym odtwarzaczem.

Player Iι

Wydrukuj numer gracza.

Fθ«

Pętla nad każdą kartą.

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

Wydrukuj krawędź karty.

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

Wybierz indeks karty, który nie został jeszcze wybrany, i dodaj go do listy wybranych indeksów kart.

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

Wybierz i wydrukuj rangę karty, cyklicznie indeksując ją do szeregu prawidłowych rang kart ( 2-9, T, J, Q, K, A).

.--.¶

Wydrukuj górę garnituru.

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

Wydrukuj środek kombinezonu, krojąc go na sznurek. Wycinek zaczyna się od indeksu karty modulo 4 i zajmuje co 4 znak, dopóki łańcuch się nie skończy (lub nie zostanie osiągnięty f= 1000 znak). Ponieważ 4 i 13 są chronione prawem autorskim, zapewnia to, że wszystkie 52 karty są możliwe.

'--'δ↘

Wydrukuj spód koloru i kopię rangi, a następnie przejdź do punktu, który dogodnie nie jest zbyt daleko od kopii rangi, początku następnej karty lub początku linii podziału dla następny gracz.

Neil
źródło
Kiedy zobaczyłem to w piaskownicy, wydrukowanie talii było wyzwaniem kc, co zajęło mi 102 bajty: wypróbuj online! Link jest do pełnej wersji kodu.
Neil,
3

Python 2 , 357 bajtów

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])))

Wypróbuj online!

Nie mam cholernego pomysłu.

całkowicie ludzki
źródło
3

Galaretka , 126 bajtów

³‘Ḷj“×ṁẹHY»;⁶¤ṫ5W;
2r9;“TJQKA”
“¡ẏ%TZ=ẹaɦAY’ṃ“(\/)_:”s4s2
“E¬ƭḊHẈḢ“ðİ“|e*Ḳ?BḤ’ṃ“. -|1¶'”żÐ€¢FỴ$€p2£j/€Ẋ
¢ssḢµṣ€”1Zj€“ | ”Yµ€ÑY

Wypróbuj online!

fireflame241
źródło
3

JavaScript (ES6), 328 ... 312 bajtów

Pobiera dane wejściowe w składni curry (p)(q). Gracze mają indeks 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)]):''

Próbny

W jaki sposób?

Jest to funkcja rekurencyjna, budująca dane wyjściowe od dołu do góry. Podczas głównej części, w której dobierane są karty, ijest inicjowany p*q*6i zmniejszany aż do osiągnięcia 0. Następnie rysujemy nagłówek poprzez dalsze zmniejszanie iaż do osiągnięcia -p.

Sztuka ASCII jest podzielona na małe elementy przechowywane w tablicy a[]. Poniższa tabela opisuje zawartość a[], co ułatwia zrozumienie pozostałej części kodu.

 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

Sformatowane i skomentowane

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
Arnauld
źródło
2

Python 2 , 382 358 346 338 332 bajtów

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

Wypróbuj online!

TFeld
źródło
2

SOGL V0.12 , 106 bajtów

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

Wypróbuj tutaj!

Generowanie karty:

...‘                     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

Tasowanie:

'#             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

Postępowanie:

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
dzaima
źródło
2

Rubinowy, 262 bajty

->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")}}

Trudniejsze do naśladowania, ale krótsze!

Rubinowy, 279 bajtów

->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]}}}

Tworzy format dla każdego wiersza, a następnie używa %operatora, sprintfaby go wypełnić.

Fakt, że wartość karty pojawia się w każdym 3 rzędzie, jest przydatny. Wartości kart są prezentowane w systemie szesnastkowym z cyframi 01BCpodstawionymi na TJQK.

Zapisano 4 bajty z symboli koloru, biorąc pod uwagę, że góra diamentów i pik są takie same, ale dodano 2 z powrotem na -4końcu j%4*4-4kodów koloru - -4 0 4 lub 8, co [-4,4]oznacza 4 znaki rozpoczynające 4. ostatni znak w strunowy.

Prawdopodobnie można zaoszczędzić jeszcze kilka bajtów. Powtarzanie kodu identyfikującego gracza jest brzydkie.

Level River St
źródło
2

PHP, 509 bajtów

<?$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);

Wypróbuj online!

To moja pierwsza próba gry w golfa kodowego, więc prawdopodobnie można ją znacznie poprawić. Uznałem, że muszę gdzieś zacząć. :)

Jo.
źródło
1

Java (OpenJDK 8) , 784 835 843 826 815 781 775 bajtów

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;}

Wypróbuj online!

Dlaczego głosowanie negatywne jest zgodne ze specyfikacją

Roberto Graham
źródło
Powinieneś także tworzyć alternatywne metody zamiast tworzyć Function<String,String>: ta ostatnia jest bardzo, bardzo kosztowna. Zarówno przy tworzeniu, jak i przy użyciu.
Olivier Grégoire,
Zakładam, że głosowanie dotyczyło pierwotnej błędnej odpowiedzi, ale prąd wydaje się prawidłowy, więc głosowałem za jego zneutralizowaniem. Kilka małych rzeczy do golfa: można usunąć nawias n[c]=t<2?"A":t<10?""+t:""+"TJQK".charAt(t-10); for(j=0;j<p;j++){o+=...;l++;}może być for(j=0;j<p;l++,j++)o+=...;; możesz return o;zamiast tego System.out.print(o);użyć sekundy Functionzamiast Consumer; ,y=p*qmożna usunąć i można użyć p*qdwa razy bezpośrednio zamiast y. W golfa jest bez wątpienia dużo więcej, ale nie mam teraz czasu, aby się tym
zająć
1
@KevinCruijssen Właściwie nie. Po pierwszej edycji głosowałem za „bez wysiłku w grze w golfa” poza usuwaniem spacji i używaniem zmiennych 1-znakowych. Domyślam się, że Roberto Graham powinien całkowicie ponownie przeczytać Wskazówki dotyczące gry w golfa w Javie . Chodzi o to, że rzeczywiście jest zgodny ze specyfikacją wyzwania, ale nie ze specyfikacją tagu golf-code.
Olivier Grégoire
Skąd mam wiedzieć, że można dalej grać w golfa? Miałem około 400 bajtów, kiedy poddałem się po zobaczeniu tej odpowiedzi, a resztę oszacowałem na około 50 bajtów, aby ją zakończyć. 450 bajtów vs. 850, nie ma prawie żadnego golfa.
Olivier Grégoire,
s[l]<2?":/\\:":s[l]<3?":/\\:"może być s[l]<3?":/\\:"i s[i*p+j]<1?":\\/:":s[i*p+j]<2?":\\/:"może być s[i*p+j]<2?":\\/:". @ OlivierGrégoire I jestem świadomy, że najprawdopodobniej może być prawie o połowę, więc rozumiem zdanie negatywne. Ale jest to głównie brak doświadczenia i rzeczywiście nie przeczytanie wszystkich wskazówek wiele razy. Niektóre rzeczy w odpowiedzi, którą zrobiłem w przeszłości, i nie jest to szczególnie łatwe wyzwanie dla Javy. Przy okazji, jeśli masz odpowiedź o długości 400–450 bajtów, dlaczego nie opublikujesz jej jako oddzielnej odpowiedzi (jeśli jest wystarczająco różna)? Miałbyś moją opinię. ;)
Kevin Cruijssen
1

Python 3, 332 bajtów

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)
RootTwo
źródło