home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1987 October
/
1987-10.d64
/
animator.note
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
595b
|
15 lines
10 poke 53280,6:poke 53281,6:poke 646,0
20 print"[147]animator booter is a sub-routine that"
30 print"loads files created by the animator. for";
40 print"instructions on how to use this program"
50 print"please consult the animator article in"
60 print"the magazine. the file is saved with"
70 print"the name "chr$(34)"animator booter"chr$(34)".[155]"
80 ford=1to40:print"[164]";:next
90 print"[155] 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