1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
|
<CsoundSynthesizer>
<CsOptions>
; Select audio/midi flags here according to platform
-odac ;;;realtime audio out
;-iadc ;;;uncomment -iadc if realtime audio input is needed too
; For Non-realtime ouput leave only the line below:
; -o looptseg.wav -W ;;; for file output any platform
</CsOptions>
<CsInstruments>
sr = 44100
ksmps = 32
nchnls = 2
0dbfs = 1
instr 1
kfreq = 1 ; frequency of loop repetition
ktrig init 0 ; loop restart trigger (not used)
iphase = 0 ; initial phase
ktyp line 6,p3,-6 ; explore the useful range of curve types
; loop of filter cutoff values (oct format)
; value curve dur.
kcfoct looptseg kfreq, ktrig, iphase,13, ktyp, 1, \
4, ktyp, 0, \
11, ktyp, 1, \
4
asig vco2 0.2,cpsmidinn(48),0 ; a sawtooth
asig moogladder asig,cpsoct(kcfoct),rnd(0.6) ; filter sawtooth
outs asig, asig
endin
</CsInstruments>
<CsScore>
i 1 0 12
e
</CsScore>
</CsoundSynthesizer>
|