Dê um nome à mão de Brag

11

fundo

Brag é um jogo de cartas semelhante ao conceito, mas mais simples que o poker. Uma mão em gabar consiste em três cartas e é classificada da seguinte para a maior para a menor:

  • Três do mesmo tipo - todas as três cartas do mesmo valor. Nomeado como "três reis" etc.

  • Running flush, também conhecido como straight flush. Todas as três cartas do mesmo naipe e de classificações consecutivas. A mão é nomeada pelas três cartas em ordem crescente, seguida pelas palavras "no salto" para distinguir de uma corrida / sequência simples, por exemplo, "dez-valete-dama no salto". Observe que um ás é alto ou baixo, mas não ambos - "rei-ás-dois" não é uma corrida.

  • Corra também em linha reta. Como acima, mas sem a necessidade de combinar naipes. Nomeado simplesmente como, por exemplo, "dez-valete-rainha".

  • Flush - todas as três cartas do mesmo naipe, com o nome do ranking mais alto, por exemplo, "Ace flush".

  • Par - duas cartas com o mesmo valor e um terço de outra versão. Nomeado como "par de três", etc.

  • Qualquer outra combinação, nomeada após a classificação mais alta, por exemplo, "ás alto".

Desafio

Dadas três cartas de baralho, escreva o nome da mão que ostenta.

As cartas serão inseridas como três cadeias de 2 caracteres ou concatenadas como uma única cadeia de 6 caracteres (conforme sua implementação preferida), onde o primeiro de cada par é a classificação (2 ... 9, T, J, Q, K, A) e o segundo significa o naipe (H, C, D, S).

Aplicam-se regras padrão de golfe - escreva um programa ou função que aceite esta entrada e dê o nome da mão como detalhado acima.

Você pode assumir que a entrada será válida (classificações e naipes no intervalo acima, sem cartão repetido) e, em qualquer caso, de sua preferência, mas não será em nenhuma ordem específica.

A saída deve ser em todas as maiúsculas, todas as minúsculas ou uma capitalização sensata, por exemplo, maiúsculas ou minúsculas. Classificações numéricas devem ser explicitadas, por exemplo, "dezenas" e não 10s.

Entradas e saídas de amostra:

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"

Esta é minha primeira tentativa de desafio neste site. Sugira melhorias, mas seja gentil :)

IanF1
fonte
4
Bem-vindo ao PPCG! Até agora, eu já havia visto o desafio, mas parece decente para um primeiro desafio. Dito isso, escrever bons desafios é difícil e, no futuro, eu recomendaria postar idéias na área restrita primeiro, onde você pode obter feedback e melhorar os detalhes da especificação antes de arriscar votos negativos, votos próximos e respostas que podem ser invalidadas por alterações posteriores no desafio.
Martin Ender
@MartinEnder thanks! Certamente vou dar uma olhada na caixa de areia da próxima vez.
31717 IanF1
Podemos obter entrada como matrizes de tuplas? Além disso, podemos reduzir a produção como 'king flush' para 'fk'?
Matthew Roh
11
adicione "6D6C6S"como um caso de teste, já que seis é um plural ímpar
Não que Charles

Respostas:

2

Ruby, 384 , 320

Aceita uma matriz de seqüências de caracteres de dois caracteres.

Converte os valores de pip em valores hexadecimais e identifica ponteiros com base em quantos valores distintos de pip existem.

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

Anotado:

->*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]
}
Não que Charles
fonte
3

Python 2 , 788, 715, 559, 556, 554, 546, 568, 522 bytes

* agora passa dos 'seis' * graças a Ben Frankel por economizar 46 bytes!


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

Experimente online!

Obrigado por um primeiro desafio legal!

Stephen
fonte
11
Algumas sugestões espaço em branco do golfe: TIO
matemática viciado em
Obrigado! Eu sabia que o espaço em branco estava adicionando muitos bytes, mas achei que exigia 4 espaços. Editado! @math_junkie
Stephen
@ user7686415 Em alternativa, pode utilizar separadores reais.
mbomb007
11
@NotthatCharles corrigiu isso!
Stephen
11
@ Stephen, claro. D.get(a, b)significa acessar o valor no ditado D na chave a, com o valor padrão b se a chave não for encontrada. É o mesmo que escrever D[a] if a in D else b, que é o mesmo que escrever D[a] if a in D.keys() else b.
Ben Frankel
2

PHP, 413 405 398 409 408 406 398 bytes

Infelizmente, o PHP não suporta referência de matriz aninhada dentro de strings;
isso teria economizado outros 6 5 bytes.

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;

Execute echo <hand> | php -nR '<code>ou teste on-line .

demolir

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
;

Requer PHP> = 5.6 (para e[...])

Titus
fonte
11
isso pode falhar "sixes"
Não que Charles
11
@NotthatCharles: Isso me custou 11 bytes ... mas eu os devolvi. :)
Titus
1

Python 2 - 583 bytes

Sou novo demais para poder comentar as postagens, por isso, acabei de postar minha versão do python solusion.

Corrigido problema com 'es' para par e três de seis. Graças a Não que Charles

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

Um pouco mais legível com alguns comentários

# 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
Gambá morto
fonte
Também pode ser alterado nas últimas linhas j=0; if [z]*3==v:r="three %ss"%i(z)para if [z]*3==v:r="three %ss"%d[z][0]Mas ele salva apenas 1 byte
Dead Possum
11
isso pode falhar "sixes"
Não que Charles
11
@NotthatCharles Sim, obrigado por perceber. Eu adicionei correção
Dead Possum