1 rem synetic (cyber systems)
2 rem infinite lives by waz
3 rem disk -v1- zzap no.107
4 for wa=679 to 737:read z:c=c+z:poke wa,z:next
5 if c<>6516 then print "error": end
6 print chr$(147);"insert synetic disk and press space"
7 poke 198,0:wait 198,1:sys679
10 data 169,001,168,162,008,032,186,255
11 data 169,010,162,216,160,002,032,189
12 data 255,169,000,032,213,255,162,000
13 data 189,205,002,157,027,009,232,224
14 data 011,208,245,076,018,008,169,044
15 data 141,214,079,141,230,082,076,013
16 data 008,083,089,078,069,084,073,067
17 data 045,071,042
Download PRG...
