1 :' 3D Star Fighter
2 :' Quattro Firepower
3 :'
4 :' by ANDY PRICE
5 :'
6 ùTAPE
10 FOR x=&BE00 TO &BE2B
20 READ cd$:cd=VAL("&"+cd$)
30 POKE x,cd:NEXT
40 DATA ed,5b,38,bd,e5
50 DATA ac,e1,ed,53,2d
60 DATA bd,ad,11,37,bd
70 DATA 3e,c3,12,13,3e
80 DATA 25,12,3e,be,13
90 DATA 12,21,40,00,e3
100 DATA 11,00,bb,00,c3
110 DATA 4a,3a,41,50,00
120 DATA af,32,3a,7f,32
130 DATA 15,7f,00,00,00
140 POKE &BE2C,&CF
150 MEMORY &2FFF:LOAD""
160 CALL &BE00

1 :' Mig 29 Soviet Fighter
2 :' Quattro Firepower
3 :'
4 :' by ANDY PRICE
5 :'
6 ùTAPE
10 DATA 2a,38,bd,e5,ac,e1
20 DATA 22,2b,be,ad,21,37
30 DATA bd,3e,c3,77,23,3e
40 DATA 23,77,3e,be,23,77
50 DATA 21,40,00,e3,11,00
60 DATA bb,00,c3,4a,3a,af
70 DATA 32,c8,08,32,f1,0c
80 DATA cf,00,00,00,00,00
90 FOR x=&BE00 TO &BE2C
100 READ a$:a=VAL("&"+a$)
110 POKE x,a:chk=chk+a:NEXT
120 IF chk<>&116D THEN 150
130 MEMORY &2FFF:LOAD""
140 CALL &BE00
150 PRINT"Error in poke"

1 :' Operation Gunship
2 :' Quattro Firepower
3 :'
4 :' by ANDY PRICE
5 :'
6 ùTAPE
10 DATA 2a,38,bd,e5,ac,e1
20 DATA 22,35,be,ad,21,37
30 DATA bd,3e,c3,77,23,3e
40 DATA 23,77,3e,be,23,77
50 DATA 21,40,00,e3,11,00
60 DATA bb,00,c3,4a,3a,af
70 DATA 32,9b,8e,32,5f,8d
80 DATA 32,53,8d,32,b1,85
90 DATA 3e,41,3e,50,cf,00
100 DATA 00,00,00,00,00,00
110 FOR x=&BE00 TO &BE36
120 READ a$:a=VAL("&"+a$)
130 POKE x,a:chk=chk+a:NEXT
140 IF chk<>&1546 THEN 170
150 MEMORY &2FFF:LOAD""
160 CALL &BE00
170 PRINT"Error in poke"