Fork Code: fun little instrument

name

code content

(

// Levels scaling
//m = m ? 0.8;// live
m = m ? 1.2;// rehersal

Ndef(\pul, { | freq=80, rq=0.001, amp = 0.91 |
	RLPF.ar(
		Pulse.ar([100,250],0.5,0.1),
		freq: freq,
		rq: rq,
		mul: amp
	)
	+ (DelayC.ar(Ndef(\pul).ar) * 0.9)
}).play;

// GUI: 2D slider
w = Window("Pulse", Rect(100,Window.screenBounds.height - 400, 300, 300));
w.view.decorator = FlowLayout(w.view.bounds);
t = Slider2D(w, Rect(0, 0,292, 292))
	.y_(1.0)
	.x_(0.0)
	.background_(Color.rand)
	.knobColor_(Color.rand)
	.action_({|pos|
		Ndef(\pul).set(
			\freq, pos.x.linexp(0,1.0, 80, 8000),
			\rq, pos.y.linlin(0, 1.0, 0.001, 1.0)
		)
	});
w.front;
CmdPeriod.doOnce({w.close; Ndef(\pul).clear(4)});

)

// Kill it
w.close; Ndef(\pul).clear(4);

code description use markdown for formating

category tags comma separated, i.g. "wild, siren" (do not enter default SC class names, please)

ancestor(s) comma separated identificators, i.g. "1-C,1-1,1-4M,1-x"

Private? the code will be accessible by direct url and not visible in public activity

comment of change