44100
1
2
44100
1
2
true
false
false
false
true
true
true
true
false
false
true
true
true
true
false
false
0
false
Vox Continental
gisine ftgen 0, 0, 65537, 10, 1
ipch = (p4 < 20) ? cpspch(p4) : p4
iamp = ampdbfs(p5)
print iamp
kbar16 = <bar16> / 8
kbar8 = <bar8> / 8
kbar4 = <bar4> / 8
kbarmix = <barIV> / 8
kfundamental = <fundamental> / 8
kreedStart = <reed>
kreed = kreedStart / 8
kreedFilterAdd = kreedStart * ipch * .8
; Bar 16'
asine1 oscil3 kbar16, ipch * .5, gisine
areed1 vco2 kbar16, ipch * .5
areed1 butterlp areed1, ipch + kreedFilterAdd
; Bar 8'
asine2 oscil3 kbar8, ipch, gisine
areed2 vco2 kbar8, ipch
areed2 butterlp areed2, ipch + kreedFilterAdd
; Bar 4'
asine3 oscil3 kbar4, ipch * 2, gisine
areed3 vco2 kbar4, ipch * 2
areed3 butterlp areed3, ipch + kreedFilterAdd
; Bar IV (2-2/3', 2', 1-3/5' and 1')
asine4 oscil3 kbarmix, ipch * 3, gisine
areed4 vco2 kbarmix, ipch * 3
areed4 butterlp areed4, ipch + kreedFilterAdd
asine5 oscil3 kbarmix, ipch * 4, gisine
areed5 vco2 kbarmix, ipch * 4
areed5 butterlp areed5, ipch + kreedFilterAdd
asine6 oscil3 kbarmix, ipch * 5, gisine
areed6 vco2 kbarmix, ipch * 5
areed6 butterlp areed6, ipch + kreedFilterAdd
asine7 oscil3 kbarmix, ipch * 8, gisine
areed7 vco2 kbarmix, ipch * 8
areed7 butterlp areed7, ipch + kreedFilterAdd
aiv sum asine4, areed4, asine5, areed5, asine6, areed6, asine7, areed7
aiv = aiv / 8
aout sum asine1, areed1, asine2, areed2, asine3, areed3, aiv
aout = aout / 7
kenv linsegr 0, .05, 1, .05, .9, .2, 0
aout = aout * iamp * kenv
outs aout, aout
barIV
178
43
true
0.0
8.0
1.0
5.0
150
true
bar4
125
43
true
0.0
8.0
1.0
8.0
150
true
bar8
71
42
true
0.0
8.0
1.0
5.0
150
true
188
226
144
226
91
225
bar16
18
42
true
0.0
8.0
1.0
8.0
150
true
34
225
reed
300
44
true
0.0
8.0
1.0
8.0
150
true
fundamental
245
44
true
0.0
8.0
1.0
8.0
150
true
308
227
264
227
false
0.0
1
Master
0.0
false
false
Master
Master
0.0
false
false
0dbfs=1
csound -Wdo devaudio -L stdin
false
false
-1
-1
2.0
0.0
GenericScore
-12566464
2
i1 0 2 3 4 5
2.0
0.0
root
-10066279
0
true
64
0
false
1.0
0
5
2.0
0.0
GenericScore
-12566464
0
i1 0 .5 8.00 -12
i1 + . 8.03 .
i1 + . 8.07 .
i1 + . 8.10 .
i1 + . 9.00 .
true
0.0
-1.0
false
false
false
PCH
CONSTANT
-12
12TET
261.62558
2.0
1.0
1.0594631
1.122462
1.1892071
1.2599211
1.3348398
1.4142135
1.4983071
1.587401
1.6817929
1.7817974
1.8877486