Назвіть руку Хвал


11

Фон

Brag - це карткова гра, схожа за концепцією, але простіша, ніж покер. Хрестоматія складається з трьох карт і класифікується таким чином: від найвищої до найнижчої:

  • Три в своєму роді - всі три карти однакового рангу. Названий "трьома королями" тощо.

  • Запуск флеш-ака, як прямий флеш. Всі три картки однакового костюму та послідовних звань. Рука називається трьома картками у порядку зростання, за якими слідують слова "у відскоку", щоб відрізнити їх від простого бігу / прямого, наприклад, "десять-джек-королева на відскоку". Зауважте, туз або високий, або низький, але не обидва - "король-туз-два" не є пробігом.

  • Бігайте ака прямо. Як зазначено вище, але без вимоги відповідності костюмів. Названий просто як, наприклад, "королева десяти джеків".

  • Флеш - усі три карти однакового костюма, названі на честь найвищого рангу, наприклад "Туз флеш".

  • Пара - дві картки одного і того ж рангу разом з третьою з іншої версії. Названий як "пара трійки" тощо.

  • Будь-яка інша комбінація, названа на честь найвищого рангу, наприклад, "туз високий".

Виклик

Давши три ігрові карти, виведіть назву вихваленої руки, яку вони виводять.

Картки будуть вводитись як три 2-символьних рядки або об'єднані у вигляді одного 6-символьного рядка (залежно від того, що надає перевагу), де першою з кожної пари є ранг (2 ... 9, T, J, Q, K, A), а друге означає позов (H, C, D, S).

Застосовуються стандартні правила гольфу - напишіть програму або функцію, яка приймає цей ввід і видає ім'я руки, як описано вище.

Ви можете припустити, що введення буде дійсним (ранги та костюми у вищевказаному діапазоні, повторна карта), і в будь-якому випадку ви хочете, але не буде в якомусь конкретному порядку.

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

Зразки входів і виходів:

2H3C2D => "pair of twos"

TD8C9C => "eight-nine-ten"

4SKS9S => "king flush"

4D4H4S => "three fours"

5H3H2C => "five high"

2D3DAD => "ace-two-three on the bounce"

6D6C6H => "three sixes"

Це моя перша спроба виклику на цьому сайті, будь ласка, запропонуйте покращення, але будьте обережні :)



4
Ласкаво просимо до PPCG! Я поки що лише прокинув виклик, але для першого виклику це виглядає пристойно. Зважаючи на це, писати хороші виклики важко, і на майбутнє я рекомендую спочатку розміщувати ідеї в пісочниці, де ви можете отримати зворотний зв'язок та покращити деталі специфікації, перш ніж ризикувати голосами, закритими голосами та відповідями, які можуть бути визнані недійсними внаслідок наступних змін до виклик.
Мартін Ендер

@MartinEnder дякую! Я, звичайно, буду дивитись на пісочницю наступного разу.
IanF1

Чи можемо ми отримати вхід у вигляді масивів кортежів? Також, чи можемо ми скоротити вихід на зразок 'king flush' до 'fk'?
Меттью Рох

1
будь ласка, додайте "6D6C6S"як тестовий випадок, оскільки шість - непарна множина
Не те, щоб Чарльз

Відповіді:


2

Рубі, 384 , 320

Приймає масив двочаркових рядків.

Переводить значення піп у шістнадцяткові значення та визначає руки на основі кількості різних значень піп.

->*d{u=d.map{|x|*u=x[1]}==u*3
g=d.map{|x|(x[0].tr'TJQKA','ABCDE').hex}.sort
g=1,2,3if[2,3,14]==g
_,l,h=a=g.map{|x|%w{king queen jack ten nine eight seven six five four three two ace}[-x%13]}
[*g[0]..2+g[0]]==g ?a*?-+(u ?' on the bounce':''):u ?h+' flush':[h+' high','pair of '+l+=l[?x]?'es':?s,'three '+l][-g.uniq.size]}

Повідомлення:

->*d{
    # u is "Is this a flush?"" (see if you have more than one suit)
    u=d.map{|x|u=x[1]}==[u]*3

    # g is the sorted card values in integer (convert to base 16)
    g=d.map{|x|x[0].tr('TJQKA','ABCDE').hex}.sort

    # use Ace == 1 if we have a low straight
    g=[1,2,3]if[2,3,14]==g

    # a is the names of all the cards
    a=g.map{|x|%w{ace two three four five six seven eight nine ten jack queen king ace}[x-1]}

    # l is for "plural" - just choose the middle card because we
    #                     only care about plurals for 2s or 3s
    l=a[1].sub(?x,'xe')+?s

    # if [g[0],g[0]+1,g[0]+2] == g, we have a run
    # possibly "on the bounce"
    ([*g[0]..g[0]+2]==g) ? (a * ?-) + (u ? ' on the bounce' : '') :

    # if we have a flush, we can't have three-of-a-kind, so try that first
    u ? a[2]+' flush' :

    # otherwise, dedupe your hand. if there's: 
    # 3 values, x high; 2 values, pair; 1 value, three
    [a[2]+' high','pair of '+l,'three '+l][-g.uniq.size]
}

3

Python 2 , 788, 715, 559, 556, 554, 546, 568, 522 байт

* тепер проходить "шістдесятник" * завдяки Бену Франкелю за економію 46 байт!


import re
d,m,n=dict(zip('JQKA',range(10,15))),'pair of %ss','%s-%s-%s'
C=lambda s:int(d.get(s[0],s[0]))
z,x,c=sorted(re.findall('..',raw_input()),key=C)
q,w,e=C(z),C(x),C(c)
A=[0,0,'two','three','four','five','six','seven','eight','nine','ten','jack','queen','king','ace']
I,O,U=A[e],A[w],A[q]
a,k='%s high'%I,e-w+q
if k==13:a=n%(I,U,O)
if k==w:a=n%(U,O,I)
if q==w or e==w or e==q:a=m%O
if k==e==w:a='three %ss'%I
if'x'in a:a=a[:-1]+'es'
if z[-1]==x[-1]==c[-1]:
 if'-'in a:a+=' on the bounce'
 else:a='%s flush'%I
print a

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

Дякую за класний перший виклик!


1
Деякі пропозиції щодо гольфу з білого простору
математика наркоман

Дякую! Я знав, що пробіл додає багато байтів, але подумав, що йому потрібно 4 пробіли. Відредаговано! @math_junkie
Stephen

@ user7686415 Або ви можете використовувати фактичні вкладки замість цього.
mbomb007

1
@NotthatCharles виправив це!
Стівен

1
@Stephen, звичайно. D.get(a, b)означає доступ до значення в dict D у ключі a, із значенням b за замовчуванням, якщо ключ не знайдено. Це те саме, що писати D[a] if a in D else b, що те саме, що писати D[a] if a in D.keys() else b.
Бен Франкель

2

PHP, 413 405 398 409 408 406 398 байт

На жаль, PHP не підтримує вкладений масив всередині рядків;
це врятувало б ще 6 5 байт.

for(;$a=$argn[$i++];)$i&1?$v[strpos(_3456789TJQKA,$a)]++:$c[$a]++;$k=array_keys($v);sort($k);$n=[two,three,four,five,six,seven,eight,nine,ten,jack,queen,king,ace];echo($m=max($v))<2?($k[!$d=count($c)]+2-($h=$k[2])?$k[1]>1|$h<12?"$n[$h] ".[flush,high][$d++/2]:"ace-two-three":$n[$k[0]]."-".$n[$k[1]]."-$n[$h]").[" on the bounce"][$d^1]:($m<3?"pair of ":"three ").$n[$v=array_flip($v)[$m]].e[$v^4].s;

Запустіть echo <hand> | php -nR '<code>або випробуйте його в Інтернеті .

зламатися

for(;$a=$argn[$i++];)$i&1?      # loop through input
    $v[strpos(_3456789TJQKA,$a)]++  # count values on even positions [0,2,4]
    :$c[$a]++;                      # count colors on odd positions [1,3,5]
$k=array_keys($v);sort($k);     # $k=ascending values
$n=[two,three,four,five,six,seven,eight,nine,ten,jack,queen,king,ace];
echo($m=max($v))<2              # three different values:
?($k[!$d=count($c)]+2-($h=$k[2])    # test normal straight ($d=color count, $h=high card)
    ?$k[1]>1|$h<12                      # test special straight
        ?"$n[$h] ".[flush,high][$d++/2]     # flush if one color, high card if not
                                            #   ($d++ to avoid " on the bounce")
        :"ace-two-three"                    # special straight
    :$n[$k[0]]."-".$n[$k[1]]."-$n[$h]"  # normal straight
).[" on the bounce"][$d^1]          # if straight: straight flush if one color
:($m<3?"pair of ":"three ")     # pair or triplet
    .$n[$v=array_flip($v)[$m]]      # card name
    .e[$v^4].s                      # plural suffix
;

Потрібна PHP> = 5,6 (для e[...])


1
це може провалити "шістдесятників"
Не те, щоб Чарльз

1
@NotthatCharles: Це коштувало мені 11 байт ... але я повернув їх назад. :)
Тит

1

Python 2 - 583 байти

Я занадто новий, щоб мати можливість коментувати публікації, тому я просто розміщую свою версію python solusion.

Виправлена ​​проблема з 'es' для пари та трьох із шести. Завдяки Не тому, що Чарльз

d={'A':['ace',14],'2':['two',2],'3':['three',3],'4':['four',4],'5':['five',5],'6':['six',6],'7':['seven',7],'8':['eight',8],'9':['nine',9],'T':['ten',10],'J':['jack',11],'Q':['queen',12],'K':['king',13]}
r=input()
j=1
i=lambda x:d[x][j]
v=sorted(r[::2],key=i)
z,y,x=v
s=r[1::2]
e='es'if i(y)==6else's'
j=0
a=i(x)
if z==y or y==x:r="pair of %s"%i(y)+e
if s[0]*3==s:r="%s flush"%a
t="%s-%s"%(i(z),i(y))
j=1
u=" on the bounce"if r[-1]=='h'else ""
if i(z)+i(x)==2*i(y):r=t+"-%s"%a+u
if ''.join(v)=="23A":r="%s-"%a+t+u
if [z]*3==v:r="three %s"%d[z][0]+e
if len(r)==6:r="%s high"%a
print r

Трохи легше читати з деякими коментарями

# first of all we don't need to keep suits
d={'A':['ace',14],'2':['two',2],'3':['three',3],'4':['four',4],'5':['five',5],'6':['six',6],'7':['seven',7],'8':['eight',8],'9':['nine',9],'T':['ten',10],'J':['jack',11],'Q':['queen',12],'K':['king',13]}
r=input()                           # input placed in r, to safely check r[-1] later in code
j=1                                 # j toggles reading from dictionary: 0-string, 1-value
i=lambda x:d[x][j]                  # lambda used to access dictionary
v=sorted(r[::2],key=i)              # take values from input and sort
z,y,x=v                             # variables to compact code
s=r[1::2]                           # take suits from input
e='es'if i(y)==6else's'             # choose ending 'es' for six and 's' for others (for pair and three)
j=0                                 # toggle reading from dictionary to string
a=i(x)                              # get string of top most value
if z==y or y==x:                    # check only two pairs as values are sorted
    r="pair of %s"%i(y)+e
if s[0]*3==s:                       # compact check if all string characters are equal to detect flush
    r="%s flush"%a
t="%s-%s"%(i(z),i(y))               # part of straight output - first two values
j=1                                 # toggle reading from dictionary to values
u=" on the bounce"\                 # addon to output in case of possible straight flush
if r[-1]=='h'else ""                # detected by checking last character in r
                                    # which would be 'h' if flush was detected
if i(z)+i(x)==2*i(y):               # check straight - three sorted numbers a,b,c would be in line if a+c == 2*b
    r=t+"-%s"%a+u                   
if ''.join(v)=="23A":               # check special case with straight, started from Ace
    r="%s-"%a+t+u  
j=0                                 # toggle reading from dictionary to string
if [z]*3==v:                        # check three equal values (almost the same as flush check)
    r="three %s"%d[z][0]+e
if len(r)==6:                       # if r was never modified, then it's just one high card
    r="%s high"%a
print r                             # output r

Також може змінитися в останніх рядках j=0; if [z]*3==v:r="three %ss"%i(z)на " if [z]*3==v:r="three %ss"%d[z][0]Але це економить лише 1 байт
Dead Possum

1
це може бути невдалим "шістдесятникам"
Не те, що Чарльз

1
@NotthatCharles Так, дякую, що помітили. Я додав виправлення
Dead Possum
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.