1<CsoundSynthesizer>
2
3<CsOptions>
4--env:SSDIR+=../SourceMaterials -odac ; activates real time sound output
5</CsOptions>
6
7<CsInstruments>
8; Example by Iain McCurdy
9
10sr = 44100
11ksmps = 32
12nchnls = 1
130dbfs = 1
14
15  instr 1
16        prints       "reson%n"          ; indicate filter type in console
17aSig    vco2         0.5, 150           ; input signal: sawtooth waveform
18kcf     expon        20,p3,10000        ; rising cutoff frequency
19aSig    reson        aSig,kcf,kcf*0.1,1 ; filter audio signal
20        out          aSig               ; send filtered audio to output
21  endin
22
23  instr 2
24        prints       "butbp%n"          ; indicate filter type in console
25aSig    vco2         0.5, 150           ; input signal: sawtooth waveform
26kcf     expon        20,p3,10000        ; rising cutoff frequency
27aSig    butbp        aSig, kcf, kcf*0.1 ; filter audio signal
28        out          aSig               ; send filtered audio to output
29  endin
30
31  instr 3
32        prints       "reson%n"          ; indicate filter type in console
33aSig    pinkish      0.5                ; input signal: pink noise
34kbw     expon        10000,p3,8         ; contracting bandwidth
35aSig    reson        aSig, 5000, kbw, 2 ; filter audio signal
36        out          aSig               ; send filtered audio to output
37  endin
38
39  instr 4
40        prints       "butbp%n"          ; indicate filter type in console
41aSig    pinkish      0.5                ; input signal: pink noise
42kbw     expon        10000,p3,8         ; contracting bandwidth
43aSig    butbp        aSig, 5000, kbw    ; filter audio signal
44        out          aSig               ; send filtered audio to output
45  endin
46
47</CsInstruments>
48
49<CsScore>
50i 1 0  3 ; reson - cutoff frequency rising
51i 2 4  3 ; butbp - cutoff frequency rising
52i 3 8  6 ; reson - bandwidth increasing
53i 4 15 6 ; butbp - bandwidth increasing
54e
55</CsScore>
56
57</CsoundSynthesizer>
58