1 'DAN DARE II hacks
2 'By John Girvin
3 'April 1989
4 '
10 OPENOUT "d":MEMORY &321A:CLOSEOUT
20 MODE 0:LOAD"!",&321B
30 RESTORE:addr=&40
40 READ byte$
50 IF byte$="MEKON" THEN CALL &40
60 POKE addr,VAL("&"+byte$)
70 addr=addr+1
80 GOTO 40
90 DATA 2a,0f,bc,22,1d,bd,3e,c3
100 DATA 21,54,00,32,0e,bc,22,0f
110 DATA bc,c3,1e,32,af,cd,1c,bd
120 DATA 3a,9a,00,3c,32,9a,00,fe
130 DATA 02,c0,21,69,00,22,5e,34
140 DATA c9,dd,21,5b,ab,11,00,01
150 DATA cd,ea,aa,21,7c,00,22,fd
160 DATA ab,c3,85,ab,21,00,00,22
170 DATA 0f,9a,22,16,9a,22,1b,9a
180 DATA 3e,18,32,25,9a,af,32,91
190 DATA 7b,a4,48,4c,46,04,89,c3
200 DATA c0,72,00,MEKON