;------------------
; am.orc
;------------------
;=====================================
sr = 44100
kr = 4410
ksmps = 10
nchnls = 1
massign 1,1201
instr 1201
; p4 = modulation index (mi)
; p5 = modulator frequency (fm)
; p6 = carrier amplitude (ac)
; p7 = carrier frequency (fc)
ipch cpsmidi
iamp ampmidi 3200
iamp2 midic7 7, 0, 128
am = 10000 ; MODULATOR AMPLITUDE (am)
kenv linsegr iamp2*iamp,.01,1,.1, 0
amod oscili am,ipch,1
acar oscili amod,ipch,1
out acar*kenv
endin
;=====================================
;-------------------
;1201.sco
;-------------------
f 1 0 4096 10 1
;-------------------
;pfields:
;p4 = modulation index (mi)
;p5 = modulator frequency (fm)
;p6 = carrier amplitude (ac)
;p7 = carrier frequency (fc)
;-------------------
f0 666
905
61
399
502
true
231
46
255
slider1
5
5
20
100
{eb304083-95d0-44ff-9de9-1c0d169b6259}
true
0
-3
0.00000000
1.00000000
0.00000000
lin
continuous
-1.00000000
false
Version: 3
Render: Real
Ask: Yes
Functions: ioObject
Listing: Window
WindowBounds: 905 61 399 502
CurrentView: io
IOViewEdit: On
Options:
ioView nobackground {59367, 11822, 65535}
ioSlider {5, 5} {20, 100} 0.000000 1.000000 0.000000 slider1