home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1988 March
/
1988-03.d64
/
music.note
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
592b
|
15 lines
10 poke 53280,4:poke 53281,4
20 print"[147][144]a music demo program is included on this";
30 print"disk. the filename is [155]fur elise.demo[144]."
40 print"to hear the demo, first load and run the";
50 print"basically music program, then load and"
60 print"run the demo file. please consult the"
70 print"article for more detailed instructions.[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