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
49
50
51
52
53
54
55
56
57
|
{\rtf1\mac\ansicpg10000\cocoartf102
{\fonttbl\f0\fnil\fcharset77 Monaco;}
{\colortbl;\red255\green255\blue255;\red0\green0\blue191;\red96\green96\blue96;}
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\f0\fs18 \cf0 (\
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\cf2 SynthDef\cf0 (\cf3 "help-busGating"\cf0 , \
\{ arg freq=700, out=0;\
\cf2 Out\cf0 .ar(out, \
\cf2 SinOsc\cf0 .ar(freq, 0, 0.1)\
)\
\}).load(s);\
)\
\
a = Bus.control(s,2);\
s.notify(true);\
\
c = Synth("\cf3 help-busGating", [\\out, 1]);\
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\cf0 d = Synth("\cf3 help-busGating", [\\out, 0]);\cf0 \
\
c.map(\\freq, a.index);\
d.map(\\freq, a.index+1);\
\
a.value = 300;\
\
a.gate(1000, 0.1);\
a.gate(400, 0.1);\
a.line(rrand(800.0,300), 2);\
\
\
\
(\
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\cf2 SynthDef\cf0 (\cf3 "help-busGating"\cf0 , \
\{ arg freq=700, out=0, in=0;\
\cf2 Out\cf0 .ar(out, \
\cf2 SinOsc\cf0 .ar(In.ar(in), 0, 0.1)\
)\
\}).load(s);\
)\
\
a = Bus.audio(s,2);\
s.notify(true);\
\
c = Synth("\cf3 help-busGating", [\\out, 1, \\in, \cf0 a.index\cf3 ]);\
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\cf0 d = Synth("\cf3 help-busGating", [\\out, 0, \\in, \cf0 a.index+1\cf3 ]);\cf0 \
\
\
a.gate(1000, 0.1);\
a.gate(400, 0.1);\
a.line(rrand(800.0,300), 2);\
a.xline(rrand(800.0,300), 2);\
\
}
|
