自慢の手に名前を付ける


11

バックグラウンド

Bragは、ポーカーと概念は似ていますが、ポーカーよりも単純なカードゲームです。自慢の手は3枚のカードで構成され、最高から最低まで次のようにランク付けされます。

  • 3種類のカード-3つのカードはすべて同じランクです。「三人の王」などと名付けられた

  • フラッシュ、別名ストレートフラッシュを実行しています。同じスーツと連続したランクの3枚のカードすべて。ハンドは3枚のカードの昇順で名前が付けられており、単純なラン/ストレートと区別するために「on the bounce」という単語が続きます。エースは高いか低いかのどちらかであり、両方ではないことに注意してください-「king-ace-two」はランではありません。

  • まっすぐ走る。上記と同じですが、スーツを合わせる必要はありません。単に「ten-jack-queen」などの名前が付けられます。

  • フラッシュ-3枚のカードすべてが同じスーツで、最高ランクにちなんで名付けられました(例:「エースフラッシュ」)。

  • ペア-同じランクの2枚のカードと別のバージョンのランクの3枚目。「スリーペア」などと呼ばれる

  • 「ace high」など、最高ランクにちなんで名付けられた他の組み合わせ。

チャレンジ

トランプが3枚ある場合、それらが出力する自慢の手の名前を出力します。

カードは、3つの2文字の文字列として入力されるか、1つの6文字の文字列として連結されます(実装によってはどちらでもかまいません)。各ペアの最初はランクです(2 ... 9、T、J、Q、 K、A)、2番目はスーツ(H、C、D、S)を意味します。

標準のゴルフ規則が適用されます-上記のように、この入力を受け入れ、手の名前を出力するプログラムまたは関数を記述します。

入力は有効(上記の範囲のランクとスート、カードの繰り返しなし)であり、どのような場合でも、特定の順序ではないと想定できます。

出力は、すべて大文字、すべて小文字、またはタイトルの大文字小文字や文の大文字小文字など、意味のある大文字にする必要があります。数値ランクは、たとえば10ではなく「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へようこそ!私はこれまでのところ、挑戦をすくい取りましたが、最初の挑戦としてはまともです。とは言っても、良い課題を書くのは難しいので、将来的には、最初にサンドボックスにアイデア投稿することお勧めします。ここで、フィードバックを取得し、仕様の詳細を改善してから、反対票を投じたり、投票を閉じたり、回答を後で変更したりして無効にする可能性があります。チャレンジ。
マーティンエンダー2017年

@MartinEnderありがとう!次回は確かにサンドボックスを見ていました。
IanF1 2017年

タプルの配列として入力を取得できますか?また、「king flush」などの出力を「fk」に短縮できますか?
Matthew Roh

1
"6D6C6S"6は奇数の複数形なので、テストケースとして追加してください
それはCharles

回答:


2

ルビー、384、320

2文字の文字列の配列を受け入れます。

ピップ値を16進値に変換し、存在する明確なピップ値の数に基づいてハンドを識別します。

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

パイソン2788、715、559、556、554、546、568、 522のバイト

*「6つ」に合格* 46バイトを節約してくれたBen Frankelに感謝!


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
ホワイトスペースのゴルフに関するいくつかの提案:TIO
数学のジャンキー

ありがとう!空白が多くのバイトを追加することは知っていましたが、4つのスペースが必要だと思いました。編集しました!@math_junkie
Stephen

@ user7686415または、代わりに実際のタブを使用することもできます。
mbomb007 2017年

1
@NotthatCharlesが修正しました!
Stephen

1
@Stephen、確かに。D.get(a, b)キーaで辞書Dの値にアクセスすることを意味し、キーが見つからない場合はデフォルト値bを使用します。それD[a] if a in D else bは書くことと同じであり、それは書くことと同じD[a] if a in D.keys() else bです。
ベンフランケル2017年

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が必要(for e[...]


1
これは「シックス」に失敗する可能性があります
それはチャールズ・

1
@NotthatCharles:11バイトのコストがかかりました...しかし、ゴルフをやり直しました。:)
Titus

1

Python 2-583バイト

私はあまりにも新しすぎてコメントを投稿できないので、自分のバージョンのpython solusionを投稿するだけです。

ペアと3の6の「es」の問題を修正しました。Not that 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

いくつかのコメントで少し読みやすい

# 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バイトを節約する
デッドポッサム

1
これは「シックス」に失敗する可能性があります
それはチャールズ・

1
@NotthatCharlesええ、気づいていただきありがとうございます。修正を追加しました
Dead Possum 2017年
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.