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
|
<programlisting>
<emphasis role="csdtag"><CsoundSynthesizer></emphasis>
<emphasis role="csdtag"><CsOptions></emphasis>
<emphasis role="comment">; Select audio/midi flags here according to platform</emphasis>
-odac -idac <emphasis role="comment">;;;realtime audio I/O</emphasis>
<emphasis role="comment">; For Non-realtime ouput leave only the line below:</emphasis>
<emphasis role="comment">; ins.wav -W ;;; for file output any platform</emphasis>
<emphasis role="csdtag"></CsOptions></emphasis>
<emphasis role="csdtag"><CsInstruments></emphasis>
<emphasis role="ohdr">sr</emphasis> <emphasis role="op">=</emphasis> 44100
<emphasis role="ohdr">ksmps</emphasis> <emphasis role="op">=</emphasis> 32
<emphasis role="ohdr">nchnls</emphasis> <emphasis role="op">=</emphasis> 2 <emphasis role="comment">;two channels out</emphasis>
<emphasis role="ohdr">0dbfs</emphasis> <emphasis role="op">=</emphasis> 1
<emphasis role="oblock">instr</emphasis> 1
ain1, ainr <emphasis role="opc">ins</emphasis> <emphasis role="comment">;grab your mic and sing</emphasis>
adel <emphasis role="opc">linseg</emphasis> 0, p3<emphasis role="op">*</emphasis>.5, 0.02, p3<emphasis role="op">*</emphasis>.5, 0 <emphasis role="comment">;max delay time = 20ms</emphasis>
aoutl <emphasis role="opc">flanger</emphasis> ain1, adel, .7
aoutr <emphasis role="opc">flanger</emphasis> ain1, adel<emphasis role="op">*</emphasis>2, .8
<emphasis role="opc">fout</emphasis> "in_s.wav", 14, aoutl, aoutr <emphasis role="comment">;write to stereo file,</emphasis>
<emphasis role="opc">outs</emphasis> aoutl, aoutr <emphasis role="comment">;16 bits with header</emphasis>
<emphasis role="oblock">endin</emphasis>
<emphasis role="csdtag"></CsInstruments></emphasis>
<emphasis role="csdtag"><CsScore></emphasis>
<emphasis role="stamnt">i</emphasis> 1 0 10
<emphasis role="stamnt">e</emphasis>
<emphasis role="csdtag"></CsScore></emphasis>
<emphasis role="csdtag"></CsoundSynthesizer></emphasis>
</programlisting>
|
