21 game: Difference between revisions

110 RANDOMIZE

120 LET SUM,ADD=0

140 CLEAR SCREEN

150 PRINT "21 is a two player game, the game is played by choosing a number (1, 2, or 3) to be added to the running total. The game is won by the player whose chosen number causes the running total to reach exactly 21."

160 PRINT "The running total starts at zero. One player will be the computer.":PRINT

170 DO

190 SET #102:INK 3:PRINT "The sum is";SUM:SET #102:INK 1

210 PRINT "It is your turn.":PRINT "How many would you like to add? (1-3): ";

220 LET ADD=READKEY

230 IF ADD>21-SUM THEN PRINT "You can only add";21-SUM

240 ELSE

270 PRINT "It is the computer's turn.":PRINT "The computer adds";ADD

280 END IF

290 PRINT :LET SUM=SUM+ADD

300 LOOP WHILE SUM<21

320 PRINT "Congratulations. You win."

330 ELSE

=={{header|EasyLang}}==

The computer plays optimally

print "Do you want to begin (y/n)"

who = 1

sleep 1

if sum mod 4 = 1

else

n = 4 - (sum + 3) mod 4

print "Sorry, you lost"

.

 

=={{header|Factor}}==

</pre>

 

<syntaxhighlight lang="forth">: READKEY

1+ BEGIN

</syntaxhighlight>

 

<syntaxhighlight lang="rust">use rand::Rng;

use std::io;