1 'DOMINATOR hacks
2 'By John Girvin
3 'October 1989
4 '
10 MODE 0:OPENOUT"d"
20 MEMORY &6A9D:CLOSEOUT
30 LOAD"!dom",&6A9E
40 addr=&BE80:RESTORE
50 READ byte$
60 IF byte$="INDIGESTION" THEN CALL &BE80
70 POKE addr,VAL("&"+byte$)
80 addr=addr+1:GOTO 50
90 '*** LEAVE 100-180 IN ***
100 DATA 21,9e,6a,11,9e,9a,01,44
110 DATA 0f,ed,b0,3e,c3,21,99,be
120 DATA 32,16,bd,22,17,bd,c3,9e
130 DATA 9a,cd,37,bd,21,00,00,22
140 DATA 4b,a6,21,b1,be,22,4e,a6
150 DATA c3,08,a6,a4,48,4c,46,0a
160 DATA 89,dd,21,b8,a8,11,ab,00
170 DATA cd,47,a8,21,c4,be,22,61
180 DATA a9,c3,e2,a8
190 'Inf. lives
200 DATA af,32,36,07
210 'Invulnerability
220 DATA 3e,c3,32,18,24
230 'No flying bad guys
240 DATA 3e,c9,32,d4,18
250 'No bad guys on walls
260 DATA 3e,c9,32,b4,1c
270 '*** LEAVE 280 IN ***
280 DATA c3,00,05,INDIGESTION