+(
+s.boot;
+s.waitForBoot({
+ var point, w, view, view2,
+ vol = 0.02,mute1,mute2,mute3,mute4,mute5,mute6,mute7,muteall,unmuteall,
+ g1,g2,g6,g8,g33,g48,g64,g72,g88,gm,ngm1,ngm2,ngm6,set1,set2,menu1,menu2,
+ ts,sts,str,spaceb,b1,b2,b3,b4,button,button1,info,
+ n1,n2,n3,n4,n5,n6,n7,n8,keycodeb,
+ f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,
+ fp1,fp2,fp3,fp4,fp5,fp6,fp7,fp8,fp9,fp10,fp11,fp12,
+ fp1b,fp2b,fp3b,fp4b,fp5b,fp6b,fp7b,fp8b,fp9b,fp10b,fp11b,fp12b,
+ fp1c,fp2c,fp3c,fp4c,fp5c,fp6c,fp7c,fp8c,fp9c,fp10c,fp11c,fp12c,
+ fp1d,fp2d,fp3d,fp4d,fp5d,fp6d,fp7d,fp8d,fp9d,fp10d,fp11d,fp12d,
+ fp1e,fp2e,fp3e,fp4e,fp5e,fp6e,fp7e,fp8e,fp9e,fp10e,fp11e,fp12e,
+ fp1f,fp2f,fp3f,fp4f,fp5f,fp6f,fp7f,fp8f,fp9f,fp10f,fp11f,fp12f,
+ fp1g,fp2g,fp3g,fp4g,fp5g,fp6g,fp7g,fp8g,fp9g,fp10g,fp11g,fp12g,
+ fp1h,fp2h,fp3h,fp4h,fp5h,fp6h,fp7h,fp8h,fp9h,fp10h,fp11h,fp12h;
+
+
+ //VARIABLES YOU MAY WISH TO CHANGE
+
+
+ // A tuning frequency in hz
+
+ ~tuning_frequency = 432; //default 432 hz
+
+ ~freqmap = (
+ i = ~tuning_frequency
+ / (2 ** (69 / 12)); a = (-1); b = (-1);
+ Array.fill(128, {i * (2 ** (((a=a+1) / 12).trunc)) * ( (2 ** (12.reciprocal)) ** ((b=b+1) % 12));
+ }));/*~freqmap = (i = 8.0271480262684/*-0.0000000000024*/; ~stepratio = 1.0594630943593; Array.fill(128, { i = i*~stepratio;}));*/
+
+
+ //base frequency for synth inst
+
+ ~base_frequency = ~freqmap.at(21); //default 21
+ ~synthdefnum = 9; //default 9
+
+ //volume
+
+ ~vol = 0.005; //default 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;
+
+
+ //key codes for keyboard functions - either unicode or keycode. to find key codes, see below
+
+ ~rightarrow_keycode = 124;
+ ~leftarrow_keycode = 123;
+ ~uparrow_keycode = 126;
+ ~downarrow_keycode = 125;
+ ~enter_unicode = 13;
+ ~s_unicode = 115;
+ ~m_unicode = 109;
+ ~r_unicode = 114;
+ ~u_unicode = 117;
+ ~t_unicode = 116;
+ ~c_unicode = 99;
+ ~i_unicode = 105;
+ ~k_unicode = 107;
+ ~j_unicode = 106;
+ ~l_unicode = 108;
+ ~spacebar_unicode = 32;
+ ~one_unicode = 49;
+ ~two_unicode = 50;
+ ~three_unicode = 51;
+ ~four_unicode = 52;
+ ~five_unicode = 53;
+ ~six_unicode = 54;
+ ~seven_unicode = 55;
+ ~escape_unicode = 27;
+
+
+ //To find key codes in post window... Hightlight the function and its parenthesis in red below,
+ //and press "ctrl - enter" or cmd - return" - then a small window called "test" will pop up...
+ //Press the "type" button inside of the window, then press anywhere on the keyboard to find
+ //the key codes in the right-hand side post window. Layout: [unicode, keycode, modifiers]. It is either a unicode
+ //or a keycode. Do not delete the /* and */ characters, or else the
+ //program will not run.
+
+ /*
+
+ (
+ var win = Window(\test, Rect(10, 100, 100, 50)),
+ btn = Button(win, Rect(5, 5, 90, 40)).states_([["type"]]);
+ btn.keyDownAction =
+ { arg view, char, modifiers, unicode, keycode;
+ ["unicode:"+unicode, "keycode:"+keycode, "modifiers:"+modifiers].postln;
+ };
+ win.front;
+ )
+
+ */
+
+
+ //gui set frequency ranges - currently set at the lowest and highest notes on a 128 key range using 432 hz A tuning
+ //you can change the tuning near top
+ //to insert custom ranges, replace "~freqmap.at()" with a hz frequency
+
+ ~outmin1 = ~freqmap.at(0); // 8.0271480262684 hz //base frequency of upper set
+ ~outmax1 = ~freqmap.at(127); // 12315.783879572 hz //high frequency of upper set
+ ~outmin2 = ~freqmap.at(0)*8; // (8.0271480262684)*8 hz //base frequency of lower set
+ ~outmax2 = ~freqmap.at(127)/8; // (12315.783879572)/8 hz; //high frequency of lower set
+
+ ~outmina = ~outmin2;
+ ~outmaxa = ~outmax2;
+ ~outminb = ~outmin1;
+ ~outmaxb = ~outmax1;
+
+ //increase or decrease magnitude of second and third harmonics
+
+ ~icd3 = 3; //3
+ ~icd6 = 6; //6
+
+
+ ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+ #f1,f2,f3,f4,f5,f6,f7/*,f8,f9,f10,f11,f12*//*,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24*/ =
+ /*[432/1.6180339887499/1.6180339887499/1.6180339887499, 432/1.6180339887499, 432*1.6180339887499, 432, 432*1.6180339887499*1.6180339887499 , 432/1.6180339887499/1.6180339887499,432*1.6180339887499*1.6180339887499*1.6180339887499 ]*/
+ [432,432,432,432,432,432,432];
+
+ if(([ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil]), {7.do(x = 0; {("f"++(x=x+1)).asSymbol.envirPut([f1,f2,f3,f4,f5,f6,f7].at(x-1))});});
+
+ #fp1,fp2,fp3,fp4,fp5,fp6,fp7,fp8,fp9,fp10,fp11,fp12 = [~u1,~u2,~u3,~u4,~u5,~u6,~u7,~u8,~u9,~u10,~u11,~u12];
+ #fp1b,fp2b,fp3b,fp4b,fp5b,fp6b,fp7b,fp8b,fp9b,fp10b,fp11b,fp12b = [~u1b,~u2b,~u3b,~u4b,~u5b,~u6b,~u7b,~u8b,~u9b,~u10b,~u11b,~u12b];
+ #fp1c,fp2c,fp3c,fp4c,fp5c,fp6c,fp7c,fp8c,fp9c,fp10c,fp11c,fp12c = [~u1c,~u2c,~u3c,~u4c,~u5c,~u6c,~u7c,~u8c,~u9c,~u10c,~u11c,~u12c];
+ #fp1d,fp2d,fp3d,fp4d,fp5d,fp6d,fp7d,fp8d,fp9d,fp10d,fp11d,fp12d = [~u1d,~u2d,~u3d,~u4d,~u5d,~u6d,~u7d,~u8d,~u9d,~u10d,~u11d,~u12d];
+ #fp1e,fp2e,fp3e,fp4e,fp5e,fp6e,fp7e,fp8e,fp9e,fp10e,fp11e,fp12e = [~u1e,~u2e,~u3e,~u4e,~u5e,~u6e,~u7e,~u8e,~u9e,~u10e,~u11e,~u12e];
+ #fp1f,fp2f,fp3f,fp4f,fp5f,fp6f,fp7f,fp8f,fp9f,fp10f,fp11f,fp12f = [~u1f,~u2f,~u3f,~u4f,~u5f,~u6f,~u7f,~u8f,~u9f,~u10f,~u11f,~u12f];
+ #fp1g,fp2g,fp3g,fp4g,fp5g,fp6g,fp7g,fp8g,fp9g,fp10g,fp11g,fp12g = [~u1g,~u2g,~u3g,~u4g,~u5g,~u6g,~u7g,~u8g,~u9g,~u10g,~u11g,~u12g];
+ #fp1h,fp2h,fp3h,fp4h,fp5h,fp6h,fp7h,fp8h,fp9h,fp10h,fp11h,fp12h = [~u1h,~u2h,~u3h,~u4h,~u5h,~u6h,~u7h,~u8h,~u9h,~u10h,~u11h,~u12h];
+
+ if([fp1,fp2,fp3,fp4,fp5,fp6,fp7,fp8,fp9,fp10,fp11,fp12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1,fp2,fp3,fp4,fp5,fp6,fp7,fp8,fp9,fp10,fp11,fp12 = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1b,fp2b,fp3b,fp4b,fp5b,fp6b,fp7b,fp8b,fp9b,fp10b,fp11b,fp12b] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1b,fp2b,fp3b,fp4b,fp5b,fp6b,fp7b,fp8b,fp9b,fp10b,fp11b,fp12b = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1c,fp2c,fp3c,fp4c,fp5c,fp6c,fp7c,fp8c,fp9c,fp10c,fp11c,fp12c] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1c,fp2c,fp3c,fp4c,fp5c,fp6c,fp7c,fp8c,fp9c,fp10c,fp11c,fp12c = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1d,fp2d,fp3d,fp4d,fp5d,fp6d,fp7d,fp8d,fp9d,fp10d,fp11d,fp12d] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1d,fp2d,fp3d,fp4d,fp5d,fp6d,fp7d,fp8d,fp9d,fp10d,fp11d,fp12d = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1e,fp2e,fp3e,fp4e,fp5e,fp6e,fp7e,fp8e,fp9e,fp10e,fp11e,fp12e] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1e,fp2e,fp3e,fp4e,fp5e,fp6e,fp7e,fp8e,fp9e,fp10e,fp11e,fp12e = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1f,fp2f,fp3f,fp4f,fp5f,fp6f,fp7f,fp8f,fp9f,fp10f,fp11f,fp12f] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1f,fp2f,fp3f,fp4f,fp5f,fp6f,fp7f,fp8f,fp9f,fp10f,fp11f,fp12f = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1g,fp2g,fp3g,fp4g,fp5g,fp6g,fp7g,fp8g,fp9g,fp10g,fp11g,fp12g] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1g,fp2g,fp3g,fp4g,fp5g,fp6g,fp7g,fp8g,fp9g,fp10g,fp11g,fp12g = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+ if([fp1h,fp2h,fp3h,fp4h,fp5h,fp6h,fp7h,fp8h,fp9h,fp10h,fp11h,fp12h] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {#fp1h,fp2h,fp3h,fp4h,fp5h,fp6h,fp7h,fp8h,fp9h,fp10h,fp11h,fp12h = [ ~f1,~f2,~f3,~f4,~f5,~f6,~f7,~f8,~f9,~f10,~f11,~f12 ];});
+
+
+
+ ~gsine = {
+ SynthDef(\gsineicfld1, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1];
+ dseq = Dseq([/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune),Demand.ar(Impulse.ar(dur+tune), 0, dseq)*fc);
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ SynthDef(\gsineicrld1, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1, id = -1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9,af;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1,~ngm1];
+ dseq = Dseq([[/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten].flatten.reverse, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune), Demand.ar(Impulse.ar(dur+tune), 0, dseq));
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ SynthDef(\gsineicfld2, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2];
+ dseq = Dseq([/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum*2 -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune),Demand.ar(Impulse.ar(dur+tune), 0, dseq)*fc);
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ SynthDef(\gsineicrld2, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1, id = -1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9,af;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2,~ngm2];
+ dseq = Dseq([[/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum*2 -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten].flatten.reverse, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune), Demand.ar(Impulse.ar(dur+tune), 0, dseq));
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ SynthDef(\gsineicfld6, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6];
+ dseq = Dseq([/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum*6 -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune),Demand.ar(Impulse.ar(dur+tune), 0, dseq)*fc);
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ SynthDef(\gsineicrld6, {arg graindur = 0.04, dur = 2000, atk = 0.007, rel = 0.01, gate = 1, amp = 1, i = 1, vol = ~vol, rate = 20, tune = 0,dseqval,
+ a, b, c, d, e, f, pan=0, fc = 1;
+ var s1, out, env1, s2, dseq,n1,n2,n3,n4,n5,n6,n7,n8,n9;
+ #n1,n2,n3,n4,n5,n6,n7,n8,n9=[~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6,~ngm6];
+ dseq = Dseq([[/*1*/ #a,b,c,d,e,f=[ ~a,~b,~c,~d,~e,~f ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ ++Array.fill((~gsinenum*6 -1), {[/*1*/ [ a = a, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*2*/ [ a = a/~fth*n1, b = b/~fth*n1, c = c/~fth*n1, d = d/~fth*n1, e = e/~fth*n1, f = f/~fth*n1 ],/*3*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth ],/*4*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*5*/ [ a = a/~fth, b = b*~fth, c = c, d = d*~fth, e = e, f = f*~fth ],/*6*/ [ a = a*~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f/~fth ],/*7*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d, e = e, f = f ],/*8*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*9*/ [ a = a*~fth, b = b, c = c, d = d*~fth, e = e*~fth, f = f*~fth ],/*10*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*11*/ [ a = a/~fth, b = b/~fth, c = c/~fth, d = d*~fth, e = e, f = f ],/*12*/ [ a = a*~fth*n2, b = b*~fth*n2, c = c*~fth*n2, d = d/~fth*n2, e = e/~fth*n2, f = f/~fth*n2 ],/*13*/ [ a = a, b = b, c = c, d = d*~fth, e = e, f = f*~fth ],/*14*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f],/*15*/ [ a = a/~fth, b = b, c = c/~fth, d = d, e = e/~fth, f = f/~fth ],/*16*/ [ a = a, b = b, c = c*~fth, d = d/~fth, e = e, f = f ],/*17*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f*~fth],/*18*/ [ a = a*~fth*n3, b = b/~fth*n3, c = c/~fth*n3, d = d*~fth*n3, e = e*~fth*n3, f = f/~fth*n3 ],/*19*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e, f = f*~fth ],/*20*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f/~fth ],/*21*/ [ a = a, b = b/~fth, c = c*~fth, d = d, e = e, f = f*~fth ],/*22*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*23*/ [ a = a, b = b, c = c, d = d/~fth, e = e, f = f/~fth ],/*24*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*25*/ [ a = a*~fth, b = b*~fth, c = c*~fth, d = d, e = e, f = f ],/*26*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*27*/ [ a = a, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*28*/ [ a = a/~fth*n4, b = b*~fth*n4, c = c*~fth*n4, d = d*~fth*n4, e = e*~fth*n4, f = f/~fth*n4 ],/*29*/ [ a = a, b = b, c = c/~fth, d = d/~fth, e = e, f = f ],/*30*/ [ a = a*~fth*n5, b = b/~fth*n5, c = c*~fth*n5, d = d*~fth*n5, e = e/~fth*n5, f = f*~fth*n5 ],/*31*/ [ a = a/~fth, b = b*~fth, c = c, d = d, e = e, f = f/~fth ],/*32*/ [ a = a, b = b/~fth, c = c, d = d, e = e*~fth, f = f ],/*33*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*34*/ [ a = a/~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f*~fth ],/*35*/ [ a = a*~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f/~fth ],/*36*/ [ a = a/~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f*~fth ],/*37*/ [ a = a*~fth, b = b*~fth, c = c, d = d, e = e, f = f ],/*38*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*39*/ [ a = a/~fth*n6, b = b*~fth*n6, c = c/~fth*n6, d = d*~fth*n6, e = e/~fth*n6, f = f/~fth*n6 ],/*40*/ [ a = a, b = b/~fth, c = c*~fth, d = d/~fth, e = e*~fth, f = f ],/*41*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f*~fth ],/*42*/ [ a = a, b = b*~fth, c = c, d = d, e = e/~fth, f = f ],/*43*/ [ a = a/~fth, b = b, c = c*~fth, d = d*~fth, e = e*~fth, f = f ],/*44*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*45*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f ],/*46*/ [ a = a, b = b/~fth, c = c/~fth, d = d*~fth, e = e*~fth, f = f ],/*47*/ [ a = a, b = b*~fth, c = c*~fth, d = d/~fth, e = e, f = f ],/*48*/ [ a = a, b = b, c = c/~fth, d = d*~fth, e = e, f = f ],/*49*/ [ a = a, b = b, c = c*~fth, d = d, e = e/~fth, f = f*~fth ],/*50*/ [ a = a*~fth, b = b/~fth, c = c, d = d, e = e*~fth, f = f/~fth ],/*51*/ [ a = a/~fth, b = b, c = c, d = d/~fth, e = e/~fth, f = f*~fth ],/*52*/ [ a = a*~fth, b = b, c = c/~fth, d = d*~fth, e = e, f = f/~fth ],/*53*/ [ a = a, b = b*~fth, c = c, d = d, e = e, f = f ],/*54*/ [ a = a/~fth*n7, b = b/~fth*n7, c = c*~fth*n7, d = d/~fth*n7, e = e*~fth*n7, f = f*~fth*n7 ],/*55*/ [ a = a, b = b, c = c, d = d*~fth, e = e/~fth, f = f ],/*56*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f/~fth ],/*57*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e*~fth, f = f ],/*58*/ [ a = a/~fth, b = b, c = c*~fth, d = d/~fth, e = e, f = f*~fth ],/*59*/ [ a = a*~fth, b = b, c = c/~fth, d = d, e = e, f = f/~fth ],/*60*/ [ a = a/~fth, b = b, c = c, d = d, e = e, f = f*~fth ],/*61*/ [ a = a*~fth, b = b, c = c, d = d, e = e, f = f ],/*62*/ [ a = a/~fth*n8, b = b/~fth*n8, c = c*~fth*n8, d = d*~fth*n8, e = e/~fth*n8, f = f/~fth*n8 ],/*63*/ [ a = a, b = b*~fth, c = c/~fth, d = d, e = e, f = f*~fth ],/*64*/ [ a = a*~fth*n9, b = b/~fth*n9, c = c*~fth*n9, d = d/~fth*n9, e = e*~fth*n9, f = f/~fth*n9 ]]
+ }).flatten].flatten.reverse, inf);
+ /*env1 = EnvGen.kr(Env([0, 1, 1, 0], [0, dur, 0]), levelScale: amp, doneAction: 2);*/
+ s1 = GrainSin.ar(1, Impulse.ar(dur+tune), 1/(dur+tune),Demand.ar(Impulse.ar(dur+tune), 0, dseq)*fc);
+ OffsetOut.ar(0, s1.dup*vol);
+ }, [\ir]).add;
+
+ };
+
+
+ if((~gsinenum == nil) and: (~synthdef != 1), {
+ (
+ if(~basefreq == nil, {~basefreq = ~base_frequency});
+ ~fmult = 16;
+ (#a,b,c,d,e,f = /*[ 432/1.6180339887499, 432*1.6180339887499, 432, 432*1.6180339887499*1.6180339887499 , 528, 432/1.6180339887499/1.6180339887499 ]*/
+ [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ];
+ ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
+
+ ~fth = 1.4142135623729;
+ ~gm = 1.6180339887499;
+ ~stepratio = 1.0594630943593;
+ ~nval = 1.0355417528;
+ ~n9s = 1.86;
+ ~n9 = 1.080059789899;
+ ~n18 = 1.0392592260319;
+ ~n27 = 1.0260044847071;
+ ~n36 = 1.0194406437022;
+ ~n45 = 1.0155225125043;
+ ~n54 = 1.012918794725;
+ ~n63 = 1.0110630844869;
+ ~n72 = 1.0096735332285;
+ ~ngm1 = 1.0549232131786;
+ ~ngm2 = 1.0270945492887;
+ ~ngm6 = 1.0089511542031;
+ ~nval = ~ngm6;
+
+ ~synthdef = 1; ~gsinenum = 6; ~gsine.value;
+ );
+ });
+
+
+
+ //gui
+ w = Window("ic gui", Rect(0,0,Window.screenBounds.width,Window.screenBounds.height), border:true);
+
+
+
+ view = UserView(w, Window.screenBounds);
+ view.clearOnRefresh = false;
+ view.background = Color.black;
+
+ /*~b1 = Window.screenBounds.width/(12*4) /*25.462962962963*/; ~btu = 31; ~btd = 340; ~bw = 0.5; ~bh = 70; ~bcolor = Color.grey;
+ CompositeView(w, Rect(~b1, ~btu, ~bw, ~bh)).background = ~bcolor;
+ CompositeView(w, Rect(~b1, ~btd, ~bw, ~bh)).background = ~bcolor;
+ 54.do({CompositeView(w, Rect(~b1 = ~b1+(Window.screenBounds.width/(12*4)), ~btu, ~bw, ~bh)).background = ~bcolor;});
+ ~b1 = Window.screenBounds.width/(12*4);
+ 54.do({CompositeView(w, Rect(~b1 = ~b1+(Window.screenBounds.width/(12*4)), ~btd, ~bw, ~bh)).background = ~bcolor;});*/
+
+ ~nh = 2;
+ ~nw = ~nh*1.6180339887499;
+
+ ~tgrid = 30;
+ ~bgrid = Window.screenBounds.height-(Window.screenBounds.height/1.6180339887499)+30;
+
+ ~dc1 = ~tgrid-5; ~dc2 = ~bgrid-5; ~dca = 10;
+
+ 4.do(x=~tgrid-10; {CompositeView(w, Rect(1, x=x+10, Window.screenBounds.width, 0.5)).background = Color.new255(51, 51, 51)});
+ 4.do(x=~bgrid-10; {CompositeView(w, Rect(1, x=x+10, Window.screenBounds.width, 0.5)).background = Color.new255(51, 51, 51)});
+
+ ~z1 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z2 = (CompositeView(w, Rect((if(~f2 == nil, {f2.value},{~f2.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z3 = (CompositeView(w, Rect((if(~f3 == nil, {f3.value},{~f3.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ /*~z4 = (CompositeView(w, Rect((if(~f4 == nil, {f4.value},{~f4.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z5 = (CompositeView(w, Rect((if(~f5 == nil, {f5.value},{~f5.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z6 = (CompositeView(w, Rect((if(~f6 == nil, {f6.value},{~f6.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z7 = (CompositeView(w, Rect((if(~f7 == nil, {f7.value},{~f7.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ *//*~z8 = (CompositeView(w, Rect((if(~f8 == nil, {f8.value},{~f8.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z9 = (CompositeView(w, Rect((if(~f9 == nil, {f9.value},{~f9.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z10 = (CompositeView(w, Rect((if(~f10 == nil, {f10.value},{~f10.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z11 = (CompositeView(w, Rect((if(~f11 == nil, {f11.value},{~f11.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z12 = (CompositeView(w, Rect((if(~f12 == nil, {f12.value},{~f12.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z13 = (CompositeView(w, Rect((if(~f37 == nil, {f13.value},{~f37.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ */ /*~z14 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z15 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z16 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z17 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z18 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z19 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z20 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z21 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z22 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z23 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ ~z24 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin1,~outmax1,0,Window.screenBounds.width)), ~dc1=~dc1+10, ~nw, 2)).background = Color.white;);
+ */ ~zmid = (CompositeView(w, Rect(x, 280, ~nw, 2)).background = Color.clear;);
+ ~z25 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z26 = (CompositeView(w, Rect((if(~f2 == nil, {f2.value},{~f2.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z27 = (CompositeView(w, Rect((if(~f3 == nil, {f3.value},{~f3.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ /*~z28 = (CompositeView(w, Rect((if(~f4 == nil, {f4.value},{~f4.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z29 = (CompositeView(w, Rect((if(~f5 == nil, {f5.value},{~f5.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z30 = (CompositeView(w, Rect((if(~f6 == nil, {f6.value},{~f6.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z31 = (CompositeView(w, Rect((if(~f7 == nil, {f7.value},{~f7.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ *//*~z32 = (CompositeView(w, Rect((if(~f8 == nil, {f8.value},{~f8.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z33 = (CompositeView(w, Rect((if(~f9 == nil, {f9.value},{~f9.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z34 = (CompositeView(w, Rect((if(~f10 == nil, {f10.value},{~f10.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z35 = (CompositeView(w, Rect((if(~f11 == nil, {f11.value},{~f11.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z36 = (CompositeView(w, Rect((if(~f12 == nil, {f12.value},{~f12.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z37 = (CompositeView(w, Rect((if(~f37 == nil, {f13.value},{~f37.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ */ /*~z38 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z39 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z40 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z41 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z42 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z43 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z44 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z45 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z46 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z47 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ ~z48 = (CompositeView(w, Rect((if(~f1 == nil, {f1.value},{~f1.value}).explin(~outmin2,~outmax2,0,Window.screenBounds.width)), ~dc2=~dc2+10, ~nw, 2)).background = Color.white;);
+ */
+
+ ~dc1 = ~tgrid-5; ~dc2 = ~bgrid-5; ~dca = 10;
+
+ ~synthopen = {
+ case
+ {((~l1a.isRunning == false) and: (~l1a1.isRunning == false)) or: ~l1a1.isRunning == true}{
+ (1.do({var a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,fs,rs,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,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,fs1,fs2,fs3,fs4,fs5,fs6,fd1,fd2,fd3,fd4,fd5,fd6,tune=0;
+ #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8,~vol9,~vol10,~vol11,~vol12];
+ #f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12 = [ 0,0,0,0,0,0,0,0,0,0,0,0 ];
+ ~l1a1.set(\dur, f1, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune); ~l1b1.set(\dur, f1, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune);
+ ~l1c1.set(\dur, f1/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune); ~l1d1.set(\dur, f1/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune);
+ ~l1e1.set(\dur, f1/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune); ~l1f1.set(\dur, f1/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol1, \tune, tune);
+ ~l2a1.set(\dur, f2, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune); ~l2b1.set(\dur, f2, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune);
+ ~l2c1.set(\dur, f2/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune); ~l2d1.set(\dur, f2/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune);
+ ~l2e1.set(\dur, f2/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune); ~l2f1.set(\dur, f2/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol2, \tune, tune);
+ ~l3a1.set(\dur, f3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune); ~l3b1.set(\dur, f3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune);
+ ~l3c1.set(\dur, f3/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune); ~l3d1.set(\dur, f3/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune);
+ ~l3e1.set(\dur, f3/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune); ~l3f1.set(\dur, f3/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol3, \tune, tune);
+ /*~l4a1.set(\dur, f4, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune); ~l4b1.set(\dur, f4, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune);
+ ~l4c1.set(\dur, f4/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune); ~l4d1.set(\dur, f4/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune);
+ ~l4e1.set(\dur, f4/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune); ~l4f1.set(\dur, f4/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol4, \tune, tune);
+ ~l5a1.set(\dur, f5, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune); ~l5b1.set(\dur, f5, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune);
+ ~l5c1.set(\dur, f5/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune); ~l5d1.set(\dur, f5/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune);
+ ~l5e1.set(\dur, f5/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune); ~l5f1.set(\dur, f5/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol5, \tune, tune);
+ ~l6a1.set(\dur, f6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune); ~l6b1.set(\dur, f6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune);
+ ~l6c1.set(\dur, f6/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune); ~l6d1.set(\dur, f6/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune);
+ ~l6e1.set(\dur, f6/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune); ~l6f1.set(\dur, f6/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol6, \tune, tune);
+ ~l7a1.set(\dur, f7, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune); ~l7b1.set(\dur, f7, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune);
+ ~l7c1.set(\dur, f7/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune); ~l7d1.set(\dur, f7/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune);
+ ~l7e1.set(\dur, f7/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune); ~l7f1.set(\dur, f7/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol7, \tune, tune);
+ */ /*~l8a1.set(\dur, f8, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune); ~l8b1.set(\dur, f8, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune);
+ ~l8c1.set(\dur, f8/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune); ~l8d1.set(\dur, f8/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune);
+ ~l8e1.set(\dur, f8/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune); ~l8f1.set(\dur, f8/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol8, \tune, tune);
+ ~l9a1.set(\dur, f9, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune); ~l9b1.set(\dur, f9, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune);
+ ~l9c1.set(\dur, f9/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune); ~l9d1.set(\dur, f9/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune);
+ ~l9e1.set(\dur, f9/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune); ~l9f1.set(\dur, f9/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol9, \tune, tune);
+ ~l10a1.set(\dur, f10, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune); ~l10b1.set(\dur, f10, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune);
+ ~l10c1.set(\dur, f10/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune);~l10d1.set(\dur, f10/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune);
+ ~l10e1.set(\dur, f10/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune);~l10f1.set(\dur, f10/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol10, \tune, tune);
+ ~l11a1.set(\dur, f11, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune); ~l11b1.set(\dur, f11, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune);
+ ~l11c1.set(\dur, f11/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune);~l11d1.set(\dur, f11/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune);
+ ~l11e1.set(\dur, f11/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune);~l11f1.set(\dur, f11/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol11, \tune, tune);
+ ~l12a1.set(\dur, f12, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune); ~l12b1.set(\dur, f12, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune);
+ ~l12c1.set(\dur, f12/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune);~l12d1.set(\dur, f12/~icd3, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune);
+ ~l12e1.set(\dur, f12/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune);~l12f1.set(\dur, f12/~icd6, \a, a, \b, b, \c, c, \d, d, \e, e, \f, f, \vol, vol12, \tune, tune);
+ */ }););