1 PRINT "NUMBER"
2 PRINT "CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY"
3 PRINT:PRINT:PRINT
4 PRINT "YOU HAVE 100 POINTS.  BY GUESSING NUMBERS FROM 1 TO 5, YOU"
5 PRINT "CAN GAIN OR LOSE POINTS DEPENDING UPON HOW CLOSE YOU GET TO"
6 PRINT "A RANDOM NUMBER SELECTED BY THE COMPUTER.": PRINT
7 PRINT "YOU OCCASIONALLY WILL GET A JACKPOT WHICH WILL DOUBLE(!)"
8 PRINT "YOUR POINT COUNT.  YOU WIN WHEN YOU GET 500 POINTS."
9 PRINT: P=100
12 INPUT "GUESS A NUMBER FROM 1 TO 5: ";G
15 R=RND(5)+1
16 S=RND(5)+1
17 T=RND(5)+1
18 U=RND(5)+1
19 V=RND(5)+1
20 IF G=R THEN GOTO 30
21 IF G=S THEN GOTO 40
22 IF G=T THEN GOTO 50
23 IF G=U THEN GOTO 60
24 IF G=V THEN GOTO 70
25 IF G>5 THEN GOTO 12
27 IF G<1 THEN GOTO 12
30 P=P-5
35 GOTO 80
40 P=P+5
45 GOTO 80
50 P=P+P
53 PRINT "YOU HIT THE JACKPOT!!!"
55 GOTO 80
60 P=P+1
65 GOTO 80
70 P=P/2
80 IF P>500 THEN GOTO 90
81 IF P<0 THEN PRINT "YOU GOT NO POINTS LEFT - YOU LOST!!" : END
82 PRINT "YOU HAVE ";P;" POINTS.":PRINT
85 GOTO 12
90 PRINT "!!!!YOU WIN!!!! WITH ";P;" POINTS."
99 END