1 rem nobby the aardvark
2 rem infinite lives & level select by waz
3 rem disk -v1- commodore format
4 for x=272 to 331:read y:c=c+y:poke x,y:next
5 if c<>6981 then print "data error":end
6 input "enter level 2-8";a: if a<2 or a>8 then 6
7 poke 315,(a*2)-1
8 print chr$(147);"insert disk & press a key"
9 poke 198,0:wait 198,1:sys 272
10 data 160,001,152,162,008,032,186,255
11 data 169,004,162,051,160,001,032,189
12 data 255,169,000,032,213,255,169,058
13 data 141,067,008,169,001,141,068,008
14 data 076,011,008,066,079,079,084,087
15 data 065,090,169,015,141,240,255,169
16 data 099,141,241,255,169,000,141,244
17 data 255,076,000,248
Download PRG...