Rock-paper-scissors: Difference between revisions
Content added Content deleted
(Adding an example for JavaScript.) |
Childishbeat (talk | contribs) m (→{{header|NS-HUBASIC}}: NS-HUBASIC example added) |
||
Line 3,427: | Line 3,427: | ||
Seed = time(NULL); |
Seed = time(NULL); |
||
").</lang> |
").</lang> |
||
=={{header|NS-HUBASIC}}== |
|||
<lang NS-HUBASIC>10 COMPUTER=RND(3)+1 |
|||
20 COMPUTER$="ROCK" |
|||
30 IF COMPUTER=2 THEN COMPUTER$="PAPER" |
|||
40 IF COMPUTER=3 THEN COMPUTER$="SCISSORS" |
|||
50 INPUT "ROCK, PAPER OR SCISSORS? ",HUMAN$ |
|||
60 IF HUMAN$="ROCK" THEN GOTO 100 |
|||
70 IF HUMAN$="PAPER" THEN GOTO 100 |
|||
80 IF HUMAN$="SCISSORS" THEN GOTO 100 |
|||
90 PRINT "INVALID GUESS. TRY AGAIN.": GOTO 50 |
|||
100 PRINT "YOU CHOSE "HUMAN$" AND THE COMPUTER CHOSE "COMPUTER$"." |
|||
110 IF HUMAN$=COMPUTER$ THEN PRINT "THOSE ARE THE SAME CHOICES";", SO YOU TIED." |
|||
120 IF HUMAN$="ROCK" AND COMPUTER=2 THEN PRINT "PAPER COVERS ROCK, SO YOU LOSE." |
|||
130 IF HUMAN$="ROCK" AND COMPUTER=3 THEN PRINT "ROCK BLUNTS SCISSORS";", SO YOU WIN." |
|||
140 IF HUMAN$="PAPER" AND COMPUTER=1 THEN PRINT "PAPER COVERS ROCK, SO YOU WIN." |
|||
150 IF HUMAN$="PAPER" AND COMPUTER=3 THEN PRINT "SCISSORS CUT PAPER";", SO YOU LOSE." |
|||
160 IF HUMAN$="SCISSORS" AND COMPUTER=1 THEN PRINT "ROCK BLUNTS SCISSORS";", SO YOU LOSE." |
|||
170 IF HUMAN$="SCISSORS" AND COMPUTER=2 THEN PRINT "SCISSORS CUT PAPER, SO YOU WIN."10 COMPUTER=RND(3)+1</lang> |
|||
=={{header|OCaml}}== |
=={{header|OCaml}}== |