1 <!DOCTYPE html PUBLIC
"-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
4 <meta http-equiv=
"Content-Type" content=
"text/html; charset=UTF-8">
5 <meta http-equiv=
"Content-Style-Type" content=
"text/css">
7 <meta name=
"Generator" content=
"Cocoa HTML Writer">
8 <meta name=
"CocoaVersion" content=
"949.43">
9 <style type=
"text/css">
10 p
.p1
{margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica
}
11 p
.p2
{margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica
; min-height: 14.0px}
12 p
.p3
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; min-height: 12.0px}
13 p
.p4
{margin: 0.0px 0.0px 0.0px 0.0px; font: 14.0px Helvetica
}
14 p
.p5
{margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica
; color: #0000bf}
15 p
.p6
{margin: 0.0px 0.0px 0.0px 0.0px; font: 14.0px Helvetica
; min-height: 17.0px}
16 p
.p7
{margin: 0.0px 0.0px 0.0px 57.0px; text-indent: -57.0px; font: 9.0px Monaco
; min-height: 12.0px}
17 p
.p8
{margin: 0.0px 0.0px 0.0px 57.0px; text-indent: -57.0px; font: 12.0px Helvetica
}
18 p
.p9
{margin: 0.0px 0.0px 0.0px 57.0px; text-indent: -57.0px; font: 12.0px Helvetica
; min-height: 14.0px}
19 p
.p10
{margin: 0.0px 0.0px 0.0px 85.0px; text-indent: -85.0px; font: 12.0px Helvetica
}
20 p
.p11
{margin: 0.0px 0.0px 0.0px 85.0px; text-indent: -85.0px; font: 12.0px Helvetica
; min-height: 14.0px}
21 p
.p12
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
}
22 p
.p13
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; color: #606060}
23 p
.p14
{margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco
; color: #bf0000}
24 p
.p15
{margin: 0.0px 0.0px 0.0px 57.0px; text-indent: -57.0px; font: 14.0px Helvetica
}
25 p
.p16
{margin: 0.0px 0.0px 0.0px 57.0px; text-indent: -57.0px; font: 14.0px Helvetica
; min-height: 17.0px}
26 span
.s1
{font: 18.0px Helvetica
}
27 span
.s2
{color: #0000bf}
28 span
.s3
{color: #000000}
29 span
.s4
{text-decoration: underline
}
30 span
.s5
{font: 11.0px Monaco
}
31 span
.s6
{color: #bf0000}
32 span
.s7
{color: #007300}
33 span
.s8
{color: #606060}
34 span
.Apple-tab-span
{white-space:pre
}
38 <p class=
"p1"><span class=
"s1"><b>EZSlider
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b></span><b>wrapper class for label, slider, number box
</b><span class=
"s1"><b><span class=
"Apple-tab-span"> </span></b></span></p>
39 <p class=
"p2"><br></p>
40 <p class=
"p1"><b>Inherits from:
</b><a href=
"../../Core/Object.html"><span class=
"s2"><b>Object
</b></span></a><b> :
</b><a href=
"EZGui.html"><span class=
"s2"><b>EZGui
</b></span></a></p>
41 <p class=
"p3"><br></p>
42 <p class=
"p1">EZSlider is wrapper class which creates an (optional)
<a href=
"../Main-GUI/StaticText.html"><span class=
"s2">StaticText
</span></a>, and a
<a href=
"../Main-GUI/Slider.html"><span class=
"s2">Slider
</span></a><span class=
"s2"> </span>plus a
<a href=
"../Main-GUI/NumberBox.html"><span class=
"s2">NumberBox
</span></a>. If the parent is nil, then EZSlider will create its own window. See
<a href=
"EZGui.html"><span class=
"s2">EZGui
</span></a> more options.
<span class=
"Apple-converted-space"> </span></p>
43 <p class=
"p2"><br></p>
44 <p class=
"p4"><b>Scrolling and Arrow Keys
</b></p>
45 <p class=
"p1">EZSlider's number box scrolls by default, using the step size of the
<a href=
"../../Control/ControlSpec.html"><span class=
"s2">ControlSpec
</span></a>. If the controlSpec's step is set to
0, or is not set, then the the stepping and scrolling will be guessed according to the
<b>minval
</b> and
<b>maxval
</b> values of the spec on creation of the view.
<span class=
"Apple-converted-space"> </span>Unlike the step variable of a regular NumberBox,
<b>controlSpec.step
</b> is also the smallest possible increment for the NumberBox.
<span class=
"Apple-converted-space"> </span>By default, the shift-key modifier
<span class=
"Apple-converted-space"> </span>will allow you to step by
100 x controlSpec.step , while the ctrl-key will give you
10x controlSpec.step.
<span class=
"Apple-converted-space"> </span>Since the alt-key would give you
0.1 of the minimum step, it is disabled by default, but you can change that by setting
<b>numberView.alt_step
</b> to any value you like
<b>.
</b> Accordingly you can customize the other modifiers to fit your needs. See
<a href=
"../Main-GUI/NumberBox.html"><span class=
"s2">NumberBox
</span></a> and
<a href=
"../Main-GUI/Slider.html"><span class=
"s2">Slider
</span></a>. This also effects the arrow keys for the slider.
</p>
46 <p class=
"p2"><br></p>
47 <p class=
"p5"><span class=
"s3"><b>See also:
</b> <a href=
"../Main-GUI/Slider.html"><span class=
"s4">Slider
</span></a>,
<a href=
"../Main-GUI/NumberBox.html"><span class=
"s4">NumberBox
</span></a>,
<a href=
"../Main-GUI/StaticText.html"><span class=
"s4">StaticText
</span></a>,
<a href=
"../Main-GUI/CompositeView.html"><span class=
"s4">CompositeView
</span></a>,
<a href=
"EZGui.html"><span class=
"s4">EZGui
</span></a></span></p>
48 <p class=
"p6"><br></p>
49 <p class=
"p4"><b>Creation / Class Methods
</b></p>
50 <p class=
"p7"><br></p>
51 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>*new (parent, bounds, label, controlSpec, action, initVal, initAction, labelWidth, numberWidth,unitWidth,labelHeight, layout,gap)
</b></p>
52 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
53 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>parent
</b>- The parent view or window. If the parent is nil, then EZSlider will create its own
<a href=
"../Main-GUI/Window.html"><span class=
"s2">Window
</span></a>, and place it conveniently on the screen if the bounds are a
<a href=
"../../Geometry/Point.html"><span class=
"s2">Point
</span></a>. If the bounds are a
<a href=
"../../Geometry/Rect.html"><span class=
"s2">Rect
</span></a>, then the Rect determines the window bounds.
</p>
54 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>bounds
</b>- An instance of
<a href=
"../../Geometry/Rect.html"><span class=
"s2">Rect
</span></a> or
<a href=
"../../Geometry/Point.html"><span class=
"s2">Point
</span></a>. Default value is
<span class=
"s5">160@
20</span>.
</p>
55 <p class=
"p11"><br></p>
56 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>label
</b>- The label. Default value is nil. If nil, then no StaticText is created.
<span class=
"Apple-converted-space"> </span></p>
57 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>controlSpec
</b>- The
<a href=
"../../Control/ControlSpec.html"><span class=
"s2">ControlSpec
</span></a> for scaling the value.
</p>
58 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>action
</b>- A
<a href=
"../../Core/Kernel/Function.html"><span class=
"s2">Function
</span></a> called when the value changes. The function is passed the EZSlider instance as its argument.
</p>
59 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>initVal
</b>- The value to initialize the slider and number box with. If nil, then it uses the ControlSpec's default value.
</p>
60 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>initAction
</b>- A
<a href=
"../../Core/Boolean.html"><span class=
"s2">Boolean
</span></a> indicating whether the action function should be called when setting the initial value. The default is false.
</p>
61 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>labelWidth
</b>- Number of pixels width for the label. The default is
60..
</p>
62 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>numberWidth
</b>- Number of pixels width for the number box. The default is
45.
</p>
63 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>unitWidth
</b>- Number of pixels width for the unit label. The default is
0.
<span class=
"Apple-converted-space"> </span>If
0, then no unitLabel is created
</p>
64 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>labelHeight
</b>- The default is
20;
</p>
65 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>layout
</b>- \vert \line2, or \horz. The default is horz;
</p>
66 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>gap
</b>- A
<a href=
"../../Geometry/Point.html"><span class=
"s2">Point
</span></a>. By default, the view tries to get its parent's gap, otherwise it defaults to
2@
2. Setting it overrides these.
</p>
67 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>margin
</b>- A
<a href=
"../../Geometry/Point.html"><span class=
"s2">Point
</span></a>. This will inset the bounds occupied
<span class=
"Apple-converted-space"> </span>by the subviews of view.
</p>
68 <p class=
"p3"><br></p>
69 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>(
</p>
70 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>w=
<span class=
"s2">Window
</span>.new.front;
</p>
71 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g =
<span class=
"s2">EZSlider
</span>(
<span class=
"Apple-tab-span"> </span>w,
<span class=
"Apple-converted-space"> <span class=
"Apple-tab-span"> </span></span><span class=
"s6">// parent
</span></p>
72 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>390@
20,
<span class=
"Apple-tab-span"> </span><span class=
"s6">// bounds
</span></p>
73 <p class=
"p13"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>" test "<span class=
"s3">,
<span class=
"Apple-tab-span"> </span></span><span class=
"s6">// label
</span></p>
74 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span><span class=
"s7">\freq
</span><span class=
"s3">,
<span class=
"Apple-tab-span"> </span></span>// controlSpec
</p>
75 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> (ez.value.asString ++
<span class=
"s8">" is the value of "</span> ++ ez).postln}
<span class=
"s6">// action
</span></p>
76 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>);
</p>
77 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white)
</p>
78 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>);
</p>
79 <p class=
"p3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
80 <p class=
"p3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
81 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// Simplest version, no parent view, so a window is created
</p>
82 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>(
</p>
83 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(label:
<span class=
"s8">" test "</span>);
</p>
84 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.action_({
<span class=
"s2">|ez|
</span> (ez.value.asString ++
<span class=
"s8">" is the value of "</span> ++ ez).postln});
</p>
85 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>);
</p>
86 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
87 <p class=
"p1">The contained views can be accessed via the EZSlider instance variables:
</p>
88 <p class=
"p1"><span class=
"Apple-tab-span"> </span><b>labelView
</b>,
<b>sliderView
</b>,
<b>numberView
</b></p>
89 <p class=
"p2"><span class=
"Apple-tab-span"> </span></p>
90 <p class=
"p7"><br></p>
91 <p class=
"p15"><b>Accessing Instance and Class Variables
</b></p>
92 <p class=
"p9"><span class=
"Apple-tab-span"> </span></p>
93 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>numberView
</b></p>
94 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b><span class=
"Apple-tab-span"> </span></p>
95 <p class=
"p8"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>Returns the
<b>numberView
</b></p>
96 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
97 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>action
</b></p>
98 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>action_(arg1)
</b></p>
99 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
100 <p class=
"p8"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>A function to be evaluated when the value changes. Te first argument will be the EZSlider.
</p>
101 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>arg1
</b>- An instance of
<a href=
"../../Core/Kernel/Function.html"><span class=
"s2">Function
</span></a> or
<a href=
"../../Core/Kernel/FunctionList.html"><span class=
"s2">FunctionList
</span></a>. Default value is nil.
</p>
102 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
103 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>value
</b></p>
104 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b><span class=
"Apple-tab-span"> </span></p>
105 <p class=
"p8"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>The value of the slider
</p>
106 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
107 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>round_(arg1)
</b></p>
108 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>round
</b></p>
109 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b><span class=
"Apple-tab-span"> </span></p>
110 <p class=
"p8"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>Rounds the values in the number box.
</p>
111 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
112 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>controlSpec_(arg1)
</b></p>
113 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>controlSpec
</b></p>
114 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b><span class=
"Apple-tab-span"> </span></p>
115 <p class=
"p8"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>An instance of
<a href=
"../../Control/ControlSpec.html"><span class=
"s2">ControlSpec
</span></a> for scaling the values.
</p>
116 <p class=
"p9"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
117 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>value
</b></p>
118 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>value_ (val)
</b></p>
119 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
120 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Gets/sets the list/menu to the index at value. Does not perform the action.
</p>
121 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>val
</b>- An integer.
</p>
122 <p class=
"p7"><br></p>
123 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>valueAction_ (val)
</b></p>
124 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
125 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Sets the value and performs the action at the index value and the global action.
</p>
126 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>val
</b>- An integer.
</p>
127 <p class=
"p11"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
128 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>doAction
</b></p>
129 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
130 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Performs the action at the current index and the global action.
</p>
131 <p class=
"p9"><br></p>
132 <p class=
"p7"><br></p>
133 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>set (label, spec, argAction, initVal, initAction)
</b></p>
134 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
135 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Set the args after creation. You can only set the label if it was not nil from the beginning.
</p>
136 <p class=
"p7"><br></p>
137 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>visible
</b></p>
138 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>visible_(bool)
</b></p>
139 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
140 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Sets/gets it the component views are visible.
</p>
141 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>bool
</b>- An Instance of
<a href=
"../../Core/Boolean.html"><span class=
"s2">Boolean
</span></a>. Default is true;
</p>
142 <p class=
"p11"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
143 <p class=
"p15"><b>Changing Appearance
</b></p>
144 <p class=
"p2"><span class=
"Apple-tab-span"> </span></p>
145 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>setColors(stringBackground,stringColor,sliderBackground,numBackground,
</b></p>
146 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>numStringColor,numNormalColor,numTypingColor,knobColor,background)
</b></p>
147 <p class=
"p9"><b><span class=
"Apple-tab-span"> </span></b></p>
148 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>stringBackground
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>background
</b> of the label and unit views.
</p>
149 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>stringColor
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>stringColor
</b> of the label and unit views.
</p>
150 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>sliderBackground
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The slider
<b>background
</b>.
</p>
151 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>numBackground
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>numColor
</b> of the number view.
</p>
152 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>numStringColor
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>stringColor
</b> of the number view.
</p>
153 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>numNormalColor
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>normalColor
</b> of the number view.
</p>
154 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>numTypingColor
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>typingColor
</b> of the number view.
</p>
155 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>knobColor
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>knobColor
</b> of the slider view.
</p>
156 <p class=
"p10"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>background
</b>- An instance of
<a href=
"../GUI-Tools/Color.html"><span class=
"s2">Color
</span></a>. The
<b>backround
</b> of the enclosing view.
</p>
157 <p class=
"p11"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
158 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span>font_(font)
</b></p>
159 <p class=
"p8"><b><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></b>Set the Font used by all the views.
</p>
160 <p class=
"p10"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><b>font
</b>- An instance of
<a href=
"../Main-GUI/Font.html"><span class=
"s2">Font
</span></a>.
<span class=
"Apple-converted-space"> </span></p>
161 <p class=
"p11"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
162 <p class=
"p7"><br></p>
163 <p class=
"p7"><br></p>
164 <p class=
"p15"><b>Examples
</b></p>
165 <p class=
"p16"><br></p>
166 <p class=
"p3"><br></p>
167 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// basic use
</p>
168 <p class=
"p12"><span class=
"Apple-tab-span"> </span>w=
<span class=
"s2">Window
</span>.new.front;
</p>
169 <p class=
"p12"><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(w,
400@
16,
<span class=
"s8">" test<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\freq
</span>,unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\horz
</span>);
</p>
170 <p class=
"p12"><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white);
</p>
171 <p class=
"p12">);
</p>
172 <p class=
"p12">g.view.enabled=
<span class=
"s2">false
</span></p>
173 <p class=
"p14">// lots of sliders on on view
</p>
175 <p class=
"p12">w=
<span class=
"s2">Window
</span>.new.front;
</p>
176 <p class=
"p12">w.view.decorator=
<span class=
"s2">FlowLayout
</span>(w.view.bounds);
</p>
177 <p class=
"p12">w.view.decorator.gap=
2@
2;
</p>
178 <p class=
"p3"><br></p>
179 <p class=
"p12">20.do{
</p>
180 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">EZSlider
</span>(w,
392@
16,
<span class=
"s8">" Freq "</span>,
<span class=
"s7">\freq
</span>,unitWidth:
30,initVal:
6000.rand, numberWidth:
60,layout:
<span class=
"s7">\horz
</span>)
</p>
181 <p class=
"p12"><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white)
</p>
182 <p class=
"p12"><span class=
"Apple-tab-span"> </span>.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
11));
</p>
183 <p class=
"p3"><br></p>
184 <p class=
"p12">};
</p>
185 <p class=
"p12">);
</p>
186 <p class=
"p3"><br></p>
187 <p class=
"p14"><span class=
"s2">Window
</span><span class=
"s3">.closeAll
<span class=
"Apple-converted-space"> </span></span>// use this to close all the windows
</p>
188 <p class=
"p3"><br></p>
189 <p class=
"p14">/////////////////////////////////////////////////////////////////
</p>
190 <p class=
"p14">////////// click these parentheses to see all features and layouts
<span class=
"Apple-converted-space"> </span></p>
191 <p class=
"p3"><br></p>
192 <p class=
"p12">(
<span class=
"Apple-converted-space"> </span></p>
193 <p class=
"p3"><br></p>
194 <p class=
"p12">m=
<span class=
"s2">nil
</span>;
</p>
195 <p class=
"p14">//m=
2@
2;
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>// uncomment this for margin
</p>
196 <p class=
"p3"><br></p>
197 <p class=
"p14">/////////////////
</p>
198 <p class=
"p14">/// Layout \horz
</p>
199 <p class=
"p3"><br></p>
200 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// all features, small font
</p>
201 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
400@
14,
<span class=
"s8">" freq<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\freq
</span>,unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\horz
</span>, margin: m);
</p>
202 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
203 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
204 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180,
50);
</p>
205 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
10));
</p>
206 <p class=
"p12">);
</p>
207 <p class=
"p3"><br></p>
208 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no unitView
</p>
209 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
400@
16,
<span class=
"s8">" freq<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\freq
</span>,unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\horz
</span>, margin: m);
</p>
210 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
211 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
212 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180, -
20);
</p>
213 <p class=
"p12">);
</p>
214 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no label, so use window name as label
</p>
215 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
400@
16,
<span class=
"s2">nil
</span>,
<span class=
"s7">\freq
</span>,unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\horz
</span>, margin: m);
</p>
216 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
217 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
218 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180, -
90);
</p>
219 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.name=
<span class=
"s8">"Freq"</span>;
</p>
220 <p class=
"p12">);
</p>
221 <p class=
"p3"><br></p>
222 <p class=
"p14">/////////////////
</p>
223 <p class=
"p14">/// Layout \line2
</p>
224 <p class=
"p3"><br></p>
225 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// all features
</p>
226 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
300@
42,
<span class=
"s8">" freq<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\freq
</span>,unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\line2
</span>, margin: m);
</p>
227 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
228 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
229 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180,-
160);
</p>
230 <p class=
"p12">);
</p>
231 <p class=
"p3"><br></p>
232 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no unitView, with label
</p>
233 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
300@
42,
<span class=
"s8">" freq<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\freq
</span>,unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\line2
</span>, margin: m);
</p>
234 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
235 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
236 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180,-
260);
</p>
237 <p class=
"p12">);
</p>
238 <p class=
"p3"><br></p>
239 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no label
</p>
240 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
300@
42,
<span class=
"s2">nil
</span>,
<span class=
"s7">\freq
</span>, unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\line2
</span>, margin: m);
</p>
241 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
242 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
243 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180,-
360);
</p>
244 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.name=
<span class=
"s8">"Freq"</span>;
</p>
245 <p class=
"p12">);
</p>
246 <p class=
"p3"><br></p>
247 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no lablel, so use window name as label
</p>
248 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
150@
42,
<span class=
"s2">nil
</span>,
<span class=
"s7">\freq
</span>,unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\line2
</span>, margin: m);
</p>
249 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
250 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
251 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(-
180,-
460);
</p>
252 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.name=
<span class=
"s8">"Freq"</span>;
</p>
253 <p class=
"p12">);
</p>
254 <p class=
"p3"><br></p>
255 <p class=
"p14">/////////////////
</p>
256 <p class=
"p14">/// Layout \vert
</p>
257 <p class=
"p3"><br></p>
258 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// all features, small font
</p>
259 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
45@
300,
<span class=
"s8">" Vol<span class="Apple-converted-space
"> </span>"</span>,
<span class=
"s7">\db
</span>.asSpec.step_(
0.01),unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\vert
</span>, margin: m);
</p>
260 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
261 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
262 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(
250,
50);
</p>
263 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
10));
</p>
264 <p class=
"p12">);
</p>
265 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no label, small font
</p>
266 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
45@
300,
<span class=
"s2">nil
</span>,
<span class=
"s7">\db
</span>.asSpec.step_(
0.01),unitWidth:
30, numberWidth:
60,layout:
<span class=
"s7">\vert
</span>, margin: m);
</p>
267 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
268 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
269 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(
310,
50);
</p>
270 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
10));
</p>
271 <p class=
"p12">);
</p>
272 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no Units small font
</p>
273 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
45@
300,
<span class=
"s8">" Vol"</span>,
<span class=
"s7">\db
</span>.asSpec.step_(
0.01),unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\vert
</span>, margin: m);
</p>
274 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
275 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
276 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(
370,
50);
</p>
277 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
10));
</p>
278 <p class=
"p12">);
</p>
279 <p class=
"p14"><span class=
"s3">(
<span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// no unitView, no Units small font
</p>
280 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g=
<span class=
"s2">EZSlider
</span>(
<span class=
"s2">nil
</span>,
45@
300,
<span class=
"s2">nil
</span>,
<span class=
"s7">\db
</span>.asSpec.step_(
0.01),unitWidth:
0, numberWidth:
60,layout:
<span class=
"s7">\vert
</span>, margin: m);
</p>
281 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"Apple-converted-space"> </span></p>
282 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow,
<span class=
"s2">nil
</span>,
<span class=
"s2">nil
</span>,
<span class=
"s2">Color
</span>.grey(
0.7));
</p>
283 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.window.bounds = g.window.bounds.moveBy(
430,
50);
</p>
284 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>g.font_(
<span class=
"s2">Font
</span>(
<span class=
"s8">"Helvetica"</span>,
10));
</p>
285 <p class=
"p12">);
</p>
286 <p class=
"p3"><br></p>
287 <p class=
"p12">)
<span class=
"Apple-tab-span"> </span></p>
288 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
289 <p class=
"p3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
290 <p class=
"p3"><br></p>
291 <p class=
"p3"><br></p>
292 <p class=
"p14">///////////////////////////////////////////////////////////////
</p>
293 <p class=
"p14">///////////////////////////////////////////////////////////////
</p>
294 <p class=
"p3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></p>
295 <p class=
"p3"><br></p>
296 <p class=
"p14">// Sound example
</p>
298 <p class=
"p14">// start server
</p>
299 <p class=
"p12">s.waitForBoot({
</p>
300 <p class=
"p3"><br></p>
301 <p class=
"p12"><span class=
"s2">var
</span> w, startButton, noteControl, cutoffControl, resonControl;
</p>
302 <p class=
"p12"><span class=
"s2">var
</span> balanceControl, ampControl;
</p>
303 <p class=
"p12"><span class=
"s2">var
</span> node, cmdPeriodFunc;
</p>
304 <p class=
"p3"><br></p>
305 <p class=
"p14">// define a synth
</p>
306 <p class=
"p12"><span class=
"s2">SynthDef
</span>(
<span class=
"s8">"window-test"</span>, {
<span class=
"s2">arg
</span> note =
36, fc =
1000, rq =
0.25, bal=
0, amp=
0.4, gate =
1;
</p>
307 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> x;
</p>
308 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">Mix
</span>.fill(
4, {
</p>
309 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">LFSaw
</span>.ar((note + {
0.1.rand2}.dup).midicps,
0,
0.02)
</p>
310 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>});
</p>
311 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">RLPF
</span>.ar(x, fc, rq).softclip;
</p>
312 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">RLPF
</span>.ar(x, fc, rq, amp).softclip;
</p>
313 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">Balance2
</span>.ar(x[
0], x[
1], bal);
</p>
314 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x = x *
<span class=
"s2">EnvGen
</span>.kr(
<span class=
"s2">Env
</span>.cutoff, gate, doneAction:
2);
</p>
315 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Out
</span>.ar(
0, x);
</p>
316 <p class=
"p12"><span class=
"Apple-tab-span"> </span>}, [
0.1,
0.1,
0.1,
0.1,
0.1,
0]
</p>
317 <p class=
"p12">).load(s);
</p>
318 <p class=
"p3"><br></p>
319 <p class=
"p3"><br></p>
320 <p class=
"p3"><br></p>
321 <p class=
"p3"><br></p>
322 <p class=
"p14">// make the window
</p>
323 <p class=
"p12">w =
<span class=
"s2">Window
</span>(
<span class=
"s8">"another control panel"</span>,
<span class=
"s2">Rect
</span>(
20,
400,
440,
180));
</p>
324 <p class=
"p14"><span class=
"s3">w.front;
</span>// make window visible and front window.
</p>
325 <p class=
"p12">w.view.decorator =
<span class=
"s2">FlowLayout
</span>(w.view.bounds);
</p>
326 <p class=
"p12">w.view.decorator.gap=
2@
2;
</p>
327 <p class=
"p3"><br></p>
328 <p class=
"p14">// add a button to start and stop the sound.
</p>
329 <p class=
"p12">startButton =
<span class=
"s2">Button
</span>(w,
75 @
20);
</p>
330 <p class=
"p12">startButton.states = [
</p>
331 <p class=
"p12"><span class=
"Apple-tab-span"> </span>[
<span class=
"s8">"Start"</span>,
<span class=
"s2">Color
</span>.black,
<span class=
"s2">Color
</span>.green(
0.7)],
</p>
332 <p class=
"p12"><span class=
"Apple-tab-span"> </span>[
<span class=
"s8">"Stop"</span>,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.red(
0.7)]
</p>
333 <p class=
"p12">];
</p>
334 <p class=
"p12">startButton.action = {
<span class=
"s2">|view|
</span></p>
335 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>if (view.value ==
1) {
</p>
336 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// start sound
</p>
337 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>node =
<span class=
"s2">Synth
</span>(
<span class=
"s8">"window-test"</span>, [
</p>
338 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s8">"note"</span>, noteControl.value,
</p>
339 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s8">"fc"</span>, cutoffControl.value,
</p>
340 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s8">"rq"</span>, resonControl.value,
</p>
341 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s8">"bal"</span>, balanceControl.value,
</p>
342 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s8">"amp"</span>, ampControl.value.dbamp ]);
</p>
343 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>} {
</p>
344 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// set gate to zero to cause envelope to release
</p>
345 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>node.release; node =
<span class=
"s2">nil
</span>;
</p>
346 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>};
</p>
347 <p class=
"p12">};
</p>
348 <p class=
"p3"><br></p>
349 <p class=
"p14">// create controls for all parameters
</p>
350 <p class=
"p12">w.view.decorator.nextLine;
</p>
351 <p class=
"p12">noteControl =
<span class=
"s2">EZSlider
</span>(w,
430 @
20,
<span class=
"s8">"Note "</span>,
<span class=
"s2">ControlSpec
</span>(
24,
60,
<span class=
"s7">\lin
</span>,
1,
36,
<span class=
"s7">\note
</span>),
</p>
352 <p class=
"p12"><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> node.set(
<span class=
"s8">"note"</span>, ez.value )}, unitWidth:
30)
</p>
353 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
354 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
355 <p class=
"p12">w.view.decorator.nextLine;
</p>
356 <p class=
"p12">cutoffControl =
<span class=
"s2">EZSlider
</span>(w,
430 @
20,
<span class=
"s8">"Cutoff "</span>,
<span class=
"s2">ControlSpec
</span>(
200,
5000,
<span class=
"s7">\exp
</span>,
0.01,
1000,
<span class=
"s7">\Hz
</span>),
</p>
357 <p class=
"p12"><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> node.set(
<span class=
"s8">"fc"</span>, ez.value )}, unitWidth:
30)
</p>
358 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
359 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
360 <p class=
"p12">w.view.decorator.nextLine;
</p>
361 <p class=
"p12">resonControl =
<span class=
"s2">EZSlider
</span>(w,
430 @
20,
<span class=
"s8">"Reson "</span>,
<span class=
"s2">ControlSpec
</span>(
0.1,
0.7,
<span class=
"s7">\lin
</span>,
0.001,
0.2,
<span class=
"s7">\rq
</span>),
</p>
362 <p class=
"p12"><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> node.set(
<span class=
"s8">"rq"</span>, ez.value )}, unitWidth:
30)
</p>
363 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
364 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
365 <p class=
"p12">w.view.decorator.nextLine;
</p>
366 <p class=
"p12">balanceControl =
<span class=
"s2">EZSlider
</span>(w,
430 @
20,
<span class=
"s8">"Balance "</span>,
<span class=
"s7">\bipolar
</span>,
</p>
367 <p class=
"p12"><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> node.set(
<span class=
"s8">"bal"</span>, ez.value )},
<span class=
"Apple-converted-space"> </span>unitWidth:
30)
</p>
368 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
369 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
370 <p class=
"p12">w.view.decorator.nextLine;
</p>
371 <p class=
"p12">ampControl =
<span class=
"s2">EZSlider
</span>(w,
430 @
20,
<span class=
"s8">"Amp "</span>,
<span class=
"s7">\db
</span>,
</p>
372 <p class=
"p12"><span class=
"Apple-tab-span"> </span>{
<span class=
"s2">|ez|
</span> node.set(
<span class=
"s8">"amp"</span>, ez.value.dbamp )}, -
6, unitWidth:
30)
</p>
373 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
374 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
375 <p class=
"p3"><br></p>
376 <p class=
"p14">// set start button to zero upon a cmd-period
</p>
377 <p class=
"p12">cmdPeriodFunc = { startButton.value =
0; };
</p>
378 <p class=
"p12"><span class=
"s2">CmdPeriod
</span>.add(cmdPeriodFunc);
</p>
379 <p class=
"p3"><br></p>
380 <p class=
"p14">// stop the sound when window closes and remove cmdPeriodFunc.
</p>
381 <p class=
"p12">w.onClose = {
</p>
382 <p class=
"p12"><span class=
"Apple-tab-span"> </span>node.free; node =
<span class=
"s2">nil
</span>;
</p>
383 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">CmdPeriod
</span>.remove(cmdPeriodFunc);
</p>
384 <p class=
"p12">};
</p>
385 <p class=
"p12">});
</p>
387 <p class=
"p3"><br></p>
388 <p class=
"p3"><br></p>
389 <p class=
"p3"><br></p>
390 <p class=
"p3"><br></p>
391 <p class=
"p14">// a variant of the above example so one can
<span class=
"Apple-converted-space"> </span></p>
392 <p class=
"p14">// add new parameters and more views are created automatically
</p>
393 <p class=
"p3"><br></p>
395 <p class=
"p14">// start server
</p>
396 <p class=
"p12">s.waitForBoot({
</p>
397 <p class=
"p3"><br></p>
398 <p class=
"p12"><span class=
"s2">var
</span> w, startButton, sliders;
</p>
399 <p class=
"p12"><span class=
"s2">var
</span> node, cmdPeriodFunc;
</p>
400 <p class=
"p12"><span class=
"s2">var
</span> params, specs;
</p>
401 <p class=
"p3"><br></p>
402 <p class=
"p14">// define a synth
</p>
403 <p class=
"p12"><span class=
"s2">SynthDef
</span>(
<span class=
"s8">"window-test"</span>, {
<span class=
"s2">arg
</span> note =
36, fc =
1000, rq =
0.25, bal =
0, amp=
0.4, width=
0, gate =
1;
</p>
404 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> x;
</p>
405 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">Mix
</span>.fill(
4, {
</p>
406 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">VarSaw
</span>.ar((note + {
0.1.rand2}.dup).midicps,
0, width,
0.02)
</p>
407 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>});
</p>
408 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">RLPF
</span>.ar(x, fc, rq).softclip;
</p>
409 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">RLPF
</span>.ar(x, fc, rq, amp).softclip;
</p>
410 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x =
<span class=
"s2">Balance2
</span>.ar(x[
0], x[
1], bal);
</p>
411 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>x = x *
<span class=
"s2">EnvGen
</span>.kr(
<span class=
"s2">Env
</span>.cutoff, gate,
5, doneAction:
2);
</p>
412 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">Out
</span>.ar(
0, x);
</p>
413 <p class=
"p12"><span class=
"Apple-tab-span"> </span>}, [
0.1,
0.1,
0.1,
0.1,
0.1,
0.1,
0]
</p>
414 <p class=
"p12">).load(s);
</p>
415 <p class=
"p3"><br></p>
416 <p class=
"p3"><br></p>
417 <p class=
"p13"><span class=
"s3">params = [
</span>"note"<span class=
"s3">,
</span>"fc"<span class=
"s3">,
</span>"rq"<span class=
"s3">,
</span>"bal"<span class=
"s3">,
</span>"amp"<span class=
"s3">,
</span>"width"<span class=
"s3">];
</span></p>
418 <p class=
"p12">specs = [
</p>
419 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">ControlSpec
</span>(
24,
60,
<span class=
"s7">\lin
</span>,
1,
36,
<span class=
"s7">\note
</span>),
</p>
420 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">ControlSpec
</span>(
200,
5000,
<span class=
"s7">\exp
</span>,
0.01,
1000,
<span class=
"s7">\Hz
</span>),
</p>
421 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">ControlSpec
</span>(
0.1,
0.7,
<span class=
"s7">\lin
</span>,
0.001,
0.2,
<span class=
"s7">\rq
</span>),
</p>
422 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">ControlSpec
</span>(-
1,
1,
<span class=
"s7">\lin
</span>,
0,
0,
<span class=
"s7">\pan
</span>),
</p>
423 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span></span><span class=
"s2">ControlSpec
</span><span class=
"s3">(
0.0001,
2,
</span><span class=
"s7">\exp
</span><span class=
"s3">,
0,
0.3,
</span><span class=
"s7">\vol
</span><span class=
"s3">),
</span>// db spec acts weird, so use self made one
</p>
424 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">ControlSpec
</span>(
0,
1,
<span class=
"s7">\lin
</span>,
0,
0.3,
<span class=
"s7">\width
</span>),
</p>
425 <p class=
"p12">];
</p>
426 <p class=
"p3"><span class=
"Apple-tab-span"> </span></p>
427 <p class=
"p14">// make the window
</p>
428 <p class=
"p12">w =
<span class=
"s2">Window
</span>(
<span class=
"s8">"another control panel"</span>,
<span class=
"s2">Rect
</span>(
20,
400,
440,
180));
</p>
429 <p class=
"p14"><span class=
"s3">w.front;
</span>// make window visible and front window.
</p>
430 <p class=
"p12">w.view.decorator =
<span class=
"s2">FlowLayout
</span>(w.view.bounds);
</p>
431 <p class=
"p12">w.view.decorator.gap=
2@
2;
</p>
432 <p class=
"p3"><br></p>
433 <p class=
"p3"><br></p>
434 <p class=
"p14">// add a button to start and stop the sound.
</p>
435 <p class=
"p12">startButton =
<span class=
"s2">Button
</span>(w,
75 @
20);
</p>
436 <p class=
"p12">startButton.states = [
</p>
437 <p class=
"p12"><span class=
"Apple-tab-span"> </span>[
<span class=
"s8">"Start"</span>,
<span class=
"s2">Color
</span>.black,
<span class=
"s2">Color
</span>.green(
0.7)],
</p>
438 <p class=
"p12"><span class=
"Apple-tab-span"> </span>[
<span class=
"s8">"Stop"</span>,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.red(
0.7)]
</p>
439 <p class=
"p12">];
</p>
440 <p class=
"p12">startButton.action = {
<span class=
"s2">|view|
</span></p>
441 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"s2">var
</span> args;
</p>
442 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>if (view.value ==
1) {
</p>
443 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// start sound
</p>
444 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>params.do {
<span class=
"s2">|param, i|
</span><span class=
"Apple-converted-space"> </span></p>
445 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>args = args.add(param);
</p>
446 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>args = args.add(sliders[i].value)
</p>
447 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>};
</p>
448 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>node =
<span class=
"s2">Synth
</span>(
<span class=
"s8">"window-test"</span>, args.postcs);
</p>
449 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>} {
</p>
450 <p class=
"p14"><span class=
"s3"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span></span>// set gate to zero to cause envelope to release
</p>
451 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>node.release; node =
<span class=
"s2">nil
</span>;
</p>
452 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>};
</p>
453 <p class=
"p12">};
</p>
454 <p class=
"p3"><br></p>
455 <p class=
"p14">// create controls for all parameters
</p>
456 <p class=
"p12">w.view.decorator.nextLine;
</p>
457 <p class=
"p12">sliders = params.collect {
<span class=
"s2">|param, i|
</span><span class=
"Apple-converted-space"> </span></p>
458 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">EZSlider
</span>(w,
430 @
20, param, specs[i], {
<span class=
"s2">|ez|
</span> node.set( param, ez.value )})
</p>
459 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"Apple-tab-span"> </span>.setColors(
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.grey(
0.7),
<span class=
"s2">Color
</span>.grey,
<span class=
"s2">Color
</span>.white,
<span class=
"s2">Color
</span>.yellow);
</p>
460 <p class=
"p12">};
</p>
461 <p class=
"p14">// set start button to zero upon a cmd-period
</p>
462 <p class=
"p12">cmdPeriodFunc = { startButton.value =
0; };
</p>
463 <p class=
"p12"><span class=
"s2">CmdPeriod
</span>.add(cmdPeriodFunc);
</p>
464 <p class=
"p3"><br></p>
465 <p class=
"p14">// stop the sound when window closes and remove cmdPeriodFunc.
</p>
466 <p class=
"p12">w.onClose = {
</p>
467 <p class=
"p12"><span class=
"Apple-tab-span"> </span>node.free; node =
<span class=
"s2">nil
</span>;
</p>
468 <p class=
"p12"><span class=
"Apple-tab-span"> </span><span class=
"s2">CmdPeriod
</span>.remove(cmdPeriodFunc);
</p>
469 <p class=
"p12">};
</p>
470 <p class=
"p3"><br></p>
471 <p class=
"p12">})
</p>
473 <p class=
"p3"><br></p>