EnvGen : UGen { // envelope generator
 var env;
 
 *ar { arg env, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^this.multiChannelPerform('ar1', env, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *kr { arg env, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^this.multiChannelPerform('kr1',  env, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *ar1 { arg env, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^super.ar1.init( env, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *kr1 { arg env, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^super.kr1.init( env, mul, add, levelScale, levelBias, timeScale, gate)
 }
 trigger { arg env;
  _EnvGen_Trigger
  ^this.primitiveFailed
 }
 
 //PRIVATE:
 init { arg argEnvelope ... theInputs;
  env = argEnvelope.value;
  inputs = theInputs;
 } 
}

EnvGen2 : UGen { // two envelope blending generator
 var env1, env2;
 
 *ar { arg env1, env2, blend = 0.0, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^this.multiChannelPerform('ar1', env1, env2, blend, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *kr { arg env1, env2, blend = 0.0, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^this.multiChannelPerform('kr1',  env1, env2, blend, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *ar1 { arg env1, env2, blend = 0.0, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^super.ar1.init( env1, env2, blend, mul, add, levelScale, levelBias, timeScale, gate)
 }
 *kr1 { arg env1, env2, blend = 0.0, mul = 1.0, add = 0.0,
   levelScale = 1.0, levelBias = 0.0, timeScale = 1.0, gate = -99.0;
  ^super.kr1.init( env1, env2, blend, mul, add, levelScale, levelBias, timeScale, gate)
 }
 
 //PRIVATE:
 init { arg argEnvelope1, argEnvelope2 ... theInputs;
  env1 = argEnvelope1.value;
  env2 = argEnvelope2.value;
  inputs = theInputs;
 } 
}

Osc1 : UGen {
 var table;
 
 *ar {
  arg table, dur=1.0, mul=1.0, add=0.0;
  ^this.multiChannelPerform('ar1', table, dur, mul, add)
 }
 *kr {
  arg table, dur=1.0, mul=1.0, add=0.0;
  ^this.multiChannelPerform('kr1', table, dur, mul, add)
 }
 *ar1 {
  arg table, dur=1.0, mul=1.0, add=0.0;
  ^super.ar1.init(table, dur, mul, add)
 }
 *kr1 {
  arg table, dur=1.0, mul=1.0, add=0.0;
  ^super.kr1.init(table, dur, mul, add)
 }
 
 init { arg aTable ... theInputs;
  inputs = theInputs;
  table = aTable;
 }
}

This page was created by SimpleText2Html 1.0.3 on 22-Feb-100.