aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions
Download patch file Download diff file Expand all files Collapse all files

28
Task/Pig-the-dice-game/AppleScript/pig-the-dice-game.applescript Normal file
View file

@ -0,0 +1,28 @@
set scores to {0, 0}
set tmpscores to {0, 0}
set t to 1
repeat
set input to display alert "Player " & t & "'s turn." buttons {"Hold", "Roll", "Quit"}
if button returned of input = "Hold" then
set item t of scores to item t of tmpscores
log "Player " & t & " holds with " & (item t of scores) & " points."
set t to 3 - t
else if button returned of input = "Roll" then
set dieroll to random number from 1 to 6
log "Player " & t & " rolled a " & dieroll & "!"
if dieroll = 1 then
log "Player " & t & " is bust!"
log "Player " & t & " has " & (item t of scores) & " points."
set t to 3 - t
else
set item t of tmpscores to (item t of tmpscores) + dieroll
log "Player " & t & " has " & (item t of tmpscores) & " points."
if (item t of tmpscores) > 100 then
log "Player " & t & " wins!"
exit repeat
end if
end if
else if button returned of input = "Quit" then
exit repeat
end if
end repeat