/*Order of execution to run script and record(goes from bottom to top):
-1. Hit "Ctrl/Cmd - Enter" anywhere inside the "LOAD SYNTH FUNCTIONS" parenthesis,
-2. Click on the same line as "START RECORDING;" (above the "LOAD SYNTH FUNCTIONS" parenthesis) and hit "Ctrl/Cmd - Enter",
-3. Hit "Ctrl/Cmd - Enter" anywhere inside the "TASK" parenthesis above the "START RECORDING;" line...
+1. Hit "Ctrl/Cmd - Enter" anywhere inside the "LOAD SYNTH FUNCTIONS" parenthesis on line 42,
+2. Click on the same line as "START RECORDING" on line 39 and hit "Ctrl/Cmd - Enter",
+3. Hit "Ctrl/Cmd - Enter" anywhere inside the "TASK" parenthesis on line 10...
The record file location will be found in the post window...
Leave out #2 to run the script without recording...
Important Note: You must load the Timewave Synthesizer program and press the "synth0" button at least once before this script can run.
1.do({
//duration of each chord
- a = 32;
+ a = 38.832815729998;
//copy and paste "saved" chords from the "copy" button inside the synthesizer program here:
//choose to change each duration individually by changing the "a" variable in the code below this line, as well as "synthopen/synthflow"
});
(
- 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;
+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
#s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
}););
(
- 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;
+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
#s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
~synthflow = {
case
{~l1a1.isRunning == true}{
- (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;
+ (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
~l1a1.set(\dur, ~f1, \vol, vol1); ~l1b1.set(\dur, ~f1, \vol, vol1);
~l1c1.set(\dur, ~f1/~icd3, \vol, vol1); ~l1d1.set(\dur, ~f1/~icd3, \vol, vol1);
}););
}
{~l1a.isRunning == true} {
- (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;
+ (1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
~l1a.set(\dur, ~f1, \vol, vol1); ~l1b.set(\dur, ~f1, \vol, vol1);
~l1c.set(\dur, ~f1/~icd3, \vol, vol1); ~l1d.set(\dur, ~f1/~icd3, \vol, vol1);
~synthslide = {case{~l1a1.isRunning == true}{(
~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;
+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8= [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
#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);
~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 ];
);
(~slidetime/~slidedo).wait;
});});}).play;);}{~l1a.isRunning == true} {(
- ~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;
+ ~slideroutine = Routine({1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6;
#vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8= [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
#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);
~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 ];