home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1985 September
/
1985-09.d64
/
glissando
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
483b
|
12 lines
5 print"[147]
10 [129]t[178]54272[164]54295:[151]t,0:[130]:[151]54296,15
20 a[178]15:d[178]107:[143] adsr values to be poked into envelope registers next line
30 [151]54277,a:[151]54284,a:[151]54291,a:[151]54278,d:[151]54285,d:[151]54292,d
40 [151]54286,50:[151]54287,40:[143] carefully chosen frequencies for voice 3
50 [151]54276,33:[151]54283,23:[151]54290,23:[143] turns on all three voices
60 [129]f1[178]10[164]50[169]1:[151]54273,f1:[143] voice 1 frequencies
70 [129]f2[178]30[164]1[169][171]5:[151]54280,f2:[143] voice 2 frequencies
75 [130]f2:[130]f1
80 [151]54276,32:[151]54283,32:[151]54290,32:[143] turns voices off
90 [155]10[171]80