2
2
<emphasis role="csdtag"><CsoundSynthesizer></emphasis>
3
3
<emphasis role="csdtag"><CsOptions></emphasis>
4
4
<emphasis role="comment">; Select audio/midi flags here according to platform</emphasis>
5
<emphasis role="comment">; Audio out Audio in No messages</emphasis>
6
-odac -iadc -d <emphasis role="comment">;;;RT audio I/O</emphasis>
5
-odac <emphasis role="comment">;;;RT audio out</emphasis>
6
<emphasis role="comment">;-iadc ;;;uncomment -iadc if RT audio input is needed too</emphasis>
7
7
<emphasis role="comment">; For Non-realtime ouput leave only the line below:</emphasis>
8
8
<emphasis role="comment">; -o balance.wav -W ;;; for file output any platform</emphasis>
9
9
<emphasis role="csdtag"></CsOptions></emphasis>
10
10
<emphasis role="csdtag"><CsInstruments></emphasis>
12
<emphasis role="comment">; Initialize the global variables.</emphasis>
13
12
<emphasis role="ohdr">sr</emphasis> <emphasis role="op">=</emphasis> 44100
14
<emphasis role="ohdr">kr</emphasis> <emphasis role="op">=</emphasis> 4410
15
<emphasis role="ohdr">ksmps</emphasis> <emphasis role="op">=</emphasis> 10
16
<emphasis role="ohdr">nchnls</emphasis> <emphasis role="op">=</emphasis> 1
13
<emphasis role="ohdr">ksmps</emphasis> <emphasis role="op">=</emphasis> 32
14
<emphasis role="ohdr">nchnls</emphasis> <emphasis role="op">=</emphasis> 2
15
<emphasis role="ohdr">0dbfs</emphasis> <emphasis role="op">=</emphasis> 1
18
<emphasis role="comment">; Instrument #1.</emphasis>
19
17
<emphasis role="oblock">instr</emphasis> 1
20
<emphasis role="comment">; Generate a band-limited pulse train.</emphasis>
21
asrc <emphasis role="opc">buzz</emphasis> 30000, 440, <emphasis role="ohdr">sr</emphasis><emphasis role="op">/</emphasis>440, 1
23
<emphasis role="comment">; Send the source signal through 2 filters.</emphasis>
24
a1 <emphasis role="opc">reson</emphasis> asrc, 1000, 100
25
a2 <emphasis role="opc">reson</emphasis> a1, 3000, 500
27
<emphasis role="comment">; Balance the filtered signal with the source.</emphasis>
28
afin <emphasis role="opc">balance</emphasis> a2, asrc
30
<emphasis role="opc">out</emphasis> afin
18
<emphasis role="comment">; Generate a band-limited pulse train.</emphasis>
19
asrc <emphasis role="opc">buzz</emphasis> 0.9, 440, <emphasis role="ohdr">sr</emphasis><emphasis role="op">/</emphasis>440, 1
21
<emphasis role="comment">; Send the source signal through 2 filters.</emphasis>
22
a1 <emphasis role="opc">reson</emphasis> asrc, 1000, 100
23
a2 <emphasis role="opc">reson</emphasis> a1, 3000, 500
25
<emphasis role="comment">; Balance the filtered signal with the source.</emphasis>
26
afin <emphasis role="opc">balance</emphasis> a2, asrc
27
<emphasis role="opc">outs</emphasis> afin, afin
31
29
<emphasis role="oblock">endin</emphasis>
34
31
<emphasis role="csdtag"></CsInstruments></emphasis>
35
32
<emphasis role="csdtag"><CsScore></emphasis>
37
<emphasis role="comment">; Table #1, a sine wave.</emphasis>
33
<emphasis role="comment">;sine wave.</emphasis>
38
34
<emphasis role="stamnt">f</emphasis> 1 0 16384 10 1
40
<emphasis role="comment">; Play Instrument #1 for two seconds.</emphasis>
41
36
<emphasis role="stamnt">i</emphasis> 1 0 2
42
37
<emphasis role="stamnt">e</emphasis>
45
39
<emphasis role="csdtag"></CsScore></emphasis>
46
40
<emphasis role="csdtag"></CsoundSynthesizer></emphasis>
b'\\ No newline at end of file'