Pig the dice game: Difference between revisions

m
No edit summary
Line 2,239:
End Sub
Sub PlayOrQuit()
Print "R -Roling Q -Quit"
Repeat {
res$=Ucase$(Key$)
Line 2,245:
End Sub
Sub PlayAgain()
Print "R -Roling H -Hold Q -Quit"
Repeat {
res$=Ucase$(Key$)
Line 2,275:
GamePig
</lang>
 
=={{header|Maple}}==
<lang maple>pig := proc()
Anonymous user