Appears on
Assembled by Tim Ward from many sources. Contains programs 10001 – 10050.
Source Code
10 PRINT "%N%U%M%B%E%R% %J%U%G%G%L%E%-%-%2%-%-" 25 PRINT 30 PRINT "NAME OF FIRST PLAYER?" 40 INPUT A$ 45 PRINT 50 PRINT "NAME OF SECOND PLAYER?" 60 INPUT B$ 65 CLS 70 PRINT A$;", THINK OF A NUMBER AND" 75 PRINT ,"DOUBLE IT" 80 PRINT 85 PRINT B$;", THINK OF A NUMBER AS WELL" 90 PRINT "AND ADD SIX TO IT" 95 PAUSE 40000 100 CLS 105 PRINT B$;", I WANT YOU TO MULTIPLY YOUR" 110 PRINT "NUMBER BY THREE" 115 PRINT 120 PRINT A$;", ADD FIVE" 125 PAUSE 40000 130 CLS 135 PRINT A$;", SUBTRACT SEVEN" 140 PRINT "AND TYPE IN THE RESULT" 145 INPUT A 150 CLS 155 PRINT B$;", I WANT YOU TO SUBTRACT" 160 PRINT "FOUR THEN TYPE IN YOUR RESULT" 165 INPUT B 170 CLS 175 LET K=(A+2)/2 180 LET L=((B+4)/3)-6 185 PRINT "YOUR NUMBER, ";A$;", WAS ";K 190 PRINT 195 PRINT "AND YOURS, ";B$;", WAS ";L 200 PRINT ,"ANOTHER TRY??" 205 INPUT Z$ 210 CLS 215 IF Z$="YES" THEN GOTO 65 220 PRINT "OK, ";A$;" AND ";B$;", THANKS" 225 PRINT "FOR PLAYING..GOOD-BYE" 240 PAUSE 150 250 CLS 260 RETURN 290 SAVE "1004%8" 300 RUN