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
|
{\rtf1\mac\ansicpg10000\cocoartf102
{\fonttbl\f0\fnil\fcharset77 Monaco;}
{\colortbl;\red255\green255\blue255;}
\pard\tx560\tx1120\tx1680\tx2240\tx2800\tx3360\tx3920\tx4480\tx5040\tx5600\tx6160\tx6720\ql\qnatural
\f0\fs18 \cf0 s.boot;\
\
SynthDef("sine", \{ arg freq=900;Out.ar(0,SinOsc.ar(freq,0,0.1)) \}).load(s);\
\
a = Synth("sine", [\\freq, rrand(600, 300)]);\
a.free;\
\
g = Group(s);\
a = Synth("sine", [\\freq, rrand(600, 300)], g);\
\
a = Synth("sine", [\\freq, rrand(600, 300)], a, \\addReplace);\
a.free;\
\
z = Group(g, \\addReplace);\
a = Synth("sine", [\\freq, rrand(600, 300)], z);\
\
\
k = Group.replace(z);\
a = Synth.head(k, "sine", [\\freq, rrand(600, 300)]);\
\
a.free;\
\
\
////////////messages\
\
\
a = Synth.prNew("sine",s);\
a.newMsg;\
a.newMsg(k, \\addAfter);\
a.getMsg("/n_run", 1);\
\
l = List.new;\
a = Synth.newToBundle(l, "sine");\
a.msgToBundle(l, "/n_run", 1);\
a.msgToBundle(l, "/n_set", [\\freq, 700, \\gg, 900])\
s.listSendBundle(nil, l);\
\
}
|
