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
38
39
40
41
42
43
44
45
46
47
48
|
<programlisting>
<emphasis role="csdtag"><CsoundSynthesizer></emphasis>
<emphasis role="csdtag"><CsOptions></emphasis>
<emphasis role="comment">; Select audio/midi flags here according to platform</emphasis>
<emphasis role="comment">; Audio out Audio in No messages</emphasis>
-odac -iadc -d -M0 <emphasis role="comment">;;;RT audio I/O, midi in</emphasis>
<emphasis role="comment">; For Non-realtime ouput leave only the line below:</emphasis>
<emphasis role="comment">; -o sflooper.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> 100
<emphasis role="ohdr">nchnls</emphasis> <emphasis role="op">=</emphasis> 2
isf <emphasis role="opc">sfload</emphasis> "<emphasis role="op">/</emphasis>home<emphasis role="op">/</emphasis>menno<emphasis role="op">/</emphasis>CVS<emphasis role="op">/</emphasis>manual<emphasis role="op">/</emphasis>examples<emphasis role="op">/</emphasis>07AcousticGuitar.sf2"
<emphasis role="opc">sfilist</emphasis> isf
<emphasis role="opc">sfplist</emphasis> isf
<emphasis role="opc">sfpassign</emphasis> 0, isf
<emphasis role="oblock">instr</emphasis> 1
<emphasis role="comment">; play from score and midi keyboard</emphasis>
<emphasis role="opc">mididefault</emphasis> 60, p3
<emphasis role="opc">midinoteonkey</emphasis> p4, p5
inum <emphasis role="opc">init</emphasis> p4
ivel <emphasis role="opc">init</emphasis> p5
<emphasis role="opc">print</emphasis> ivel
ivel <emphasis role="opc">init</emphasis> 3<emphasis role="op">*</emphasis>(ivel<emphasis role="op">/</emphasis>127) <emphasis role="comment">; pre-amplify</emphasis>
kamp <emphasis role="opc">linsegr</emphasis> 1,1,1,.1,0
kfreq <emphasis role="opc">init</emphasis> 1 <emphasis role="comment">;do not change freq from sf</emphasis>
<emphasis role="comment">; ivel, inum, kamp ,kfreq, ind,loopstrt,loopend,xfade, ifn</emphasis>
a1,a2 <emphasis role="opc">sflooper</emphasis> ivel, inum, kamp<emphasis role="op">*</emphasis>ivel, kfreq, 0, 0, .3, .5, 0
<emphasis role="opc">outs</emphasis> a1, a2
<emphasis role="oblock">endin</emphasis>
<emphasis role="csdtag"></CsInstruments></emphasis>
<emphasis role="csdtag"><CsScore></emphasis>
<emphasis role="stamnt">f</emphasis>0 60 <emphasis role="comment">; stay active for 1 minute</emphasis>
<emphasis role="stamnt">i</emphasis>1 0 1 60 100
<emphasis role="stamnt">i</emphasis>1 + 1 62 <
<emphasis role="stamnt">i</emphasis>1 + 1 65 <
<emphasis role="stamnt">i</emphasis>1 + 1 69 10
<emphasis role="csdtag"></CsScore></emphasis>
<emphasis role="csdtag"></CsoundSynthesizer></emphasis>
</programlisting>
|