1 'AFTERBURNER hacks
2 'By John Girvin
3 'April 1989
4 '
10 MODE 1:MEMORY &99C4
20 LOAD "!afterbnr",&99C5
30 RESTORE:addr=&BE80
40 READ byte$
50 IF byte$="AFTERBURNER" THEN GOTO 90
60 POKE addr,VAL("&"+byte$)
70 addr=addr+1
80 GOTO 40
90 CALL &BE80
100 '*** LEAVE 110-180 IN ***
110 DATA 3e,c3,21,8e,be,32,16,bd
120 DATA 22,17,bd,c3,c5,99,cd,37
130 DATA bd,21,00,00,22,4b,a6,21
140 DATA a0,be,22,4e,a6,c3,08,a6
150 DATA dd,21,b8,a8,11,ab,00,cd
160 DATA 47,a8,21,c0,be,22,61,a9
170 DATA c3,e2,a8,dd,cb,07,ae,c3
180 DATA 9f,21,3e,32,32,a4,47,c9
190 'Infinite lives
200 DATA 21,00,00,22,a7,20,22,a8
210 DATA 20
220 'Infinite missiles
230 DATA 21,ba,be,11,63,27,01,06
240 DATA 00,ed,b0
250 'Invulnerability
260 DATA 21,b3,be,11,24,20,01,07
270 DATA 00,ed,b0
280 '*** LEAVE 290-300 IN ***
290 DATA a4,48,4c,46,04,89,c3,00
300 DATA 46,AFTERBURNER