Vindicators

1 DATA 21,23,41,36,c3,23
20 DATA 36,0e,23,36,be,c3
3f DATA 00, 40, ie,3e,32,72
5 DATA 2D,3E,C9,32,58,06
( DATA C2,00,04
MEMORY 43000:Y=0
70 FOR X=4BE00 TO 4BE1A
80 READ A$:A=VAL("4"+A$)
990 < POKE X,A:Y=Y+A:NEXT
110 LOAD"VIND"
120 CALL 4BE00

1 'WEAKER OPPONENTS
2 'by Phil Howard, AA48
3 'INFINITE LIVES
4 •
5 'REAL GHOST BUSTERS
6
7 DATA 21,09,be,22,4£,30
8 DATA c3,00,30,af,32,be
9 DATA 65,c3,80,4e
10 MEMORY 42000:y=0
11 FOR x=4BE00 TO 4BE0F
12 READ a$:a=VAL("4"+a$)
13 y=y+a:POKE x,a:NEXT
14 IF yO460F THEN 110
15 LOAD"RGB"
16 CALL &BE00