karma push

Author: jbloit

busses.scd

@@ -0,0 +1,31 @@
+
+
+// a trigger signal
+(
+SynthDef(\trig, {|out = 0|
+	Out.ar(out, Impulse.ar(0.5));
+}).add;
+)
+
+// a synth with a gated envelope. gate is received from input bus
+(
+SynthDef(\tosc, {|out=0, in=0|
+	var sig, env, gate;
+	gate = In.ar(in, 1);
+	env = EnvGen.ar(Env.perc(), gate);
+	sig = SinOsc.ar(mul:env);
+	Out.ar(out,  Pan2.ar(sig, 0));
+}).add;
+)
+
+Bus.clear;
+b = Bus.audio(s, 1);
+b.index
+
+// order of execution is important here, new synths are added on top
+c = Synth(\tosc, [\in, b.index]);
+d = Synth(\trig, [\out, b.index]);
+
+
+c.free
+d.free

midiin.scd

@@ -2,11 +2,17 @@
 
 // see "https://github.com/sensestage/interface2instrument/blob/master/4_MIDI.scd"
 
+// s.latency = 0.01;
+// s.reboot;
+// s.options.hardwareBufferSize = 512;
+// s.options.blockSize = 512;
+// s.options.blockSize;
+
 SynthDef(\perc,
 	{
 		|amp=0.1, pan=0|
 		var sig;
-		sig = SinOsc.ar(mul: EnvGen.ar(Env.perc(0.001)));
+		sig = SinOsc.ar(mul: EnvGen.ar(Env.perc(0.001), doneAction:2));
 		Out.ar(0, Pan2.ar(sig*amp, pan));
 }).add;
 
@@ -21,20 +27,20 @@ MIDIFunc.trace( false );
 MIDIdef.noteOn(\noteOnTest, {
 	|vel, nn |
 	Synth(\perc, [\amp, vel/127]);
-	postf("NOTE ON vel:% nn: %\n", vel, nn);
+	// postf("NOTE ON vel:% nn: %\n", vel, nn);
 
 };
 );
 
 MIDIdef.noteOff(\noteOffTest, {
 	|vel, nn |
-	[vel, nn].postln;
+	// [vel, nn].postln;
 };
 );
 
 MIDIdef.cc(\ccTest, {
 	|val|
-	val.postln;
+	// val.postln;
 };);
 
 

proutBasics.scd

@@ -29,4 +29,14 @@ Pbind(
     \freq, p { loop { ([1000, 2000].choose + [100, 200].choose + [10, 20].choose).postln.yield } },
     \dur, 0.1
 ).play;
+)
+
+(
+var a;
+a = Environment.make({
+    ~a = 100;
+    ~b = 200;
+    ~c = 300;
+});
+a.postln;
 )

routineBasics.scd

@@ -4,6 +4,7 @@ a = Routine.new({ 1.yield; 2.yield; });
 a.next.postln;
 a.next.postln;
 a.next.postln;
+a.reset;
 
 //---------------
 

synth_percSin.scd

@@ -5,7 +5,7 @@ SynthDef(\perc,
 	{
 		|amp=0.1, pan=0|
 		var sig;
-		sig = SinOsc.ar(mul: EnvGen.ar(Env.perc(0.001)));
+		sig = SinOsc.ar(mul: EnvGen.ar(Env.perc(0.001), doneAction:2));
 		Out.ar(0, Pan2.ar(sig*amp, pan));
 }).add;
 )