มันคือวันศุกร์ ... งั้นไปเล่นกอล์ฟกันเถอะ! เขียนรหัสที่กำหนดคะแนนของผู้เล่นในหลุมในเกมกอล์ฟ รหัสสามารถเป็นได้ทั้งฟังก์ชั่นหรือโปรแกรมทั้งหมด ตามประเภทที่แนะนำรหัสที่สั้นที่สุดชนะ

อินพุต (พารามิเตอร์หรือ stdin, ตัวเลือกของคุณ):

• จำนวนเต็มแทนค่ารูของหลุมรับประกันว่าจะอยู่ระหว่าง 3 ถึง 6
• จำนวนเต็มแทนคะแนนของนักกอล์ฟรับประกันได้ระหว่าง 1 ถึง 64

เอาท์พุท (พิมพ์ไปที่ stdout หรือย้อนกลับลากขึ้นบรรทัดใหม่ที่ได้รับอนุญาต แต่ไม่จำเป็นต้องเลือกของคุณ):

• ถ้าคะแนนเท่ากับ 1 ให้เอาท์พุท "Hole in one"
• ถ้า score == par - 4 และ par> 5, output "Condor"
• ถ้า score == par - 3 และ par> 4, เอาต์พุต "Albatross"
• ถ้า score == par - 2 และ par> 3 เอาต์พุต "Eagle"
• ถ้าคะแนน == พาร์ - 1 เอาท์พุท "Birdie"
• ถ้า score == par, เอาต์พุต "Par"
• ถ้าคะแนน == par + 1 เอาท์พุท "Bogey"
• ถ้าคะแนน == par + 2, เอาท์พุท "Double Bogey"
• ถ้าคะแนน == par + 3, เอาท์พุท "Triple Bogey"
• ถ้าคะแนน> par + 3, เอาท์พุท "ฮ่าฮ่าคุณแพ้"

แก้ไขขอแสดงความยินดีกับเดนนิสที่มีคำตอบสั้นที่สุด!

เยลลี่ , 61 ไบต์

_«4ị“Ƙḷ“&SẆ@ẓ“&T¡UQ“½⁽Ð'÷ṿɼ“½Œż“¡œM“v⁵“¥⁻c“£Ḋ⁶»
瓵ḣ⁻×⁵ñBƑ»’?

ลองออนไลน์!

พื้นหลัง

สิ่งนี้ใช้การบีบอัดพจนานุกรมแบบคงที่ของ Jelly คุณสามารถค้นหาคอมเพรสเซอร์ที่นี่ ทางนี้,

“Ƙḷ“&SẆ@ẓ“&T¡UQ“½⁽Ð'÷ṿɼ“½Œż“¡œM“v⁵“¥⁻c“£Ḋ⁶»

และ

“Bogey“Double Bogey“Triple Bogey“Haha you loser“Condor“Albatross“Eagle“Birdie“Par”

เช่นกัน

“µḣ⁻×⁵ñBƑ»

และ

“Hole in one”

เทียบเท่า

มันทำงานอย่างไร

_«4ị“Ƙḷ“&SẆ@ẓ“&T¡UQ“½⁽Ð'÷ṿɼ“½Œż“¡œM“v⁵“¥⁻c“£Ḋ⁶»  Helper link. Arguments: score, par

_                                                Subtract the par from the score.
 «4                                              Cap the difference at 4.
   ị                                             Index into the list at the right.
    “Ƙḷ“&SẆ@ẓ“&T¡UQ“½⁽Ð'÷ṿɼ“½Œż“¡œM“v⁵“¥⁻c“£Ḋ⁶»  Yield a list of strings.


瓵ḣ⁻×⁵ñBƑ»’?  Main link. Arguments: score, pair

            ?  If...
           ’   the decremented score if non-zero:
ç                Call the helper link on both input arguments.
 “µḣ⁻×⁵ñBƑ»      Else, return “Hole in one”.

PHP 5.3+, 173 167 166 159 156 151 127 121 ไบต์

echo[Condor,Albatross,Eagle,Birdie,Par,$b=Bogey,"Double $b","Triple $b","Haha you loser"][min(4+$s-$p,8)]?:"Hole in one";

echo$s-1?["Condor","Albatross","Eagle","Birdie","Par",$b="Bogey","Double $b","Triple $b","Haha you loser"][min(4+$s-$p,8)]:"Hole in one";

ตั้งค่าตัวแปร$sหลักและ$par ก่อนechoและคุณปิด

echo [Condor,
      Albatross,
      Eagle,
      Birdie,
      Par,
      $b = Bogey,
      "Double $b",
      "Triple $b",
      "Haha you loser"][ min( 4+$s-$p,8 ) ]
  ?: "Hole in one";

การแก้ไข
-6:ไม่เก็บอาร์เรย์เพียงแค่เรียกมันถ้าจำเป็น
-1:พลิก ternary รอบ ๆ
-7:ต่ำสุด$s-$pกับ$s>1เป็น-4ดังนั้นไม่จำเป็นต้องมีตั้งแต่max() -3:ขอบคุณ CoolestVeto! -5: สตริง cheaty ตามตัวอักษรที่ไม่ได้กำหนดบวกอย่างต่อเนื่องขอบคุณ Ismael Miguel! -24:การย้ายจากฟังก์ชั่นไปยัง/ การตั้งค่าด้วยการปรับแต่งเพิ่มเติมขอบคุณ Ismael Miguel สำหรับการเปลี่ยนทิศทาง -6: หักเลี้ยวเราจะกลับมาอีกครั้ง!4+$s-$p >= 0
Array -> explode()
$r[-1] -> false
explode()printf%s
echo

05AB1E , 91 90 ไบต์

รหัส:

-5+U“¥Ê€†€µ“ª"0Bogey"ДCondor Albatross²è Birdie Par ÿ‹¶ÿ½¿ÿ”ð¡“Haha€î loser“X0¹1Qm*@0ð:ðÛ

คำอธิบาย:

ส่วนที่ 1:

-5+                          # Computes Score - Par + 5
   U                         # Store in X
    “¥Ê€†€µ“ª                # Short for "Hole in one"
             "0Bogey"        # Push this string
                     Ð       # Triplicate

ส่วนที่ 2:

”Condor Albatross²è Birdie Par ÿ‹¶ÿ½¿ÿ”ð¡

สิ่งนี้เหมือนกับการ"Condor Albatross Eagle Birdie Par 0Bogey Double0Bogey Triple0Bogey"ใช้การบีบอัดสตริงและการแก้ไขสตริง จากนั้นเราแบ่งช่องว่างโดยใช้ð¡จากนั้นเราจะแบ่งพื้นที่ใช้

ส่วนที่ 3:

“Haha€î loser“                # Push "Haha you loser"
              X               # Push X
               0¹1Qm          # Compute 0 ^ (score == 1), this translates 1 to 0 and 
                                everything else to 1.
                    *         # Multiply the top two items
                     @        # Get the string from that position
                      0ð:     # Replace zeros with spaces
                         ðÛ   # Trim off leading spaces

ค้นพบมากข้อบกพร่องใช้การเข้ารหัสCP-1252

ลองออนไลน์!

Vitsy, 131 ไบต์

D1-)["eno ni eloH"rZ;]r-5+D9/([X9]mZ
"rodnoC"
"ssortablA"
"elgaE"
"eidriB"
"raP"
"yegoB"
4m" elbuoD"
4m" elpirT"
"resol uoy ahaH"

คำอธิบาย:

D1-)["eno ni eloH"rZ;]r-5+D9/([X9]mZ
D1-)[                ]      If the second input is 1, do the bracketed stuff.
     "eno ni eloH"rZ;       Output "Hole in one" and quit.
r                           Reverse the stack.
 -                          Subtract the top two items.
  5+                        Add 5 to fix for negative values of score.
    D9/([  ]                If the result of that is greater than 8, do the stuff in brackets.
         X                  Remove the top item.
          9                 Push 9. This forces any items greater than 8 to be 9.
            m               Execute this number line.
             Z              Output everything in the stack.

สิ่งนี้ทำงานได้โดยการหาว่าคะแนนนั้นสัมพันธ์กับส่วนที่เท่ากันจากนั้นดำเนินการบรรทัดที่ต่างกัน

ลองออนไลน์!

โหมด verbose (สำหรับ poops และ giggles):

duplicate top item;
push 1;
subtract top two;
if (int) top is not 0;
begin recursive area;
toggle double quote;
push 14;
eval(stack);
capture stack as object with next;
 ;
eval(stack);
push input item;
 ;
push 14;
push length of stack;
capture stack as object with next;
push all ints between second to top and top;
toggle double quote;
reverse stack;
output stack as chars;
generic exit;
end recursive area;
reverse stack;
subtract top two;
push 5;
add top two;
duplicate top item;
push 9;
divide top two;
if (int) top is 0;
begin recursive area;
remove top;
push 9;
end recursive area;
goto top method;
output stack as chars;
:toggle double quote;
reverse stack;
capture stack as object with next;
push 13;
eval(stack);
capture stack as object with next;
push cosine of top;
toggle double quote;
:toggle double quote;
push inverse sine of top;
push inverse sine of top;
capture stack as object with next;
reverse stack;
push inverse tangent of top;
push 10;
push 11;
push length of stack;
push inverse cosine of top;
toggle double quote;
:toggle double quote;
push 14;
push length of stack;
g;
push 10;
push e;
toggle double quote;
:toggle double quote;
push 14;
push input item;
push 13;
reverse stack;
push input item;
B;
toggle double quote;
:toggle double quote;
reverse stack;
push 10;
push pi;
toggle double quote;
:toggle double quote;
push number of stacks;
push 14;
g;
capture stack as object with next;
B;
toggle double quote;
:push 4;
goto top method;
toggle double quote;
 ;
push 14;
push length of stack;
push 11;
flatten top two stacks;
capture stack as object with next;
duplicate top item;
toggle double quote;
:push 4;
goto top method;
toggle double quote;
 ;
push 14;
push length of stack;
push whether (int) top item is prime;
push input item;
reverse stack;
push tangent of top;
toggle double quote;
;
;
:toggle double quote;
reverse stack;
push 14;
push inverse sine of top;
capture stack as object with next;
push length of stack;
 ;
flatten top two stacks;
capture stack as object with next;
push number of stacks;
 ;
push 10;
factorize top item;
push 10;
push all ints between second to top and top;
toggle double quote;

JavaScript (ES6), 125 124 ไบต์

p=>s=>"Hole in one,Condor,Albatross,Eagle,Birdie,Par,Bogey,Double Bogey,Triple Bogey".split`,`[s-1&&s-p+5]||"Haha you loser"

กำหนดให้กับตัวแปรเช่นf=p=>s=>จากนั้นเรียกมันว่าอย่างนั้น: f(6)(2)Par ก่อนจากนั้นให้คะแนน

อาจจะสั้นลงด้วยการรวม"Bogey"s

LittleLua - 160 ไบต์ (ไม่แข่งขัน)

r()P=I B="Bogey"r()Z={"Hole in one","Condor","Albatross","Eagle","Birdie","Par",B,"Double "..B,"Triple "..B,"Haha, you loser"}p(I=='1'a Z[1]or Z[I-P+6]or Z[10])

ฉันค่อนข้างแน่ใจว่าฉันทำสิ่งนี้ถูกต้อง

ยอมรับสองจำนวนเต็ม, par และคะแนนของผู้เล่น

เวอร์ชันของ Little Lua ที่ฉันเคยทำสิ่งนี้ถูกอัปโหลดหลังจากการโพสต์ความท้าทายนี้ แต่ไม่ได้รับการแก้ไขในภายหลัง มันค่อนข้างชัดเจนจากรหัสที่ไม่มีการเพิ่มสิ่งใดเพื่อลดความท้าทายนี้

ข้อมูล LittleLua:

เมื่อฉันพอใจกับอินที่สร้างขึ้นและฟังก์ชั่นของ Little Lua แหล่งที่มาจะพร้อมใช้งานพร้อมกับ infopage

LittleLua V0.02

Mouse-2002 , 223 207 bytes

การลบความคิดเห็นน่าจะช่วยได้ ...

??s:p:s.1=["Hole in one"]s.p.4-=p.5>["Condor"]s.p.3-=p.4>["Albatross"]s.p.2-=p.3>["Eagle"]s.p.1-=["Birdie"]s.p.=["Par"]s.p.1+=["Bogey"]s.p.2+=["Double Bogey"]s.p.2+=["Double Bogey"]s.p.3+>["Haha you loser"]$

Ungolfed:

? ? s: p:

s. 1 = [
  "Hole in one"
]

~ 1
s. p. 4 - = p. 5 > [
  "Condor"
]

~ 2
s. p. 3 - = p. 4 > [
  "Albatross"
]

~ 3
s. p. 2 - = p. 3 > [
  "Eagle"
]

~ 4
s. p. 1 - = [
  "Birdie"
]

~ 5
s. p. = [
  "Par"
]

~ 6
s. p. 1 + = [
  "Bogey"
]

~ 7
s. p. 2 + = [
  "Double Bogey"
]

~ 8
s. p. 2 + = [
  "Double Bogey"
]

s. p. 3 + > [
  "Haha you loser"
]


$

ทุบตี, 150 136 ไบต์

b=Bogey
(($2<2))&&echo Hole in one||tail -$[$2-$1+5]<<<"Haha you loser
Triple $b
Double $b
$b
Par
Birdie
Eagle
Albatross
Condor"|head -1

ทดสอบการทำงาน:

llama@llama:...code/shell/ppcg74767golfgolf$ for x in {1..11}; do bash golfgolf.sh 6 $x; done                                                          
Hole in one
Condor
Albatross
Eagle
Birdie
Par
Bogey
Double Bogey
Triple Bogey
Haha you loser
Haha you loser

ขอบคุณเดนนิส 14 ไบต์!

Python 2, 186 179 158 bytes

def c(s,p):a="Bogey";print["Condor","Albatross","Eagle","Birdie","Par",a,"Double "+a,"Triple "+a,"Haha you loser","Hole in one"][([[s-p+4,8][s-p>3],9][s==1])]

แก้ไข 1: เพิ่มกรณี "hole in one" ที่ขาดหายไป ...

แก้ไข 2: golfed out ไบต์บาง (ขอบคุณแทค)

Haskell - 131 ไบต์ (นับขึ้นบรรทัดใหม่)

1%p="Hole in one"
s%p=lines"Condore\nAlbatros\nEagle\nBirdie\nPar\nBogey\nDouble Bogey\nTriple Bogey\nHaha you loser"!!min(4-p+s)8

lines เป็นวิธีเดียวที่ฉันสามารถนึกถึงการเล่นกอล์ฟในรายการของสตริงที่ต้องมีช่องว่างที่มีการเข้าถึงเท่านั้น Preludeจึงติดอยู่กับตัวคั่นสองตัว

ถึงกระนั้น Haskell ก็ไม่ได้เป็นการแข่งขันแบบนี้ (เทียบกับภาษาทั่วไปอย่างน้อย)

Python 2.7, 226 ไบต์

p,s=input()
b="Bogey"
l={s==1:"Hole in one",5<p==s+4:"Condor",4<p==s+3:"Albatross",3<p==s+2:"Eagle",s==p-1:"Birdie",s==p:"Par",s==p+1:b,s==p+2:"Double "+b,s==p+3:"Triple "+b,s>p+3:"Haha you loser"}
for r in l:
 if r:print l[r]

ยากที่จะเกิดขึ้นกับรหัสหลามสั้น ๆ เมื่อคุณมาปาร์ตี้ช้าดีที่สุดที่ฉันจะนึกออก

C, 198 ไบต์

main(){char s=8,p=4,m[]="Hole in one.Condor.Albatross.Eagle.Birdie.Par.Bogey.Double Bogey.Triple Bogey.Haha you loser",*t,*x,i=0;for(x=m;t=strtok(x,".");x=0,i++)if((s-1?s-p>3?9:s-p+5:0)==i)puts(t);}

Japt, 97 ไบต์

`Ho¤  e
CÆBr
AlßNoss
Eag¤
Bir¹e
P
zD½e zTp¤ zHa y lo r`rz"Bogey
" ·g9m´V©V-U+6

ประกอบด้วยพวงของ unprintables ทดสอบออนไลน์!

มันทำงานอย่างไร

`Ho¤  e\nCÆBr\nAlßNoss\nEag¤\nBir¹e\nP\nzD½e zTp¤ zHa y lo r`                        rz"Bogey\n" ·  g9m´ V© V-U+6
"Hole in one\nCondor\nAlbatross\nEagle\nBirdie\nPar\nzDouble zTriple zHaha you loser"rz"Bogey\n" qR g9m--V&&V-U+6

              // Implicit: U = par, V = score
"..."         // Take this long, compressed string.
rz"Bogey\n"   // Replace each instance of "z" with "Bogey\n".
qR            // Split at newlines.

--V&&V-U+6    // If V is 1, take 0; otherwise, take V-U+5.
9m            // Take the smaller of this and 9.
g             // Get the item at this index in the previous list of words.
              // Implicit output

Python 2.7.2, 275 ไบต์

s=int(input())
p=int(input())
a="Bogey"
if s==1:b="Hole in one"
elif p-4==s:b="Condor"
elif p-3==s:b="Albatross"
elif p-2==s:b="Eagle"
elif p-1==s:b="Birdie"
elif p==s:b="Par"
elif p+1==s:b=a
elif p+2==s:b="Double "+a
elif p+3==s:b="Triple "+a
else:b="Haha you loser"
print b

Ungolfed / อธิบาย:

score = int(input())
par = int(input)
foo = "Bogey" # a shortcut for 3 of the outputs
if score == 1:
    output = "Hole in one"
elif par - 4 == score:
    output = "Condor"
...
elif par == score:
    output = "Par"
elif par + 1 == score:
    output = foo # See what I mean?
elif par + 2 == score:
    output = "Double " + foo # Huh? Huh?
elif par + 3 == score:
    output = "Triple " + foo # That makes 3.
else:
    output = "Haha you loser"
print output # Make sense?

คำตอบที่สองของฉันคือแดกดันทั้งสองอยู่ในหลาม เคล็ดลับการตีกอล์ฟชื่นชม!

Python 2, 302 284 ไบต์

i=input();j=input()
if j==1:print"Hole in one"
if(j==i-4)&(i>5):print"Condor"
if(j==i-3)&(i>4):print"Albatross"
if(j==i-2)&(i>3):print"Eagle"
if j==i-1:print"Birdie"
if j==i:print"Par"
if j>i:
 k=j-i
 if k<4:
  print["","Double ","Triple "][k-1]+"Bogey"
 else:
  print"Haha you loser"

หากอนุญาตให้มีพื้นที่สีขาวแสดงว่าเป็น 282 ไบต์:

i=input();j=input()
if j==1:print"Hole in one"
if(j==i-4)&(i>5):print"Condor"
if(j==i-3)&(i>4):print"Albatross"
if(j==i-2)&(i>3):print"Eagle"
if j==i-1:print"Birdie"
if j==i:print"Par"
if j>i:
 k=j-i
 if k<4:
  print["","Double","Triple"][k-1],"Bogey"
 else:
  print"Haha you loser"