numbers ( 369 pas de programme )
You can change this game by making the number 7 on line 30 any number lower than 7. Don't tell your number !!! This game uses 4 players and the last player can make anyone win. First the preogram tells what game you're playing. You add your secret number to the game number and wait. Now the players input 5 numbers each and the computer adds up the numbers. Now it's your turn!!! To make your number win, substract 3 from your game plus secret number. To make the 3rd player win, substract 2. To make the 2nd player win, substract 1. To make the first player win, substract 0. So if it's game 8 and your number is 7 then you must input 5 digits that add up to 12 for you to win. Example 2 EXE, 4 EXE, 1 EXE, 0 EXE, 5 EXE.
The fourth player wins by substracting 3.
10 A=0:C=0:D=0:F=0:B=0:X=0:J=0:E=0
20 PRINT "NUMBERS:INPUT 5 DIGITS";
30 A=A+1:B=A+7:D=B
40 PRINT "GAME ";A;
50 INPUT J:X=X+1
60 C=C+J:IF X<5 THEN 50
70 X=0
80 IF B=38;PRINT "THIS GAME IS OVER":GOTO 10
90 E=E+1
100 GOSUB 300
150 IF E<4 THEN 250
200 IF F=1;PRINT "WINNER 1";
210 IF F=2;PRINT "WINNER 2";
220 IF F=3;PRINT "WINNER 3";
230 IF F=4;PRINT "WINNER 4";
250 IF E=4;E=0:C=0:GOTO 30
260 C=0
270 PRINT "PLAYER ";E+1;
280 GOTO 50
300 IF C=D;F=1
310 IF C=D-1;F=2
320 IF C=D-2;F=3
330 IF C=D-3;F=4
340 RETURN