1 rem jocky wilson's darts (zeppelin)
2 rem infinite time $ no win 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<>3825 then print "data error": end
6 input "infinite time y/n";a$: if a$="n" then poke 545,1
7 input "no win for c64/pl2 y/n";b$: if b$="n" then poke 550,248
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,013,010,169,002,141,014
12 data 010,076,230,003,169,000,141,108
13 data 106,169,096,141,012,105,076,027
14 data 008
Download PRG...