1 rem antifriction
2 rem infinite lives & no collision by waz
3 rem cassette -v1- commodore format
4 for x=516 to 556:read y:c=c+y:poke x,y:next
5 if c<>4116 then print "data error":end
6 input "infinite lives y/n";a$:if a$="n" then poke 545,206
7 input "no collisions y/n";b$:if b$="n" then poke 550,173
8 poke 157,128:sys 516
9 data 032,086,245,169,019,141,207,003
10 data 206,208,003,096,087,065,090,169
11 data 032,141,175,008,169,002,141,176
12 data 008,076,230,003,169,173,141,041
13 data 027,169,096,141,061,026,076,001
14 data 008
Download PRG...
