100 lines
1.6 KiB
Text
100 lines
1.6 KiB
Text
|
#lang scribble/manual
|
||
|
@(require (for-label racket))
|
||
|
|
||
|
@title{Fdef}
|
||
|
lazy function proxy@section{categories}
|
||
|
Libraries>JITLib>Patterns, Live Coding
|
||
|
@section{related}
|
||
|
Classes/Pdef, Classes/Tdef, Classes/Pdefn, Classes/Ndef
|
||
|
|
||
|
@section{description}
|
||
|
|
||
|
Placeholder for functions to calculate with.
|
||
|
|
||
|
See also: link::Classes/Maybe:: and the link::Overviews/JITLib:: overview.
|
||
|
|
||
|
@section{ClassMethods}
|
||
|
|
||
|
|
||
|
@section{private}
|
||
|
initClass
|
||
|
|
||
|
@section{method}
|
||
|
new
|
||
|
|
||
|
@section{argument}
|
||
|
key
|
||
|
if no instance exists with this name, create a new one, otherwise return the existing one.
|
||
|
|
||
|
@section{argument}
|
||
|
val
|
||
|
If a link::Classes/Function:: is given, replace the old function with the new one.
|
||
|
|
||
|
@section{Examples}
|
||
|
|
||
|
|
||
|
|
||
|
@racketblock[
|
||
|
Fdef(\x, { 8 + 9 });
|
||
|
|
||
|
Fdef(\y, Fdef(\x) - 3);
|
||
|
|
||
|
Fdef(\y).value;
|
||
|
|
||
|
Fdef(\x, 3);
|
||
|
|
||
|
Fdef(\y).value;
|
||
|
|
||
|
Fdef(\x, { |x=0| x });
|
||
|
|
||
|
|
||
|
Fdef(\x).value(8);
|
||
|
|
||
|
Fdef(\y).value(8);
|
||
|
|
||
|
|
||
|
z = Fdef(\x) * Fdef(\y) + { 1.0.rand };
|
||
|
|
||
|
z.value;
|
||
|
z.value(400);
|
||
|
::
|
||
|
|
||
|
]
|
||
|
|
||
|
@racketblock[
|
||
|
// sound example
|
||
|
(
|
||
|
s.boot;
|
||
|
SynthDef("gpdef",
|
||
|
{ arg out=0, freq=440, sustain=0.05, amp=0.1;
|
||
|
var env;
|
||
|
env = EnvGen.kr(Env.perc(0.01, sustain), doneAction: Done.freeSelf) * amp;
|
||
|
Out.ar(out, SinOsc.ar(freq, 0, env))
|
||
|
}).add;
|
||
|
)
|
||
|
|
||
|
// fork a thread that plays some sounds
|
||
|
(
|
||
|
Fdef(\freq, 440);
|
||
|
Fdef(\dur, 0.2);
|
||
|
|
||
|
fork {
|
||
|
loop {
|
||
|
s.sendMsg("/s_new", "gpdef", -1, 1,1, \freq, Fdef(\freq).value);
|
||
|
Fdef(\dur).value.wait;
|
||
|
}
|
||
|
};
|
||
|
)
|
||
|
|
||
|
// some modifications
|
||
|
|
||
|
Fdef(\freq, Fdef(\midinote, 60).midicps);
|
||
|
Fdef(\midinote, { [67, 64, 65].choose });
|
||
|
Fdef(\midinote, { [67, 64, 65].choose } + Fdef(\offset));
|
||
|
Fdef(\offset, { 4.rand });
|
||
|
Fdef(\dur, 0.23);
|
||
|
::
|
||
|
]
|
||
|
|
||
|
|