Data update

This commit is contained in:
Ingy döt Net 2024-10-16 18:07:41 -07:00
parent 81fd053722
commit 52a6ef48dd
10248 changed files with 63654 additions and 6775 deletions

View file

@ -1,8 +1,8 @@
tool$[] = [ "rock" "paper" "scissors" ]
repeat
write "choose your weapon: "
write "choose your weapon (r/p/s): "
h$ = input
c = randint 3
c = random 3
h$ = substr h$ 1 1
until h$ = "q"
h = strpos "rps" h$
@ -13,7 +13,7 @@ repeat
print "computer: " & tool$[c]
if h = c
print "it's a tie!"
elif (h + 1) mod1 3 = c
elif (c + 1) mod1 3 = h
print "yay you win!"
else
print "the computer beats you... :("