v2/examples/stk/shake-cycle.ck

   1 // shake-cycle.ck : effects abuse
   2 // author: Adam Tindale
   3
   4 // the patch
   5 //Shakers s => Chorus c1 => JCRev rev => Chorus c2 => Chorus c3 =>dac;
   6 Shakers s  =>dac;
   7
   8 0 => s.which;
   9 1 => s.gain;
  10 100 => float theTime;
  11
  12 while( true )
  13 {
  14     1.0 => s.noteOn;
  15     theTime::ms => now;
  16
  17     1.0 => s.noteOff;
  18     theTime::ms => now;
  19
  20     ( s.which() + 1 ) % 20 => s.which;
  21     Std.rand2f(20,140) => theTime;
  22 }