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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
+ Mix {
*ar { arg array;
^this.new(array);
}
*arFill { arg n,func;
^this.fill(n,func);
}
}
+ SimpleNumber {
// rgb() still will not work in variable declarations in classes
// because rgb is no longer a literal
// move them to init methods
rgb { arg green,blue;
^Color(this / 255.0,green / 255.0, blue / 255.0)
}
}
+ Synth {
*stop {
RootNode.new.freeAll;
}
*play { arg func;
Server.default.doWhenBooted({
func.play;
})
}
play {
//if not already playing, play
}
*sampleRate {
^Server.default.sampleRate ? Server.default.options.sampleRate ? 44100.0
}
}
+RawArray {
write { arg path;
var file;
file = File.new(path, "wb");
if (file.notNil, {
file.write(this);
if(file.length < this.size,{
Error("Write file failed !!!! " ++ path).throw;
});
file.close;
});
}
}
// The following interface in an optimized version of asControlInput that
// flattens arrayed values and marks the outermost array of a value with $[ and $]
// These Chars are turning into typetags ([ and ]) in the OSC message to mark that array
// Inner arrays are flattened (they are not meaningful in the server context)
// This makes it possible to write Synth("test", [0, [[100,200,300], [0.1,0.2,0.3], [10,20,30]] ])
// and have all the arguments be assigned to consecutive controls in the synth.
+Array {
asOSCArgBundle {
var array = Array(100); // allocate a bunch of space
this.do { | msg | array = array.add(msg.asOSCArgArray) };
^array
}
asOSCArgArray {
var array = Array(100); // allocate a bunch of space
this.do { | e | array = e.asOSCArgEmbeddedArray(array) };
^array
}
asOSCArgEmbeddedArray { | array|
array = array.add($[);
this.do{ | e | array = e.asOSCArgEmbeddedArray(array) };
array.add($]);
^array;
}
}
+Env {
asControlInput { ^this.asArray }
asOSCArgEmbeddedArray { | array| ^this.asArray.asOSCArgEmbeddedArray(array) }
}
+Object {
asOSCArgEmbeddedArray { | array| ^array.add(this.asControlInput) }
asOSCArgArray { ^this.asControlInput }
asOSCArgBundle { ^this.asControlInput }
asStringff { | size = 8 |
var str = this.asString;
str = str[0..size-1];
str = str ++ String.fill(size - str.size, Char.space);
^str;
}
postff { | size = 8 |
this.asStringff(size).post
}
}
+Nil {
asOSCArgArray {}
}
+Ref {
asOSCArgEmbeddedArray { | array| ^value.asOSCArgEmbeddedArray(array) }
}
+AbstractFunction {
eq { arg function, adverb; ^this.composeBinaryOp('==', function, adverb) }
//
ne { arg function, adverb; ^this.composeBinaryOp('!=', function, adverb) }
}
|
