|
eMail Me
Note: You must add uk to the end of the address, it's to help prevent spam.
|
Armalyte
Thalamus, 1988
|
 |
Action Replay Code:
POKE 59891,173 - Lives
Listing Cheat:
1 rem armalyte (1)
2 rem infinite lives
3 rem cassette -v1- commodore format
4 FOR X=543 TO 631:READ Y:C=C+Y:POKE X,Y:NEXT
5 IF C10399 THEN PRINT "DATA ERROR":END
6 POKE 157,128:SYS 543
7 DATA 032,044,247,056,169,021,141,177
8 DATA 003,169,055,141,178,003,169,106
9 DATA 141,179,003,032,108,245,169,067
10 DATA 141,039,192,169,002,141,044,192
11 DATA 032,191,003,096,072,169,234,141
12 DATA 160,001,169,076,141,161,001,169
13 DATA 092,141,162,001,169,002,141,163
14 DATA 001,104,076,226,193,162,012,189
15 DATA 106,002,157,126,008,202,016,247
16 DATA 076,027,008,169,173,141,087,234
17 DATA 141,243,233,169,096,141,125,247
18 DATA 000
Download PRG...
|
1 rem armalyte (2)
2 rem infinite lives
3 rem cassette -v1- commodore format
10 printchr$(147)
20 fori=543to631:reada$
30 l=asc(left$(a$,1)):l=l-55:ifl<5thenl=l+7
40 r=asc(right$(a$,1)):r=r-55:ifr<5thenr=r+7
50 v=(l*16)+r:c=c+v: pokei,v:next
60 print"insert armalyte cassette and..."
70 sys543
100 data 20,2c,f7,38,a9,15,8d,b1,03,a9
110 data 37,8d,b2,03,a9,6a,8d,b3,03,20
120 data 6c,f5,a9,43,8d,27,c0,a9,02,8d
130 data 2c,c0,20,bf,03,60,48,a9,ea,8d
140 data a0,01,a9,4c,8d,a1,01,a9,5c,bd
150 data a2,01,a9,02,8d,a3,01,68,4c,e2
160 data c1,a2,0c,bd,6a,02,9d,7e,08,ca
170 data 10,f7,4c,1b,08,a9,ad,8d,57,ea
180 data 8d,f3,e9,a9,60,8d,7d,f7,00,00
Download PRG...
|
|
