A dodge and run game. Use 7 key to jump.
PROG : 16509
D-FILE: 17703
VARS : 18496
E-LINE: 18497
STKBOT: 18497
STKEND: 18497
9999 means line number
PRINT means treat as KEYWORD P
10 REM **BOLDER**SLR/1985*****
20 LET S=0
30 PRINT AT 10,0;"
"
40 PRINT AT 3,10;"BOLDER";AT 4
,10;"ú!!!!ú"
50 PRINT AT 20,0;"USE ""7"" TO
JUMP. GOOD LUCK****"
60 LET L=0
70 LET L1=1
80 LET SP=1
90 LET X=9
100 LET L=L+1
110 PRINT AT 5,0;"LEVEL ";L;" N
OW GOING"
120 LET A$="XO¶ö!¸ZN+*±²÷´TH Q0
³óñ·ôòõµLAST*"(L1)
130 FOR I=30 TO 6 STEP -1
140 LET G=(7)+(2 AND RND>.5)
150 FOR F=1 TO 31 STEP SP
160 PRINT AT 6,I;" ";AT 7,I;"
";AT 8,I;" ";AT 9,I;" ";AT X-
1,I;"± ";AT X,I;"µ ";AT G,F;A$
170 IF F>=I THEN GOTO 210
180 LET S=S+1
190 LET X=X+(2 AND X=7)-(1 AND
INKEY$="7" AND X=9)-(1 AND X=8)
195 PRINT AT G,F;" "
200 NEXT F
210 IF X=G OR X-1=G THEN GOTO 4
00
215 LET X=X+(2 AND X=7)-(1 AND
INKEY$="7" AND X=9)-(1 AND X=8)
220 LET S=S+L
225 PRINT AT G,F;" "
230 NEXT I
240 LET SP=SP+(SP<6)
250 LET L1=L1+1
260 IF L1=33 THEN LET L=1
270 GOTO 100
400 CLS
410 PRINT "YOU GOT HIT BY A BOL
DER AND DIED ú!!
!!ú"
420 PRINT AT 5,0;"FINAL LEVEL:"
;L
430 PRINT ,,"FINAL SCORE:";S
440 PRINT ,,,,
450 FOR A=1 TO 32*11
460 PRINT A$;
470 NEXT A
480 PAUSE 4E4
485 CLS
490 RUN
500 CLS
510 CLEAR
520 SAVE "BOLDER"
530 RUN