SF.net SVN: supercollider: [7648] trunk/build

[cruxxial]

Revision: 7648
          http://svn.sourceforge.net/supercollider/?rev=7648&view=rev
Author:   cruxxial
Date:     2008-07-05 11:43:40 -0700 (Sat, 05 Jul 2008)

Log Message:
-----------
minor: backwards compat for sc2 style { } in Enveloper2.ar
plus a change in Patch help file

Modified Paths:
--------------
    trunk/build/Help/Libraries/crucial/Instr/Patch.html
    trunk/build/SCClassLibrary/crucial/UncoupledUsefulThings/AudioHelpers.sc

Modified: trunk/build/Help/Libraries/crucial/Instr/Patch.html
===================================================================
--- trunk/build/Help/Libraries/crucial/Instr/Patch.html 2008-07-05 16:26:11 UTC (rev 7647)
+++ trunk/build/Help/Libraries/crucial/Instr/Patch.html 2008-07-05 18:43:40 UTC (rev 7648)
@@ -32,7 +32,9 @@
 p.p23 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #000000}
 p.p24 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #606060}
 p.p25 {margin: 0.0px 0.0px 0.0px 0.0px; font: 9.0px Monaco; color: #0000bf}
-p.p26 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #0018e8}
+p.p26 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Arial; color: #000000; min-height: 14.0px}
+p.p27 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Arial; color: #000000}
+p.p28 {margin: 0.0px 0.0px 0.0px 0.0px; font: 12.0px Helvetica; color: #0018e8}
 span.s1 {color: #0025f3}
 span.s2 {color: #0626af}
 span.s3 {color: #556824}
@@ -558,19 +560,19 @@
 <p class="p22"><br></p>
 <p class="p23">p.play</p>
 <p class="p2"><br></p>
+<p class="p26"><br></p>
+<p class="p27">You could also spawn more synths.</p>
+<p class="p26"><br></p>
+<p class="p26"><br></p>
+<p class="p27">What happens is happening is that a ClientOnTrigResponder is added to the InstrSynthDef's stepchildren.<span class="Apple-converted-space">  </span>When a Patch plays it also plays its children (the inputs to the patch) and its stepchildren.<span class="Apple-converted-space">  </span>The ClientOnTrigResponder adds an OSCpathResponder when the synth starts and removes it when the synth stops. <span class="Apple-converted-space"> </span></p>
+<p class="p26"><br></p>
 <p class="p2"><br></p>
-<p class="p5">You could also spawn more synths.</p>
 <p class="p2"><br></p>
 <p class="p2"><br></p>
-<p class="p5">What happens is happening is that a ClientOnTrigResponder is added to the InstrSynthDef's stepchildren.<span class="Apple-converted-space">  </span>When a Patch plays it also plays its children (the inputs to the patch) and its stepchildren.<span class="Apple-converted-space">  </span>The ClientOnTrigResponder adds an OSCpathResponder when the synth starts and removes it when the synth stops. <span class="Apple-converted-space"> </span></p>
+<p class="p28"><span class="s4">see also [<a href="SC://InstrGateSpawner"><span class="s15">InstrGateSpawner</span></a>]</span></p>
 <p class="p2"><br></p>
 <p class="p2"><br></p>
 <p class="p2"><br></p>
 <p class="p2"><br></p>
-<p class="p26"><span class="s4">see also [<a href="SC://InstrGateSpawner"><span class="s15">InstrGateSpawner</span></a>]</span></p>
-<p class="p2"><br></p>
-<p class="p2"><br></p>
-<p class="p2"><br></p>
-<p class="p2"><br></p>
 </body>
 </html>

Modified: trunk/build/SCClassLibrary/crucial/UncoupledUsefulThings/AudioHelpers.sc
===================================================================
--- trunk/build/SCClassLibrary/crucial/UncoupledUsefulThings/AudioHelpers.sc 2008-07-05 16:26:11 UTC (rev 7647)
+++ trunk/build/SCClassLibrary/crucial/UncoupledUsefulThings/AudioHelpers.sc 2008-07-05 18:43:40 UTC (rev 7648)
@@ -2,7 +2,7 @@
 NumChannels {
 
  *ar { arg input,numChannels=2,mixdown=true;
-
+
  if(input.size > 1,{// collection
    ^input
  .clump(input.size / numChannels)
@@ -21,7 +21,7 @@
  if(input.isSequenceableCollection,{
  input = input.at(0);
  });
-
+
  if(numChannels == 1,{
  ^input
  },{
@@ -29,12 +29,12 @@
  })
  })
  }
-
+
 }
 
 XFader  {  // UNIPOLAR
  // XFade2 is now cheaper (in c)
-
+
  *ar { arg l, r, pan;
  ^(l + (pan * (r - l)))
  }
@@ -91,23 +91,25 @@
 
 
 Mono {
- *new { arg input;
+ *new { arg input;
  if(input.isArray,{
  ^input.at(0)
  },{
  ^input
  })
- }
+ }
 }
 
 
 // audio function plays continously but is gated by the envelope
-Enveloper2 {
-
+Enveloper2 {
+
  *ar { arg audio,gate,env;
  var ts,gated;
  gated = Latch.kr(gate,gate);
  env ?? {env = Env.adsr};
+ // backwards compatibility : value the function
+ if(audio.class === Function,{ audio = audio.value });
  ^audio * EnvGen.kr(env,gate,gated)
  }
 
@@ -123,8 +125,8 @@
  var t;
  t=Trig.ar(trig,2.26757e-05);
  ^t.madd(mul,add)
-
+
  // was this in sc2, sounds different
  //^ImpulseSequencer.ar({trig.poll},K2A.ar(trig),mul,add)
- }
+ }
 }


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
_______________________________________________
sc-dev mailing list
sc-dev@...
http://lists.create.ucsb.edu/mailman/listinfo/sc-dev