62 lines
777 B
Plaintext
62 lines
777 B
Plaintext
10 T=0
|
|||
|
|
20 L=0
|
||
|
|
30 ?="DON'T LOSE YOUR 'AT'"
|
||
|
|
40 X='/9*0+%+1
|
||
|
|
50 Y='/9*0+%+1
|
||
|
|
60 #=X=Y*40
|
||
|
|
70 Z='/9*0+%+1
|
||
|
|
80 #=X=Z*40
|
||
|
|
90 #=Y=Z*40
|
||
|
|
100 ?="I'VE GOT A NUMBER."
|
||
|
|
105 L=L+1
|
||
|
|
110 P=10000
|
||
|
|
120 ?=""
|
||
|
|
130 ?="YOU HAVE ";
|
||
|
|
140 ?=P/100
|
||
|
|
150 ?=".";
|
||
|
|
160 ?=%/10
|
||
|
|
170 ?=%
|
||
|
|
180 ?=" POINTS LEFT"
|
||
|
|
190 ?=""
|
||
|
|
200 ?="WHAT'S YOUR GUESS? -- ";
|
||
|
|
210 G=?
|
||
|
|
220 A=G/100
|
||
|
|
230 B=%/10
|
||
|
|
240 C=%
|
||
|
|
260 S=600
|
||
|
|
270 #=A=Y*S
|
||
|
|
280 #=A=Z*S
|
||
|
|
290 #=B=X*S
|
||
|
|
300 #=B=Z*S
|
||
|
|
310 #=C=X*S
|
||
|
|
320 #=C=Y*S
|
||
|
|
330 K=0
|
||
|
|
340 S=620
|
||
|
|
350 #=A=X*S
|
||
|
|
360 #=B=Y*S
|
||
|
|
370 #=C=Z*S
|
||
|
|
380 #=K<3*580
|
||
|
|
390 ?=""
|
||
|
|
400 ?="YOU WIN ";
|
||
|
|
410 ?=P/100
|
||
|
|
420 ?=".";
|
||
|
|
430 ?=%/10
|
||
|
|
440 ?=%
|
||
|
|
450 ?=" POINTS FOR A TOTAL OF ";
|
||
|
|
460 T=T+P
|
||
|
|
490 ?=T/100
|
||
|
|
500 ?=".";
|
||
|
|
510 ?=%/10
|
||
|
|
520 ?=%
|
||
|
|
540 ?=" POINTS IN ";
|
||
|
|
550 ?=L
|
||
|
|
560 ?=" GAMES."
|
||
|
|
570 #=30
|
||
|
|
580 P=P/20*19
|
||
|
|
590 #=120
|
||
|
|
600 ?="IT ";
|
||
|
|
610 #=!
|
||
|
|
620 ?="AT ";
|
||
|
|
630 K=K+1
|
||
|
|
640 #=!
|