Permalink
Browse files

after record cc, before coco

  • Loading branch information...
1 parent 0e79902 commit 80cca0bd23b2597419c530c78c4ac9d1dc6eb067 @grirgz committed Mar 2, 2012
Showing with 1,562 additions and 94 deletions.
  1. +2 −0 TOSAY
  2. +70 −0 coco.sc
  3. +569 −0 crap11.sc
  4. +751 −0 crap12.sc
  5. +13 −6 editplayer.sc
  6. +0 −46 hardcopy.0
  7. +2 −0 keycode.sc
  8. +8 −3 live9.sc
  9. +26 −2 midi.sc
  10. +121 −37 param.sc
View
2 TOSAY
@@ -0,0 +1,2 @@
+"param.sc"320 // FIXME: action not called with 3.5 when hiting enter
+path ?? of synthdesclib load
View
70 coco.sc
@@ -0,0 +1,70 @@
+
+
+(
+a = Pbind(
+ \bla, \pulsepass,
+ \instrument, Pkey(\bla),
+ \dur, 0.5,
+ \amp, 0.2
+)
+)
+(
+b = Pdef(\rah, Pbind(
+ \bla, \pulsepass,
+ \degree, Pseq([1,2,3,4,5,6,7,8],inf),
+ \instrument, Pkey(\bla),
+ \dur, 0.5,
+ \amp, 0.2
+))
+)
+b = Pdef(\rah, a);
+a.patternpairs[5].key
+a.play
+b.play
+b.quant = 2
+b.source.patternpairs
+
+c = Pbindef(\rah, \dur, 1.0);
+c.play
+Pdef(\rah).play
+Pchain
+
+(
+SynthDef(\lead, { arg out=0, freq = 100, pan=0, amp=0.1, detune=1.1, gate=1, rq=0.1, fratio = 1, fbase=20;
+ var ou, filtenv;
+ //gate = LFPulse.ar(1);
+ ou = LFSaw.ar(freq * [1, detune]).sum;
+ filtenv = EnvGen.ar(Env.adsr(0.01,0.35,0.07,0.3), gate, freq * fratio, fbase, doneAction:0);
+ ou = ou * EnvGen.ar(Env.adsr(0.01,0.4,0.1,0.4), gate, doneAction:0);
+ ou = RLPF.ar(ou, filtenv, rq);
+ ou = Pan2.ar(ou, pan, amp);
+ Out.ar(out, ou);
+}).add
+)
+
+(
+~mpdef.(\rah, Pbind(
+ //\instrument, \lead,
+ \freq, 070,
+ \legato, 0.7,
+ \fratio, 0.1,
+ \fbase, 100,
+ \rq, Pseq([1,1.7],inf),
+ \dur, 0.5,
+ \detune, 1.007,
+ \amp, 0.2
+));
+)
+
+Pbind(\bla, 1).class == Pbind
+Pdef(\bla).class == Pbind
+
+(
+~mpdef = { arg name, pat;
+
+ if(pat.class == Pbind) {
+
+ }
+
+};
+)
Oops, something went wrong.

0 comments on commit 80cca0b

Please sign in to comment.