1 rem strike force harrier (mirrorsoft)
2 rem infinite fuel, chaffs, and ammo by waz
3 rem cassette -v1- commodore format
4 for x=516 to 561:read y:c=c+y:poke x,y:next
5 if c<>4602 then print "data error":end
6 for i=1 to 3:read w$,w:print "infinite ";w$;:input x$
7 if x$="n" then poke 540+(5*1),w
8 next i:poke 157,128:sys 516
10 data 032,086,245,169,019,141,207,003
11 data 206,208,003,096,087,065,090,169
12 data 032,141,013,010,169,002,141,014
13 data 010,076,230,003,169,000,141,173
14 data 038,169,096,141,224,040,169,173
15 data 141,112,038,076,027,008
16 data ammo,8,fuel,206,chaff,206
Download PRG...