1 rem slap fight (imagine/hit squad)
2 rem infinite lives
3 rem cassette -v1- commodore format
4 for x=512 to 533: read y:c=c+y: poke x,y:next
5 for x=820 to 827: read y:c=c+y: poke x,y:next
6 if c<>4042 then print "data error":end
7 poke 157,128:sys 512
8 data 198,157,169,000,162,001,168,032
9 data 186,255,032,189,255,032,213,255
10 data 169,196,141,199,003,096,169,044
11 data 141,255,039,076,207,003
Download PRG...