1 rem cool world
2 rem infinite lives, energy by waz
3 rem cassette -v1- commodore format
4 for x=271 to 335:read y:c=c+y:poke x,y:next
5 if c<>7077 then print "data error":end
6 input "infinite lives y/n";a$:if a$="n" then poke 314,206
7 input "infinite energy y/n";b$:if b$="n" then poke 319,1
8 input "1 min per level y/n";c$:if c$="n" then poke 324,5
9 poke 157,128:sys 271
10 data 032,086,245,169,032,141,084,003
11 data 169,001,141,086,003,096,087,065
12 data 090,072,169,032,141,203,005,169
13 data 053,141,204,005,169,001,141,205
14 data 005,104,173,032,208,096,072,238
15 data 032,208,169,173,141,073,155,169
16 data 000,141,046,155,169,001,141,070
17 data 074,141,068,170,104,173,032,208
18 data 096
Download PRG...