47 lines
837 B
Plaintext
47 lines
837 B
Plaintext
|
(
|
||
|
|
|
||
|
|
~usbinput = 2;
|
||
|
|
~usbinput1 = 2;
|
||
|
|
~usbinput2 = 3;
|
||
|
|
|
||
|
|
~buflen = 4.0;
|
||
|
|
~beatsperbar = 4;
|
||
|
|
|
||
|
|
~posb0 = Bus.control(s, 1);
|
||
|
|
~posb1 = Bus.control(s, 1);
|
||
|
|
~posb2 = Bus.control(s, 1);
|
||
|
|
~posb3 = Bus.control(s, 1);
|
||
|
|
|
||
|
|
SynthDef(\pos_sin, {
|
||
|
|
arg out, speed=1;
|
||
|
|
Out.kr(out, 0.5 + SinOsc.kr(speed * 0.5, 0, 0.5));
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
SynthDef(\pos_saw, {
|
||
|
|
arg out, speed=1;
|
||
|
|
Out.kr(out, 0.5 + LFSaw.kr(speed, 0, 0.5));
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
SynthDef(\pos_reverse, {
|
||
|
|
arg out, speed=1;
|
||
|
|
Out.kr(out, 0.5 - LFSaw.kr(speed, 0, 0.5));
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
SynthDef(\pos_step, {
|
||
|
|
arg out, speed=1, steps=8;
|
||
|
|
var stepwise = LFSaw.kr(speed, 0.0, 0.5 * steps, 0.5 * steps).floor;
|
||
|
|
Out.kr(out, stepwise / steps);
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
SynthDef(\pos_rand, {
|
||
|
|
arg out=5, speed=1;
|
||
|
|
Out.kr(out, 0.5 + WhiteNoise.kr(0.5));
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
SynthDef( \lfo, {
|
||
|
|
arg out, freq=1, amp=0;
|
||
|
|
Out.kr(out, SinOsc.kr(freq, 0, amp));
|
||
|
|
}).add;
|
||
|
|
|
||
|
|
)
|