timewavesynth8script.scd

   1 /*Order of execution to run script and record(goes from bottom to top):
   2 1. Hit "Ctrl/Cmd - Enter" anywhere inside the "LOAD SYNTH FUNCTIONS" parenthesis,
   3 2. Click on the same line as "START RECORDING;" (above the "LOAD SYNTH FUNCTIONS" parenthesis) and hit "Ctrl/Cmd - Enter",
   4 3. Hit "Ctrl/Cmd - Enter" anywhere inside the "TASK" parenthesis above the "START RECORDING;" line...
   5 The record file location will be found in the post window...
   6 Leave out #2 to run the script without recording...
   7 Important Note: You must load the Timewave Synthesizer program and press the "synth0" button at least once before this script can run.
   8 Press "Ctrl/Cmd - Period" to stop synth/free the sever. */
   9
  10 ((//3 - TASK
  11         t = Task({~st = 0; ~trace = {("event-"++(~st = ~st + 1).asString).postln;};
  12                 ~vol = 0.005;~vol1 = ~vol;~vol2 = ~vol;~vol3 = ~vol;~vol4 = ~vol;~vol5 = ~vol;~vol6 = ~vol;~vol7 = ~vol;~vol8 = ~vol;~vol9 = ~vol;~vol10 = ~vol;~vol11 = ~vol;~vol12 = ~vol;
  13                 1.do({
  14
  15                         //duration of each chord
  16                         a = 32;
  17
  18                         //copy and paste "saved" chords from the "copy" button inside the synthesizer program here:
  19                         //choose to change each duration individually by changing the "a" variable in the code below this line, as well as "synthopen/synthflow"
  20                         [~f1=519.95703782873,~f2=616.23193196285,~f3=667.17109017758,~f4=692.66874234338,~f5=526.88556162392,~f6=516.52701736121,~f7=508.61137210833,~f8=506.37212156992]; ~synthopen.value; ~trace.value; (a).wait;
  21                         [~f1=572.96170615003,~f2=572.96170615003,~f3=570.43914200903,~f4=570.43914200903,~f5=570.43914200903,~f6=516.52701736121,~f7=508.61137210833,~f8=506.37212156992]; ~synthflow.value; ~trace.value; (a).wait;
  22                         [~f1=572.96170615003,~f2=572.96170615003,~f3=709.68417951408,~f4=709.68417951408,~f5=661.30934745052,~f6=590.93477690798,~f7=575.49542543341,~f8=551.87055912019]; ~synthflow.value; ~trace.value; (a).wait;
  23                         [~f1=680.55068318264,~f2=680.55068318264,~f3=680.55068318264,~f4=680.55068318264,~f5=680.55068318264,~f6=590.93477690798,~f7=575.49542543341,~f8=551.87055912019]; ~synthflow.value; ~trace.value; (a).wait;
  24                         [~f1=680.55068318264,~f2=824.55305817848,~f3=770.04531637521,~f4=741.69937490481,~f5=715.97470919404,~f6=590.93477690798,~f7=575.49542543341,~f8=551.87055912019]; ~synthflow.value; ~trace.value; (a).wait;
  25                         [~f1=284.07777031607,~f2=285.96420129413,~f3=300.84921067741,~f4=341.16370743965,~f5=374.28694757008,~f6=478.14339589558,~f7=536.26742041046,~f8=579.31702821866]; ~synthflow.value; ~trace.value; (a).wait;
  26                         [~f1=284.07777031607,~f2=444.56939292983,~f3=444.56939292983,~f4=444.56939292983,~f5=444.56939292983,~f6=478.14339589558,~f7=536.26742041046,~f8=579.31702821866]; ~synthflow.value; ~trace.value; (a).wait;
  27                         [~f1=284.07777031607,~f2=392.035694412,~f3=392.035694412,~f4=392.9015574105,~f5=392.9015574105,~f6=478.14339589558,~f7=536.26742041046,~f8=579.31702821866]; ~synthflow.value; ~trace.value; (a).wait;
  28
  29                         //fade out function
  30                         b=0.00005;100.do({~vol1=~vol1-b;~vol2=~vol2-b;~vol3=~vol3-b;~vol4=~vol4-b;~vol5=~vol5-b;~vol6=~vol6-b;~vol7=~vol7-b;~vol8=~vol8-b;~synthflow.value;0.1.wait;});
  31
  32                         //stop everything
  33                         ~synthfree.value; 2.wait; s.stopRecording;
  34                         ~vol = 0.005;~vol1 = ~vol;~vol2 = ~vol;~vol3 = ~vol;~vol4 = ~vol;~vol5 = ~vol;~vol6 = ~vol;~vol7 = ~vol;~vol8 = ~vol;~vol9 = ~vol;~vol10 = ~vol;~vol11 = ~vol;~vol12 = ~vol;
  35
  36 });}););
  37 t.play;
  38 );
  39
  40 s.record; //2 - START RECORDING
  41 s.stopRecording; // STOP RECORDING
  42
  43 (//1 - LOAD SYNTH FUNCTIONS
  44 ~synthopen = {
  45                 case
  46                 {((~l1a.isRunning == false) and: (~l1a1.isRunning == false)) or: ~l1a1.isRunning == true}{
  47                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
  48                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
  49                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
  50                                 ~l1a1.set(\dur, f1,     \vol, vol1, \tune, tune);  ~l1b1.set(\dur, f1,  \vol, vol1, \tune, tune);
  51                                 ~l1c1.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d1.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
  52                                 ~l1e1.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f1.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
  53                                 ~l2a1.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b1.set(\dur, f2,  \vol, vol2, \tune, tune);
  54                                 ~l2c1.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d1.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
  55                                 ~l2e1.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f1.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
  56                                 ~l3a1.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b1.set(\dur, f3,  \vol, vol3, \tune, tune);
  57                                 ~l3c1.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d1.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
  58                                 ~l3e1.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f1.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
  59                                 ~l4a1.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b1.set(\dur, f4,  \vol, vol4, \tune, tune);
  60                                 ~l4c1.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d1.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
  61                                 ~l4e1.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f1.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
  62                                 ~l5a1.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b1.set(\dur, f5,  \vol, vol5, \tune, tune);
  63                                 ~l5c1.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d1.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
  64                                 ~l5e1.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f1.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
  65                                 ~l6a1.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b1.set(\dur, f6,  \vol, vol6, \tune, tune);
  66                                 ~l6c1.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d1.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
  67                                 ~l6e1.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f1.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
  68                                 ~l7a1.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b1.set(\dur, f7,  \vol, vol7, \tune, tune);
  69                                 ~l7c1.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d1.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
  70                                 ~l7e1.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f1.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
  71                                 ~l8a1.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b1.set(\dur, f8,  \vol, vol8, \tune, tune);
  72                                 ~l8c1.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d1.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
  73                                 ~l8e1.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f1.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
  74                         }););
  75
  76                         (
  77                                 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
  78                                         #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
  79                                         #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
  80                                         ~l1a = Synth(s1, [\dur, ~f1,    \vol, vol1, \tune, tune]).register;    ~l1b = Synth(s2, [\dur, ~f1,    \vol, vol1, \tune, tune]);
  81                                         ~l1c = Synth(s3, [\dur, ~f1/~icd3,  \vol, vol1, \tune, tune]);   ~l1d = Synth(s4, [\dur, ~f1/~icd3,  \vol, vol1, \tune, tune]);
  82                                         ~l1e = Synth(s5, [\dur, ~f1/~icd6,  \vol, vol1, \tune, tune]);   ~l1f = Synth(s6, [\dur, ~f1/~icd6,  \vol, vol1, \tune, tune]);
  83                                         ~l2a = Synth(s1, [\dur, ~f2,    \vol, vol2, \tune, tune]);        ~l2b = Synth(s2, [\dur, ~f2,    \vol, vol2, \tune, tune]);
  84                                         ~l2c = Synth(s3, [\dur, ~f2/~icd3,  \vol, vol2, \tune, tune]);   ~l2d = Synth(s4, [\dur, ~f2/~icd3,  \vol, vol2, \tune, tune]);
  85                                         ~l2e = Synth(s5, [\dur, ~f2/~icd6,  \vol, vol2, \tune, tune]);   ~l2f = Synth(s6, [\dur, ~f2/~icd6,  \vol, vol2, \tune, tune]);
  86                                         ~l3a = Synth(s1, [\dur, ~f3,    \vol, vol3, \tune, tune]);        ~l3b = Synth(s2, [\dur, ~f3,   \vol, vol3, \tune, tune]);
  87                                         ~l3c = Synth(s3, [\dur, ~f3/~icd3,  \vol, vol3, \tune, tune]);   ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3, \tune, tune]);
  88                                         ~l3e = Synth(s5, [\dur, ~f3/~icd6,  \vol, vol3, \tune, tune]);   ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3, \tune, tune]);
  89                                         ~l4a = Synth(s1, [\dur, ~f4,    \vol, vol4, \tune, tune]);       ~l4b = Synth(s2, [\dur, ~f4,   \vol, vol4, \tune, tune]);
  90                                         ~l4c = Synth(s3, [\dur, ~f4/~icd3,  \vol, vol4, \tune, tune]);  ~l4d = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4, \tune, tune]);
  91                                         ~l4e = Synth(s5, [\dur, ~f4/~icd6,  \vol, vol4, \tune, tune]);   ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4, \tune, tune]);
  92                                         ~l5a = Synth(s1, [\dur, ~f5,    \vol, vol5, \tune, tune]);       ~l5b = Synth(s2, [\dur, ~f5,   \vol, vol5, \tune, tune]);
  93                                         ~l5c = Synth(s3, [\dur, ~f5/~icd3,  \vol, vol5, \tune, tune]);   ~l5d = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5, \tune, tune]);
  94                                         ~l5e = Synth(s5, [\dur, ~f5/~icd6,  \vol, vol5, \tune, tune]);   ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5, \tune, tune]);
  95                                         ~l6a = Synth(s1, [\dur, ~f6,    \vol, vol6, \tune, tune]);       ~l6b = Synth(s2, [\dur, ~f6,   \vol, vol6, \tune, tune]);
  96                                         ~l6c = Synth(s3, [\dur, ~f6/~icd3,  \vol, vol6, \tune, tune]);   ~l6d = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6, \tune, tune]);
  97                                         ~l6e = Synth(s5, [\dur, ~f6/~icd6,  \vol, vol6, \tune, tune]);   ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6, \tune, tune]);
  98                                         ~l7a = Synth(s1, [\dur, ~f7,    \vol, vol7, \tune, tune]);       ~l7b = Synth(s2, [\dur, ~f7,   \vol, vol7, \tune, tune]);
  99                                         ~l7c = Synth(s3, [\dur, ~f7/~icd3,  \vol, vol7, \tune, tune]);   ~l7d = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7, \tune, tune]);
 100                                         ~l7e = Synth(s5, [\dur, ~f7/~icd6,  \vol, vol7, \tune, tune]);   ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7, \tune, tune]);
 101                                         ~l8a = Synth(s1, [\dur, ~f8,    \vol, vol8, \tune, tune]);  ~l8b = Synth(s2, [\dur, ~f8,   \vol, vol8, \tune, tune]);
 102                                         ~l8c = Synth(s3, [\dur, ~f8/~icd3,  \vol, vol8, \tune, tune]);   ~l8d = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8, \tune, tune]);
 103                                         ~l8e = Synth(s5, [\dur, ~f8/~icd6,  \vol, vol8, \tune, tune]);   ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8, \tune, tune]);
 104
 105                                 });
 106                         );
 107                         AppClock.sched(0.161803398875,{
 108                                 ([~l1a1,~l1b1,~l1c1,~l1d1,~l1e1,~l1f1,~l2a1,~l2b1,~l2c1,~l2d1,~l2e1,~l2f1,~l3a1,~l3b1,~l3c1,~l3d1,~l3e1,~l3f1,~l4a1,~l4b1,~l4c1,~l4d1,~l4e1,~l4f1,~l5a1,~l5b1,~l5c1,~l5d1,~l5e1,~l5f1,~l6a1,~l6b1,~l6c1,~l6d1,~l6e1,~l6f1,~l7a1,~l7b1,~l7c1,~l7d1,~l7e1,~l7f1,~l8a1,~l8b1,~l8c1,~l8d1,~l8e1,~l8f1 ].do(_.free)); ~slideroutine.stop;
 109                         });
 110                 }
 111                 {~l1a.isRunning == true}{
 112                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 113                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 114                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
 115                                 ~l1a.set(\dur, f1,     \vol, vol1, \tune, tune);  ~l1b.set(\dur, f1,  \vol, vol1, \tune, tune);
 116                                 ~l1c.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
 117                                 ~l1e.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
 118                                 ~l2a.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b.set(\dur, f2,  \vol, vol2, \tune, tune);
 119                                 ~l2c.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
 120                                 ~l2e.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
 121                                 ~l3a.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b.set(\dur, f3,  \vol, vol3, \tune, tune);
 122                                 ~l3c.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
 123                                 ~l3e.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
 124                                 ~l4a.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b.set(\dur, f4,  \vol, vol4, \tune, tune);
 125                                 ~l4c.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
 126                                 ~l4e.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
 127                                 ~l5a.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b.set(\dur, f5,  \vol, vol5, \tune, tune);
 128                                 ~l5c.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
 129                                 ~l5e.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
 130                                 ~l6a.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b.set(\dur, f6,  \vol, vol6, \tune, tune);
 131                                 ~l6c.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
 132                                 ~l6e.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
 133                                 ~l7a.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b.set(\dur, f7,  \vol, vol7, \tune, tune);
 134                                 ~l7c.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
 135                                 ~l7e.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
 136                                 ~l8a.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b.set(\dur, f8,  \vol, vol8, \tune, tune);
 137                                 ~l8c.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
 138                                 ~l8e.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
 139                         }););
 140
 141                         (
 142                                 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 143                                         #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 144                                         #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
 145                                         ~l1a1 = Synth(s1, [\dur, ~f1,    \vol, vol1, \tune, tune]).register;    ~l1b1 = Synth(s2, [\dur, ~f1,    \vol, vol1, \tune, tune]);
 146                                         ~l1c1 = Synth(s3, [\dur, ~f1/~icd3,  \vol, vol1, \tune, tune]);   ~l1d1 = Synth(s4, [\dur, ~f1/~icd3,  \vol, vol1, \tune, tune]);
 147                                         ~l1e1 = Synth(s5, [\dur, ~f1/~icd6,  \vol, vol1, \tune, tune]);   ~l1f1 = Synth(s6, [\dur, ~f1/~icd6,  \vol, vol1, \tune, tune]);
 148                                         ~l2a1 = Synth(s1, [\dur, ~f2,    \vol, vol2, \tune, tune]);        ~l2b1 = Synth(s2, [\dur, ~f2,    \vol, vol2, \tune, tune]);
 149                                         ~l2c1 = Synth(s3, [\dur, ~f2/~icd3,  \vol, vol2, \tune, tune]);   ~l2d1 = Synth(s4, [\dur, ~f2/~icd3,  \vol, vol2, \tune, tune]);
 150                                         ~l2e1 = Synth(s5, [\dur, ~f2/~icd6,  \vol, vol2, \tune, tune]);   ~l2f1 = Synth(s6, [\dur, ~f2/~icd6,  \vol, vol2, \tune, tune]);
 151                                         ~l3a1 = Synth(s1, [\dur, ~f3,    \vol, vol3, \tune, tune]);        ~l3b1 = Synth(s2, [\dur, ~f3,   \vol, vol3, \tune, tune]);
 152                                         ~l3c1 = Synth(s3, [\dur, ~f3/~icd3,  \vol, vol3, \tune, tune]);   ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3, \tune, tune]);
 153                                         ~l3e1 = Synth(s5, [\dur, ~f3/~icd6,  \vol, vol3, \tune, tune]);   ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3, \tune, tune]);
 154                                         ~l4a1 = Synth(s1, [\dur, ~f4,    \vol, vol4, \tune, tune]);       ~l4b1 = Synth(s2, [\dur, ~f4,   \vol, vol4, \tune, tune]);
 155                                         ~l4c1 = Synth(s3, [\dur, ~f4/~icd3,  \vol, vol4, \tune, tune]);  ~l4d1 = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4, \tune, tune]);
 156                                         ~l4e1 = Synth(s5, [\dur, ~f4/~icd6,  \vol, vol4, \tune, tune]);   ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4, \tune, tune]);
 157                                         ~l5a1 = Synth(s1, [\dur, ~f5,    \vol, vol5, \tune, tune]);       ~l5b1 = Synth(s2, [\dur, ~f5,   \vol, vol5, \tune, tune]);
 158                                         ~l5c1 = Synth(s3, [\dur, ~f5/~icd3,  \vol, vol5, \tune, tune]);   ~l5d1 = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5, \tune, tune]);
 159                                         ~l5e1 = Synth(s5, [\dur, ~f5/~icd6,  \vol, vol5, \tune, tune]);   ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5, \tune, tune]);
 160                                         ~l6a1 = Synth(s1, [\dur, ~f6,    \vol, vol6, \tune, tune]);       ~l6b1 = Synth(s2, [\dur, ~f6,   \vol, vol6, \tune, tune]);
 161                                         ~l6c1 = Synth(s3, [\dur, ~f6/~icd3,  \vol, vol6, \tune, tune]);   ~l6d1 = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6, \tune, tune]);
 162                                         ~l6e1 = Synth(s5, [\dur, ~f6/~icd6,  \vol, vol6, \tune, tune]);   ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6, \tune, tune]);
 163                                         ~l7a1 = Synth(s1, [\dur, ~f7,    \vol, vol7, \tune, tune]);       ~l7b1 = Synth(s2, [\dur, ~f7,   \vol, vol7, \tune, tune]);
 164                                         ~l7c1 = Synth(s3, [\dur, ~f7/~icd3,  \vol, vol7, \tune, tune]);   ~l7d1 = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7, \tune, tune]);
 165                                         ~l7e1 = Synth(s5, [\dur, ~f7/~icd6,  \vol, vol7, \tune, tune]);   ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7, \tune, tune]);
 166                                         ~l8a1 = Synth(s1, [\dur, ~f8,    \vol, vol8, \tune, tune]);  ~l8b1 = Synth(s2, [\dur, ~f8,   \vol, vol8, \tune, tune]);
 167                                         ~l8c1 = Synth(s3, [\dur, ~f8/~icd3,  \vol, vol8, \tune, tune]);   ~l8d1 = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8, \tune, tune]);
 168                                         ~l8e1 = Synth(s5, [\dur, ~f8/~icd6,  \vol, vol8, \tune, tune]);   ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8, \tune, tune]);
 169
 170                                 });
 171                         );
 172                         AppClock.sched(0.161803398875,{
 173                                 ([~l1a,~l1b,~l1c,~l1d,~l1e,~l1f,~l2a,~l2b,~l2c,~l2d,~l2e,~l2f,~l3a,~l3b,~l3c,~l3d,~l3e,~l3f,~l4a,~l4b,~l4c,~l4d,~l4e,~l4f,~l5a,~l5b,~l5c,~l5d,~l5e,~l5f,~l6a,~l6b,~l6c,~l6d,~l6e,~l6f,~l7a,~l7b,~l7c,~l7d,~l7e,~l7f,~l8a,~l8b,~l8c,~l8d,~l8e,~l8f].do(_.free)); ~slideroutine.stop;
 174                         });
 175                 };
 176         };
 177
 178 ~synthflow = {
 179                 case
 180                 {~l1a1.isRunning == true}{
 181                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 182                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 183                                 ~l1a1.set(\dur, ~f1,     \vol, vol1, \tune, tune);  ~l1b1.set(\dur, ~f1,  \vol, vol1, \tune, tune);
 184                                 ~l1c1.set(\dur, ~f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d1.set(\dur, ~f1/~icd3,  \vol, vol1, \tune, tune);
 185                                 ~l1e1.set(\dur, ~f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f1.set(\dur, ~f1/~icd6,  \vol, vol1, \tune, tune);
 186                                 ~l2a1.set(\dur, ~f2,     \vol, vol2, \tune, tune);          ~l2b1.set(\dur, ~f2,  \vol, vol2, \tune, tune);
 187                                 ~l2c1.set(\dur, ~f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d1.set(\dur, ~f2/~icd3,  \vol, vol2, \tune, tune);
 188                                 ~l2e1.set(\dur, ~f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f1.set(\dur, ~f2/~icd6,  \vol, vol2, \tune, tune);
 189                                 ~l3a1.set(\dur, ~f3,     \vol, vol3, \tune, tune);          ~l3b1.set(\dur, ~f3,  \vol, vol3, \tune, tune);
 190                                 ~l3c1.set(\dur, ~f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d1.set(\dur, ~f3/~icd3,  \vol, vol3, \tune, tune);
 191                                 ~l3e1.set(\dur, ~f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f1.set(\dur, ~f3/~icd6,  \vol, vol3, \tune, tune);
 192                                 ~l4a1.set(\dur, ~f4,    \vol, vol4, \tune, tune);           ~l4b1.set(\dur, ~f4,  \vol, vol4, \tune, tune);
 193                                 ~l4c1.set(\dur, ~f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d1.set(\dur, ~f4/~icd3,  \vol, vol4, \tune, tune);
 194                                 ~l4e1.set(\dur, ~f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f1.set(\dur, ~f4/~icd6,  \vol, vol4, \tune, tune);
 195                                 ~l5a1.set(\dur, ~f5,    \vol, vol5, \tune, tune);           ~l5b1.set(\dur, ~f5,  \vol, vol5, \tune, tune);
 196                                 ~l5c1.set(\dur, ~f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d1.set(\dur, ~f5/~icd3,  \vol, vol5, \tune, tune);
 197                                 ~l5e1.set(\dur, ~f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f1.set(\dur, ~f5/~icd6,  \vol, vol5, \tune, tune);
 198                                 ~l6a1.set(\dur, ~f6,    \vol, vol6, \tune, tune);           ~l6b1.set(\dur, ~f6,  \vol, vol6, \tune, tune);
 199                                 ~l6c1.set(\dur, ~f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d1.set(\dur, ~f6/~icd3,  \vol, vol6, \tune, tune);
 200                                 ~l6e1.set(\dur, ~f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f1.set(\dur, ~f6/~icd6,  \vol, vol6, \tune, tune);
 201                                 ~l7a1.set(\dur, ~f7,    \vol, vol7, \tune, tune);           ~l7b1.set(\dur, ~f7,  \vol, vol7, \tune, tune);
 202                                 ~l7c1.set(\dur, ~f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d1.set(\dur, ~f7/~icd3,  \vol, vol7, \tune, tune);
 203                                 ~l7e1.set(\dur, ~f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f1.set(\dur, ~f7/~icd6,  \vol, vol7, \tune, tune);
 204                                 ~l8a1.set(\dur, ~f8,    \vol, vol8, \tune, tune);           ~l8b1.set(\dur, ~f8,  \vol, vol8, \tune, tune);
 205                                 ~l8c1.set(\dur, ~f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d1.set(\dur, ~f8/~icd3,  \vol, vol8, \tune, tune);
 206                                 ~l8e1.set(\dur, ~f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f1.set(\dur, ~f8/~icd6,  \vol, vol8, \tune, tune);
 207                         }););
 208                 }
 209                 {~l1a.isRunning == true} {
 210                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 211                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 212                                 ~l1a.set(\dur, ~f1,     \vol, vol1, \tune, tune);  ~l1b.set(\dur, ~f1,  \vol, vol1, \tune, tune);
 213                                 ~l1c.set(\dur, ~f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d.set(\dur, ~f1/~icd3,  \vol, vol1, \tune, tune);
 214                                 ~l1e.set(\dur, ~f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f.set(\dur, ~f1/~icd6,  \vol, vol1, \tune, tune);
 215                                 ~l2a.set(\dur, ~f2,     \vol, vol2, \tune, tune);          ~l2b.set(\dur, ~f2,  \vol, vol2, \tune, tune);
 216                                 ~l2c.set(\dur, ~f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d.set(\dur, ~f2/~icd3,  \vol, vol2, \tune, tune);
 217                                 ~l2e.set(\dur, ~f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f.set(\dur, ~f2/~icd6,  \vol, vol2, \tune, tune);
 218                                 ~l3a.set(\dur, ~f3,     \vol, vol3, \tune, tune);          ~l3b.set(\dur, ~f3,  \vol, vol3, \tune, tune);
 219                                 ~l3c.set(\dur, ~f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d.set(\dur, ~f3/~icd3,  \vol, vol3, \tune, tune);
 220                                 ~l3e.set(\dur, ~f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f.set(\dur, ~f3/~icd6,  \vol, vol3, \tune, tune);
 221                                 ~l4a.set(\dur, ~f4,    \vol, vol4, \tune, tune);           ~l4b.set(\dur, ~f4,  \vol, vol4, \tune, tune);
 222                                 ~l4c.set(\dur, ~f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d.set(\dur, ~f4/~icd3,  \vol, vol4, \tune, tune);
 223                                 ~l4e.set(\dur, ~f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f.set(\dur, ~f4/~icd6,  \vol, vol4, \tune, tune);
 224                                 ~l5a.set(\dur, ~f5,    \vol, vol5, \tune, tune);           ~l5b.set(\dur, ~f5,  \vol, vol5, \tune, tune);
 225                                 ~l5c.set(\dur, ~f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d.set(\dur, ~f5/~icd3,  \vol, vol5, \tune, tune);
 226                                 ~l5e.set(\dur, ~f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f.set(\dur, ~f5/~icd6,  \vol, vol5, \tune, tune);
 227                                 ~l6a.set(\dur, ~f6,    \vol, vol6, \tune, tune);           ~l6b.set(\dur, ~f6,  \vol, vol6, \tune, tune);
 228                                 ~l6c.set(\dur, ~f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d.set(\dur, ~f6/~icd3,  \vol, vol6, \tune, tune);
 229                                 ~l6e.set(\dur, ~f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f.set(\dur, ~f6/~icd6,  \vol, vol6, \tune, tune);
 230                                 ~l7a.set(\dur, ~f7,    \vol, vol7, \tune, tune);           ~l7b.set(\dur, ~f7,  \vol, vol7, \tune, tune);
 231                                 ~l7c.set(\dur, ~f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d.set(\dur, ~f7/~icd3,  \vol, vol7, \tune, tune);
 232                                 ~l7e.set(\dur, ~f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f.set(\dur, ~f7/~icd6,  \vol, vol7, \tune, tune);
 233                                 ~l8a.set(\dur, ~f8,    \vol, vol8, \tune, tune);           ~l8b.set(\dur, ~f8,  \vol, vol8, \tune, tune);
 234                                 ~l8c.set(\dur, ~f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d.set(\dur, ~f8/~icd3,  \vol, vol8, \tune, tune);
 235                                 ~l8e.set(\dur, ~f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f.set(\dur, ~f8/~icd6,  \vol, vol8, \tune, tune);
 236
 237                         }););
 238                 };
 239         };
 240
 241 ~synthslide = {case{~l1a1.isRunning == true}{(
 242         ~slideroutine = Routine({
 243                 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 244                         #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8= [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 245                         #g,h,i,j,k,l,m,n = (([ s,t,u,v,w,x,y,z ]-[ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8 ])*(-1)/~slidedo);
 246                         ~slidedo.do({([ s=s+g,t=t+h,u=u+i,v=v+j,w=w+k,x=x+l,y=y+m,z=z+n ];
 247                                 ~l1a1.set(\dur, s, \vol, vol1, \tune, tune);
 248                                 ~l1b1.set(\dur, s, \vol, vol1, \tune, tune);
 249                                 ~l1c1.set(\dur, s/~icd3, \vol, vol1, \tune, tune);
 250                                 ~l1d1.set(\dur, s/~icd3, \vol, vol1, \tune, tune);
 251                                 ~l1e1.set(\dur, s/~icd6, \vol, vol1, \tune, tune);
 252                                 ~l1f1.set(\dur, s/~icd6, \vol, vol1, \tune, tune);
 253                                 ~l2a1.set(\dur, t, \vol, vol2, \tune, tune);
 254                                 ~l2b1.set(\dur, t, \vol, vol2, \tune, tune);
 255                                 ~l2c1.set(\dur, t/~icd3, \vol, vol2, \tune, tune);
 256                                 ~l2d1.set(\dur, t/~icd3, \vol, vol2, \tune, tune);
 257                                 ~l2e1.set(\dur, t/~icd6, \vol, vol2, \tune, tune);
 258                                 ~l2f1.set(\dur, t/~icd6, \vol, vol2, \tune, tune);
 259                                 ~l3a1.set(\dur, u, \vol, vol3, \tune, tune);
 260                                 ~l3b1.set(\dur, u, \vol, vol3, \tune, tune);
 261                                 ~l3c1.set(\dur, u/~icd3, \vol, vol3, \tune, tune);
 262                                 ~l3d1.set(\dur, u/~icd3, \vol, vol3, \tune, tune);
 263                                 ~l3e1.set(\dur, u/~icd6, \vol, vol3, \tune, tune);
 264                                 ~l3f1.set(\dur, u/~icd6, \vol, vol3, \tune, tune);
 265                                 ~l4a1.set(\dur, v, \vol, vol4, \tune, tune);
 266                                 ~l4b1.set(\dur, v, \vol, vol4, \tune, tune);
 267                                 ~l4c1.set(\dur, v/~icd3, \vol, vol4, \tune, tune);
 268                                 ~l4d1.set(\dur, v/~icd3, \vol, vol4, \tune, tune);
 269                                 ~l4e1.set(\dur, v/~icd6, \vol, vol4, \tune, tune);
 270                                 ~l4f1.set(\dur, v/~icd6, \vol, vol4, \tune, tune);
 271                                 ~l5a1.set(\dur, w, \vol, vol5, \tune, tune);
 272                                 ~l5b1.set(\dur, w, \vol, vol5, \tune, tune);
 273                                 ~l5c1.set(\dur, w/~icd3, \vol, vol5, \tune, tune);
 274                                 ~l5d1.set(\dur, w/~icd3, \vol, vol5, \tune, tune);
 275                                 ~l5e1.set(\dur, w/~icd6, \vol, vol5, \tune, tune);
 276                                 ~l5f1.set(\dur, w/~icd6, \vol, vol5, \tune, tune);
 277                                 ~l6a1.set(\dur, x, \vol, vol6, \tune, tune);
 278                                 ~l6b1.set(\dur, x, \vol, vol6, \tune, tune);
 279                                 ~l6c1.set(\dur, x/~icd3, \vol, vol6, \tune, tune);
 280                                 ~l6d1.set(\dur, x/~icd3, \vol, vol6, \tune, tune);
 281                                 ~l6e1.set(\dur, x/~icd6, \vol, vol6, \tune, tune);
 282                                 ~l6f1.set(\dur, x/~icd6, \vol, vol6, \tune, tune);
 283                                 ~l7a1.set(\dur, y, \vol, vol7, \tune, tune);
 284                                 ~l7b1.set(\dur, y, \vol, vol7, \tune, tune);
 285                                 ~l7c1.set(\dur, y/~icd3, \vol, vol7, \tune, tune);
 286                                 ~l7d1.set(\dur, y/~icd3, \vol, vol7, \tune, tune);
 287                                 ~l7e1.set(\dur, y/~icd6, \vol, vol7, \tune, tune);
 288                                 ~l7f1.set(\dur, y/~icd6, \vol, vol7, \tune, tune);
 289                                 ~l8a1.set(\dur, z, \vol, vol8, \tune, tune);
 290                                 ~l8b1.set(\dur, z, \vol, vol8, \tune, tune);
 291                                 ~l8c1.set(\dur, z/~icd3, \vol, vol8, \tune, tune);
 292                                 ~l8d1.set(\dur, z/~icd3, \vol, vol8, \tune, tune);
 293                                 ~l8e1.set(\dur, z/~icd6, \vol, vol8, \tune, tune);
 294                                 ~l8f1.set(\dur, z/~icd6, \vol, vol8, \tune, tune);
 295                                 );
 296                                 (~slidetime/~slidedo).wait;
 297         });});}).play;);}{~l1a.isRunning == true} {(
 298                 ~slideroutine = Routine({1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 299                         #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8= [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 300                         #g,h,i,j,k,l,m,n = (([ s,t,u,v,w,x,y,z ]-[ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8 ])*(-1)/~slidedo);
 301                         ~slidedo.do({([ s=s+g,t=t+h,u=u+i,v=v+j,w=w+k,x=x+l,y=y+m,z=z+n ];
 302                                 ~l1a.set(\dur, s, \vol, vol1, \tune, tune);
 303                                 ~l1b.set(\dur, s, \vol, vol1, \tune, tune);
 304                                 ~l1c.set(\dur, s/~icd3, \vol, vol1, \tune, tune);
 305                                 ~l1d.set(\dur, s/~icd3, \vol, vol1, \tune, tune);
 306                                 ~l1e.set(\dur, s/~icd6, \vol, vol1, \tune, tune);
 307                                 ~l1f.set(\dur, s/~icd6, \vol, vol1, \tune, tune);
 308                                 ~l2a.set(\dur, t, \vol, vol2, \tune, tune);
 309                                 ~l2b.set(\dur, t, \vol, vol2, \tune, tune);
 310                                 ~l2c.set(\dur, t/~icd3, \vol, vol2, \tune, tune);
 311                                 ~l2d.set(\dur, t/~icd3, \vol, vol2, \tune, tune);
 312                                 ~l2e.set(\dur, t/~icd6, \vol, vol2, \tune, tune);
 313                                 ~l2f.set(\dur, t/~icd6, \vol, vol2, \tune, tune);
 314                                 ~l3a.set(\dur, u, \vol, vol3, \tune, tune);
 315                                 ~l3b.set(\dur, u, \vol, vol3, \tune, tune);
 316                                 ~l3c.set(\dur, u/~icd3, \vol, vol3, \tune, tune);
 317                                 ~l3d.set(\dur, u/~icd3, \vol, vol3, \tune, tune);
 318                                 ~l3e.set(\dur, u/~icd6, \vol, vol3, \tune, tune);
 319                                 ~l3f.set(\dur, u/~icd6, \vol, vol3, \tune, tune);
 320                                 ~l4a.set(\dur, v, \vol, vol4, \tune, tune);
 321                                 ~l4b.set(\dur, v, \vol, vol4, \tune, tune);
 322                                 ~l4c.set(\dur, v/~icd3, \vol, vol4, \tune, tune);
 323                                 ~l4d.set(\dur, v/~icd3, \vol, vol4, \tune, tune);
 324                                 ~l4e.set(\dur, v/~icd6, \vol, vol4, \tune, tune);
 325                                 ~l4f.set(\dur, v/~icd6, \vol, vol4, \tune, tune);
 326                                 ~l5a.set(\dur, w, \vol, vol5, \tune, tune);
 327                                 ~l5b.set(\dur, w, \vol, vol5, \tune, tune);
 328                                 ~l5c.set(\dur, w/~icd3, \vol, vol5, \tune, tune);
 329                                 ~l5d.set(\dur, w/~icd3, \vol, vol5, \tune, tune);
 330                                 ~l5e.set(\dur, w/~icd6, \vol, vol5, \tune, tune);
 331                                 ~l5f.set(\dur, w/~icd6, \vol, vol5, \tune, tune);
 332                                 ~l6a.set(\dur, x, \vol, vol6, \tune, tune);
 333                                 ~l6b.set(\dur, x, \vol, vol6, \tune, tune);
 334                                 ~l6c.set(\dur, x/~icd3, \vol, vol6, \tune, tune);
 335                                 ~l6d.set(\dur, x/~icd3, \vol, vol6, \tune, tune);
 336                                 ~l6e.set(\dur, x/~icd6, \vol, vol6, \tune, tune);
 337                                 ~l6f.set(\dur, x/~icd6, \vol, vol6, \tune, tune);
 338                                 ~l7a.set(\dur, y, \vol, vol7, \tune, tune);
 339                                 ~l7b.set(\dur, y, \vol, vol7, \tune, tune);
 340                                 ~l7c.set(\dur, y/~icd3, \vol, vol7, \tune, tune);
 341                                 ~l7d.set(\dur, y/~icd3, \vol, vol7, \tune, tune);
 342                                 ~l7e.set(\dur, y/~icd6, \vol, vol7, \tune, tune);
 343                                 ~l7f.set(\dur, y/~icd6, \vol, vol7, \tune, tune);
 344                                 ~l8a.set(\dur, z, \vol, vol8, \tune, tune);
 345                                 ~l8b.set(\dur, z, \vol, vol8, \tune, tune);
 346                                 ~l8c.set(\dur, z/~icd3, \vol, vol8, \tune, tune);
 347                                 ~l8d.set(\dur, z/~icd3, \vol, vol8, \tune, tune);
 348                                 ~l8e.set(\dur, z/~icd6, \vol, vol8, \tune, tune);
 349                                 ~l8f.set(\dur, z/~icd6, \vol, vol8, \tune, tune);
 350                                 );
 351                                 (~slidetime/~slidedo).wait;});});
 352 }).play;);};};
 353
 354
 355 ~synthpause = {(
 356                 case
 357                 {~l1a1.isRunning == true}{
 358                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 359                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 360                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
 361                                 ~l1a1.set(\dur, f1,     \vol, vol1, \tune, tune);          ~l1b1.set(\dur, f1,  \vol, vol1, \tune, tune);
 362                                 ~l1c1.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d1.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
 363                                 ~l1e1.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f1.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
 364                                 ~l2a1.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b1.set(\dur, f2,  \vol, vol2, \tune, tune);
 365                                 ~l2c1.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d1.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
 366                                 ~l2e1.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f1.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
 367                                 ~l3a1.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b1.set(\dur, f3,  \vol, vol3, \tune, tune);
 368                                 ~l3c1.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d1.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
 369                                 ~l3e1.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f1.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
 370                                 ~l4a1.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b1.set(\dur, f4,  \vol, vol4, \tune, tune);
 371                                 ~l4c1.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d1.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
 372                                 ~l4e1.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f1.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
 373                                 ~l5a1.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b1.set(\dur, f5,  \vol, vol5, \tune, tune);
 374                                 ~l5c1.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d1.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
 375                                 ~l5e1.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f1.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
 376                                 ~l6a1.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b1.set(\dur, f6,  \vol, vol6, \tune, tune);
 377                                 ~l6c1.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d1.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
 378                                 ~l6e1.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f1.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
 379                                 ~l7a1.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b1.set(\dur, f7,  \vol, vol7, \tune, tune);
 380                                 ~l7c1.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d1.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
 381                                 ~l7e1.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f1.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
 382                                 ~l8a1.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b1.set(\dur, f8,  \vol, vol8, \tune, tune);
 383                                 ~l8c1.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d1.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
 384                                 ~l8e1.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f1.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
 385                         }););
 386                 }
 387                 {~l1a.isRunning == true} {
 388                         (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 389                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 390                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
 391                                 ~l1a.set(\dur, f1,     \vol, vol1, \tune, tune);  ~l1b.set(\dur, f1,  \vol, vol1, \tune, tune);
 392                                 ~l1c.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
 393                                 ~l1e.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
 394                                 ~l2a.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b.set(\dur, f2,  \vol, vol2, \tune, tune);
 395                                 ~l2c.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
 396                                 ~l2e.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
 397                                 ~l3a.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b.set(\dur, f3,  \vol, vol3, \tune, tune);
 398                                 ~l3c.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
 399                                 ~l3e.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
 400                                 ~l4a.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b.set(\dur, f4,  \vol, vol4, \tune, tune);
 401                                 ~l4c.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
 402                                 ~l4e.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
 403                                 ~l5a.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b.set(\dur, f5,  \vol, vol5, \tune, tune);
 404                                 ~l5c.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
 405                                 ~l5e.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
 406                                 ~l6a.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b.set(\dur, f6,  \vol, vol6, \tune, tune);
 407                                 ~l6c.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
 408                                 ~l6e.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
 409                                 ~l7a.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b.set(\dur, f7,  \vol, vol7, \tune, tune);
 410                                 ~l7c.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
 411                                 ~l7e.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
 412                                 ~l8a.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b.set(\dur, f8,  \vol, vol8, \tune, tune);
 413                                 ~l8c.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
 414                                 ~l8e.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
 415
 416                         }););
 417                 };
 418                 );
 419         };
 420
 421 ~synthfree = {
 422                 (
 423                         case
 424                         {((~l1a.isRunning == false) and: (~l1a1.isRunning == false)) or: ~l1a1.isRunning == true}{
 425                                 (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 426                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 427                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
 428                                         ~l1a1.set(\dur, f1,     \vol, vol1, \tune, tune);  ~l1b1.set(\dur, f1,  \vol, vol1, \tune, tune);
 429                                         ~l1c1.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d1.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
 430                                         ~l1e1.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f1.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
 431                                         ~l2a1.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b1.set(\dur, f2,  \vol, vol2, \tune, tune);
 432                                         ~l2c1.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d1.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
 433                                         ~l2e1.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f1.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
 434                                         ~l3a1.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b1.set(\dur, f3,  \vol, vol3, \tune, tune);
 435                                         ~l3c1.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d1.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
 436                                         ~l3e1.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f1.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
 437                                         ~l4a1.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b1.set(\dur, f4,  \vol, vol4, \tune, tune);
 438                                         ~l4c1.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d1.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
 439                                         ~l4e1.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f1.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
 440                                         ~l5a1.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b1.set(\dur, f5,  \vol, vol5, \tune, tune);
 441                                         ~l5c1.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d1.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
 442                                         ~l5e1.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f1.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
 443                                         ~l6a1.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b1.set(\dur, f6,  \vol, vol6, \tune, tune);
 444                                         ~l6c1.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d1.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
 445                                         ~l6e1.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f1.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
 446                                         ~l7a1.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b1.set(\dur, f7,  \vol, vol7, \tune, tune);
 447                                         ~l7c1.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d1.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
 448                                         ~l7e1.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f1.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
 449                                         ~l8a1.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b1.set(\dur, f8,  \vol, vol8, \tune, tune);
 450                                         ~l8c1.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d1.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
 451                                         ~l8e1.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f1.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
 452                                 }););
 453                                 AppClock.sched(0.161803398875,{
 454                                         ([~l1a1,~l1b1,~l1c1,~l1d1,~l1e1,~l1f1,~l2a1,~l2b1,~l2c1,~l2d1,~l2e1,~l2f1,~l3a1,~l3b1,~l3c1,~l3d1,~l3e1,~l3f1,~l4a1,~l4b1,~l4c1,~l4d1,~l4e1,~l4f1,~l5a1,~l5b1,~l5c1,~l5d1,~l5e1,~l5f1,~l6a1,~l6b1,~l6c1,~l6d1,~l6e1,~l6f1,~l7a1,~l7b1,~l7c1,~l7d1,~l7e1,~l7f1,~l8a1,~l8b1,~l8c1,~l8d1,~l8e1,~l8f1 ].do(_.free)); ~slideroutine.stop;
 455                                 });
 456                         }
 457                         {~l1a.isRunning == true}{
 458                                 (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,f1,f2,f3,f4,f5,f6,f7,f8,tune=0;
 459                                 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
 460                                 #f1,f2,f3,f4,f5,f6,f7,f8 = [ 0,0,0,0,0,0,0,0 ];
 461                                         ~l1a.set(\dur, f1,     \vol, vol1, \tune, tune);  ~l1b.set(\dur, f1,  \vol, vol1, \tune, tune);
 462                                         ~l1c.set(\dur, f1/~icd3,       \vol, vol1, \tune, tune);  ~l1d.set(\dur, f1/~icd3,  \vol, vol1, \tune, tune);
 463                                         ~l1e.set(\dur, f1/~icd6,       \vol, vol1, \tune, tune);  ~l1f.set(\dur, f1/~icd6,  \vol, vol1, \tune, tune);
 464                                         ~l2a.set(\dur, f2,     \vol, vol2, \tune, tune);          ~l2b.set(\dur, f2,  \vol, vol2, \tune, tune);
 465                                         ~l2c.set(\dur, f2/~icd3,       \vol, vol2, \tune, tune);  ~l2d.set(\dur, f2/~icd3,  \vol, vol2, \tune, tune);
 466                                         ~l2e.set(\dur, f2/~icd6,       \vol, vol2, \tune, tune);  ~l2f.set(\dur, f2/~icd6,  \vol, vol2, \tune, tune);
 467                                         ~l3a.set(\dur, f3,     \vol, vol3, \tune, tune);          ~l3b.set(\dur, f3,  \vol, vol3, \tune, tune);
 468                                         ~l3c.set(\dur, f3/~icd3,       \vol, vol3, \tune, tune);  ~l3d.set(\dur, f3/~icd3,  \vol, vol3, \tune, tune);
 469                                         ~l3e.set(\dur, f3/~icd6,       \vol, vol3, \tune, tune);  ~l3f.set(\dur, f3/~icd6,  \vol, vol3, \tune, tune);
 470                                         ~l4a.set(\dur, f4,    \vol, vol4, \tune, tune);           ~l4b.set(\dur, f4,  \vol, vol4, \tune, tune);
 471                                         ~l4c.set(\dur, f4/~icd3,       \vol, vol4, \tune, tune);  ~l4d.set(\dur, f4/~icd3,  \vol, vol4, \tune, tune);
 472                                         ~l4e.set(\dur, f4/~icd6,       \vol, vol4, \tune, tune);  ~l4f.set(\dur, f4/~icd6,  \vol, vol4, \tune, tune);
 473                                         ~l5a.set(\dur, f5,    \vol, vol5, \tune, tune);           ~l5b.set(\dur, f5,  \vol, vol5, \tune, tune);
 474                                         ~l5c.set(\dur, f5/~icd3,       \vol, vol5, \tune, tune);  ~l5d.set(\dur, f5/~icd3,  \vol, vol5, \tune, tune);
 475                                         ~l5e.set(\dur, f5/~icd6,       \vol, vol5, \tune, tune);  ~l5f.set(\dur, f5/~icd6,  \vol, vol5, \tune, tune);
 476                                         ~l6a.set(\dur, f6,    \vol, vol6, \tune, tune);           ~l6b.set(\dur, f6,  \vol, vol6, \tune, tune);
 477                                         ~l6c.set(\dur, f6/~icd3,       \vol, vol6, \tune, tune);  ~l6d.set(\dur, f6/~icd3,  \vol, vol6, \tune, tune);
 478                                         ~l6e.set(\dur, f6/~icd6,       \vol, vol6, \tune, tune);  ~l6f.set(\dur, f6/~icd6,  \vol, vol6, \tune, tune);
 479                                         ~l7a.set(\dur, f7,    \vol, vol7, \tune, tune);           ~l7b.set(\dur, f7,  \vol, vol7, \tune, tune);
 480                                         ~l7c.set(\dur, f7/~icd3,       \vol, vol7, \tune, tune);  ~l7d.set(\dur, f7/~icd3,  \vol, vol7, \tune, tune);
 481                                         ~l7e.set(\dur, f7/~icd6,       \vol, vol7, \tune, tune);  ~l7f.set(\dur, f7/~icd6,  \vol, vol7, \tune, tune);
 482                                         ~l8a.set(\dur, f8,    \vol, vol8, \tune, tune);           ~l8b.set(\dur, f8,  \vol, vol8, \tune, tune);
 483                                         ~l8c.set(\dur, f8/~icd3,       \vol, vol8, \tune, tune);  ~l8d.set(\dur, f8/~icd3,  \vol, vol8, \tune, tune);
 484                                         ~l8e.set(\dur, f8/~icd6,       \vol, vol8, \tune, tune);  ~l8f.set(\dur, f8/~icd6,  \vol, vol8, \tune, tune);
 485                                 }););
 486                                 AppClock.sched(0.161803398875,{
 487                                         ([~l1a,~l1b,~l1c,~l1d,~l1e,~l1f,~l2a,~l2b,~l2c,~l2d,~l2e,~l2f,~l3a,~l3b,~l3c,~l3d,~l3e,~l3f,~l4a,~l4b,~l4c,~l4d,~l4e,~l4f,~l5a,~l5b,~l5c,~l5d,~l5e,~l5f,~l6a,~l6b,~l6c,~l6d,~l6e,~l6f,~l7a,~l7b,~l7c,~l7d,~l7e,~l7f,~l8a,~l8b,~l8c,~l8d,~l8e,~l8f].do(_.free)); ~slideroutine.stop;
 488                                 });
 489                         };
 490                 );
 491         };
 492 );