home *** CD-ROM | disk | FTP | other *** search
- 10 poke 53280,11:poke 53281,11
- 20 print"[147][155]'";:print"[144]dazzler.main[155]' is the file that contains";
- 25 print"the main dazzler routine. this program"
- 30 print"cannot be run - it is to be used with"
- 35 print"your own subroutines. for details on"
- 40 print"constructing subroutines for dazzlers,"
- 45 print"consult the article."
- 50 print"five example dazzlers are included on"
- 55 print"this disk. dazzler 1-5 can be run from"
- 60 print"the menu."
- 90 print" [144]press any key to reload the menu[146]"
- 100 poke198,0:wait198,1:getdh$
- 110 print"[147]":s$="l[207]"+chr$(34)+"mn"+chr$(34)+",8:"+chr$(131)
- 120 fori=1tolen(s$):poke630+i,asc(mid$(s$,i)):next:poke198,i
- 130 poke53281,15:poke53280,15
- 140 printchr$(142)"[145] reloading the menu[155]":end
-