OSDN -- 开发和下载开源软件
简体中文翻译状态 translation status for zh
  • R/O
  • HTTP
  • SSH
  • HTTPS
Fork

Timewave_Synthesizer: 提交

This synthesizer is derived from and based upon Terence McKenna's Timewave Zero theory. His theory is that time is a complex wave, and the King Wen sequence of the I Ching is a 64 hexagram model from which this complex wave is derived; that the King Wen sequence maps the linear progression of the human states of mind, which ultimately substantiates the timewave. This theory is the basis for the well-known novelty computer program he and others had developed.


Commit MetaInfo

修订版5cd791888235ab375ab704e90196ec6f80a304b6 (tree)
时间2017-11-12 22:33:08
作者Ken Brant <ken_brant@ymai...>
CommiterGitHub

Log Message

Added randomization. Fixed bugs.

更改概述

差异

--- a/timewavesynth12.scd
+++ b/timewavesynth12.scd
@@ -12,7 +12,7 @@
1212
1313 //This version is slightly CPU intensive due to the amount of synths it has, so a less-powerful computer may experience trouble running it
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -284,71 +286,15 @@ s.waitForBoot({
284286 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
285287 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
286288
287- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8,~sg1a9=~f9,~sg1a10=~f10,~sg1a11=~f11,~sg1a12=~f12];});
288- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8,~sg1b9=~f9,~sg1b10=~f10,~sg1b11=~f11,~sg1b12=~f12];});
289- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8,~sg1c9=~f9,~sg1c10=~f10,~sg1c11=~f11,~sg1c12=~f12];});
290- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8,~sg1d9=~f9,~sg1d10=~f10,~sg1d11=~f11,~sg1d12=~f12];});
291- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8,~sg1e9=~f9,~sg1e10=~f10,~sg1e11=~f11,~sg1e12=~f12];});
292- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8,~sg1f9=~f9,~sg1f10=~f10,~sg1f11=~f11,~sg1f12=~f12];});
293- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8,~sg1g9=~f9,~sg1g10=~f10,~sg1g11=~f11,~sg1g12=~f12];});
294- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8,~sg1h9=~f9,~sg1h10=~f10,~sg1h11=~f11,~sg1h12=~f12];});
295- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8,~sg2a9=~f9,~sg2a10=~f10,~sg2a11=~f11,~sg2a12=~f12];});
296- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8,~sg2b9=~f9,~sg2b10=~f10,~sg2b11=~f11,~sg2b12=~f12];});
297- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8,~sg2c9=~f9,~sg2c10=~f10,~sg2c11=~f11,~sg2c12=~f12];});
298- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8,~sg2d9=~f9,~sg2d10=~f10,~sg2d11=~f11,~sg2d12=~f12];});
299- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8,~sg2e9=~f9,~sg2e10=~f10,~sg2e11=~f11,~sg2e12=~f12];});
300- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8,~sg2f9=~f9,~sg2f10=~f10,~sg2f11=~f11,~sg2f12=~f12];});
301- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8,~sg2g9=~f9,~sg2g10=~f10,~sg2g11=~f11,~sg2g12=~f12];});
302- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8,~sg2h9=~f9,~sg2h10=~f10,~sg2h11=~f11,~sg2h12=~f12];});
303- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8,~sg3a9=~f9,~sg3a10=~f10,~sg3a11=~f11,~sg3a12=~f12];});
304- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8,~sg3b9=~f9,~sg3b10=~f10,~sg3b11=~f11,~sg3b12=~f12];});
305- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8,~sg3c9=~f9,~sg3c10=~f10,~sg3c11=~f11,~sg3c12=~f12];});
306- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8,~sg3d9=~f9,~sg3d10=~f10,~sg3d11=~f11,~sg3d12=~f12];});
307- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8,~sg3e9=~f9,~sg3e10=~f10,~sg3e11=~f11,~sg3e12=~f12];});
308- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8,~sg3f9=~f9,~sg3f10=~f10,~sg3f11=~f11,~sg3f12=~f12];});
309- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8,~sg3g9=~f9,~sg3g10=~f10,~sg3g11=~f11,~sg3g12=~f12];});
310- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8,~sg3h9=~f9,~sg3h10=~f10,~sg3h11=~f11,~sg3h12=~f12];});
311- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8,~sg4a9=~f9,~sg4a10=~f10,~sg4a11=~f11,~sg4a12=~f12];});
312- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8,~sg4b9=~f9,~sg4b10=~f10,~sg4b11=~f11,~sg4b12=~f12];});
313- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8,~sg4c9=~f9,~sg4c10=~f10,~sg4c11=~f11,~sg4c12=~f12];});
314- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8,~sg4d9=~f9,~sg4d10=~f10,~sg4d11=~f11,~sg4d12=~f12];});
315- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8,~sg4e9=~f9,~sg4e10=~f10,~sg4e11=~f11,~sg4e12=~f12];});
316- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8,~sg4f9=~f9,~sg4f10=~f10,~sg4f11=~f11,~sg4f12=~f12];});
317- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8,~sg4g9=~f9,~sg4g10=~f10,~sg4g11=~f11,~sg4g12=~f12];});
318- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8,~sg4h9=~f9,~sg4h10=~f10,~sg4h11=~f11,~sg4h12=~f12];});
319- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8,~sg5a9=~f9,~sg5a10=~f10,~sg5a11=~f11,~sg5a12=~f12];});
320- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8,~sg5b9=~f9,~sg5b10=~f10,~sg5b11=~f11,~sg5b12=~f12];});
321- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8,~sg5c9=~f9,~sg5c10=~f10,~sg5c11=~f11,~sg5c12=~f12];});
322- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8,~sg5d9=~f9,~sg5d10=~f10,~sg5d11=~f11,~sg5d12=~f12];});
323- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8,~sg5e9=~f9,~sg5e10=~f10,~sg5e11=~f11,~sg5e12=~f12];});
324- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8,~sg5f9=~f9,~sg5f10=~f10,~sg5f11=~f11,~sg5f12=~f12];});
325- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8,~sg5g9=~f9,~sg5g10=~f10,~sg5g11=~f11,~sg5g12=~f12];});
326- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8,~sg5h9=~f9,~sg5h10=~f10,~sg5h11=~f11,~sg5h12=~f12];});
327- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8,~sg6a9=~f9,~sg6a10=~f10,~sg6a11=~f11,~sg6a12=~f12];});
328- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8,~sg6b9=~f9,~sg6b10=~f10,~sg6b11=~f11,~sg6b12=~f12];});
329- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8,~sg6c9=~f9,~sg6c10=~f10,~sg6c11=~f11,~sg6c12=~f12];});
330- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8,~sg6d9=~f9,~sg6d10=~f10,~sg6d11=~f11,~sg6d12=~f12];});
331- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8,~sg6e9=~f9,~sg6e10=~f10,~sg6e11=~f11,~sg6e12=~f12];});
332- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8,~sg6f9=~f9,~sg6f10=~f10,~sg6f11=~f11,~sg6f12=~f12];});
333- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8,~sg6g9=~f9,~sg6g10=~f10,~sg6g11=~f11,~sg6g12=~f12];});
334- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8,~sg6h9=~f9,~sg6h10=~f10,~sg6h11=~f11,~sg6h12=~f12];});
335- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8,~sg7a9=~f9,~sg7a10=~f10,~sg7a11=~f11,~sg7a12=~f12];});
336- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8,~sg7b9=~f9,~sg7b10=~f10,~sg7b11=~f11,~sg7b12=~f12];});
337- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8,~sg7c9=~f9,~sg7c10=~f10,~sg7c11=~f11,~sg7c12=~f12];});
338- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8,~sg7d9=~f9,~sg7d10=~f10,~sg7d11=~f11,~sg7d12=~f12];});
339- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8,~sg7e9=~f9,~sg7e10=~f10,~sg7e11=~f11,~sg7e12=~f12];});
340- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8,~sg7f9=~f9,~sg7f10=~f10,~sg7f11=~f11,~sg7f12=~f12];});
341- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8,~sg7g9=~f9,~sg7g10=~f10,~sg7g11=~f11,~sg7g12=~f12];});
342- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8,~sg7h9=~f9,~sg7h10=~f10,~sg7h11=~f11,~sg7h12=~f12];});
343- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8,~sg8a9=~f9,~sg8a10=~f10,~sg8a11=~f11,~sg8a12=~f12];});
344- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8,~sg8b9=~f9,~sg8b10=~f10,~sg8b11=~f11,~sg8b12=~f12];});
345- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8,~sg8c9=~f9,~sg8c10=~f10,~sg8c11=~f11,~sg8c12=~f12];});
346- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8,~sg8d9=~f9,~sg8d10=~f10,~sg8d11=~f11,~sg8d12=~f12];});
347- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8,~sg8e9=~f9,~sg8e10=~f10,~sg8e11=~f11,~sg8e12=~f12];});
348- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8,~sg8f9=~f9,~sg8f10=~f10,~sg8f11=~f11,~sg8f12=~f12];});
349- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8,~sg8g9=~f9,~sg8g10=~f10,~sg8g11=~f11,~sg8g12=~f12];});
350- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8,~sg8h9=~f9,~sg8h10=~f10,~sg8h11=~f11,~sg8h12=~f12];});
351-
289+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
290+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
291+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
292+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
293+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
294+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
295+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
296+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
297+ */
352298
353299 //set n1-n9 ratio values
354300
@@ -487,32 +433,19 @@ s.waitForBoot({
487433
488434 if(~sendreplysynthdef_on == 1, {
489435
490- ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
491- ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
492- ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
493- ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
494- ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
495- ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
496- ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
497- ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
498- ~synthflow_random_sendreply_answer_f9 = '/synthflow_random_sendreply_answer_f9';
499- ~synthflow_random_sendreply_answer_f10 = '/synthflow_random_sendreply_answer_f10';
500- ~synthflow_random_sendreply_answer_f11 = '/synthflow_random_sendreply_answer_f11';
501- ~synthflow_random_sendreply_answer_f12 = '/synthflow_random_sendreply_answer_f12';
502-
503436 12.do(~sendreply_x = 0; {
504437
505438 ~sendreply_x=~sendreply_x+1;
506439
507- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
440+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
508441 a, b, c, d, e, f, pan=0, fc = 1;
509442 var s1, out, env1, s2, dseq;
510- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
443+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
511444 dseq = Dseq(
512445 case
513446 {~kws_setting == 1}{~kws_setting_1_a.value;}
514447 {~kws_setting == 2}{~kws_setting_2_a.value;}
515- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
448+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
516449 case
517450 {~kws_setting == 1}{~kws_setting_1_b.value;}
518451 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -520,7 +453,11 @@ s.waitForBoot({
520453 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
521454 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
522455 OffsetOut.ar(0, s1.dup*vol);
523- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
456+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
457+ case
458+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
459+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
460+ );
524461 }, [\ir]).add;
525462
526463 });
@@ -528,27 +465,91 @@ s.waitForBoot({
528465 };
529466
530467
531- //sendyreply functions
468+ //sendreply functions
532469
533- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
534- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
470+ ~sendreplyfunc_choose = 0;
471+
472+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
473+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
474+
475+ if(~sendreply_gm_fth_y_1 == nil, {12.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
476+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
477+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
478+
479+ }, {
480+ if(x > 1539.4729849465, {
481+ case
482+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
483+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
484+ }, {
485+ case
486+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
487+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
488+ });
489+ });
490+ };
491+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
492+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
493+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
494+ });
495+ };
496+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
535497
536498 case
537- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
538- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
539-
540- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
541- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
542- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
543- OSCFunc({~f4 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
544- OSCFunc({~f5 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
545- OSCFunc({~f6 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
546- OSCFunc({~f7 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
547- OSCFunc({~f8 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
548- OSCFunc({~f9 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f9');
549- OSCFunc({~f10 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f10');
550- OSCFunc({~f11 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f11');
551- OSCFunc({~f12 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f12');
499+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
500+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
501+
502+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
503+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
504+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
505+ ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
506+ ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
507+ ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
508+ ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
509+ ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
510+ ~synthflow_random_sendreply_answer_f9 = '/synthflow_random_sendreply_answer_f9';
511+ ~synthflow_random_sendreply_answer_f10 = '/synthflow_random_sendreply_answer_f10';
512+ ~synthflow_random_sendreply_answer_f11 = '/synthflow_random_sendreply_answer_f11';
513+ ~synthflow_random_sendreply_answer_f12 = '/synthflow_random_sendreply_answer_f12';
514+
515+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
516+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
517+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
518+ ~synthflow_gmf_sendreply_answer_f4 = '/synthflow_gmf_sendreply_answer_f4';
519+ ~synthflow_gmf_sendreply_answer_f5 = '/synthflow_gmf_sendreply_answer_f5';
520+ ~synthflow_gmf_sendreply_answer_f6 = '/synthflow_gmf_sendreply_answer_f6';
521+ ~synthflow_gmf_sendreply_answer_f7 = '/synthflow_gmf_sendreply_answer_f7';
522+ ~synthflow_gmf_sendreply_answer_f8 = '/synthflow_gmf_sendreply_answer_f8';
523+ ~synthflow_gmf_sendreply_answer_f9 = '/synthflow_gmf_sendreply_answer_f9';
524+ ~synthflow_gmf_sendreply_answer_f10 = '/synthflow_gmf_sendreply_answer_f10';
525+ ~synthflow_gmf_sendreply_answer_f11 = '/synthflow_gmf_sendreply_answer_f11';
526+ ~synthflow_gmf_sendreply_answer_f12 = '/synthflow_gmf_sendreply_answer_f12';
527+
528+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
529+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
530+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
531+ OSCFunc({~f4 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
532+ OSCFunc({~f5 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
533+ OSCFunc({~f6 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
534+ OSCFunc({~f7 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
535+ OSCFunc({~f8 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
536+ OSCFunc({~f9 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f9');
537+ OSCFunc({~f10 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f10');
538+ OSCFunc({~f11 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f11');
539+ OSCFunc({~f12 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f12');
540+
541+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
542+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
543+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
544+ OSCFunc({x = ~f4; y = ~sendreply_gm_fth_y_4; ~sendreply_gm_fth_func.value; ~f4 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_4 = y;}, '/synthflow_gmf_sendreply_answer_f4');
545+ OSCFunc({x = ~f5; y = ~sendreply_gm_fth_y_5; ~sendreply_gm_fth_func.value; ~f5 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_5 = y;}, '/synthflow_gmf_sendreply_answer_f5');
546+ OSCFunc({x = ~f6; y = ~sendreply_gm_fth_y_6; ~sendreply_gm_fth_func.value; ~f6 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_6 = y;}, '/synthflow_gmf_sendreply_answer_f6');
547+ OSCFunc({x = ~f7; y = ~sendreply_gm_fth_y_7; ~sendreply_gm_fth_func.value; ~f7 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_7 = y;}, '/synthflow_gmf_sendreply_answer_f7');
548+ OSCFunc({x = ~f8; y = ~sendreply_gm_fth_y_8; ~sendreply_gm_fth_func.value; ~f8 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_8 = y;}, '/synthflow_gmf_sendreply_answer_f8');
549+ OSCFunc({x = ~f9; y = ~sendreply_gm_fth_y_9; ~sendreply_gm_fth_func.value; ~f9 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_9 = y;}, '/synthflow_gmf_sendreply_answer_f9');
550+ OSCFunc({x = ~f10; y = ~sendreply_gm_fth_y_10; ~sendreply_gm_fth_func.value; ~f10 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_10 = y;}, '/synthflow_gmf_sendreply_answer_f10');
551+ OSCFunc({x = ~f11; y = ~sendreply_gm_fth_y_11; ~sendreply_gm_fth_func.value; ~f11 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_11 = y;}, '/synthflow_gmf_sendreply_answer_f11');
552+ OSCFunc({x = ~f12; y = ~sendreply_gm_fth_y_12; ~sendreply_gm_fth_func.value; ~f12 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_12 = y;}, '/synthflow_gmf_sendreply_answer_f12');
552553
553554
554555 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -679,50 +680,50 @@ s.waitForBoot({
679680 });
680681
681682 (
682- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12;
683+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12;
683684 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8,~vol9,~vol10,~vol11,~vol12];
684685 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
685686 case
686- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 = \gsineicfld6!12;}
687- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 =
688- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8, \gsineicfld6_f9, \gsineicfld6_f10, \gsineicfld6_f11, \gsineicfld6_f12];};
687+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 = \gsineicfld1!12;}
688+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 =
689+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8, \gsineicfld1_f9, \gsineicfld1_f10, \gsineicfld1_f11, \gsineicfld1_f12];};
689690 s.makeBundle(0, {
690- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
691+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
691692 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
692- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
693- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
693+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
694+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
694695 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
695- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
696- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
696+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
697+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
697698 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
698- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
699- ~l4a = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
699+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
700+ ~l4a = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
700701 ~l4c = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
701- ~l4e = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
702- ~l5a = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
702+ ~l4e = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
703+ ~l5a = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
703704 ~l5c = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
704- ~l5e = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
705- ~l6a = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
705+ ~l5e = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
706+ ~l6a = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
706707 ~l6c = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
707- ~l6e = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
708- ~l7a = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
708+ ~l6e = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
709+ ~l7a = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
709710 ~l7c = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
710- ~l7e = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
711- ~l8a = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
711+ ~l7e = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
712+ ~l8a = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
712713 ~l8c = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
713- ~l8e = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
714- ~l9a = Synth(s1_9, [\dur, ~f9, \vol, vol9]); ~l9b = Synth(s2, [\dur, ~f9, \vol, vol9]);
714+ ~l8e = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
715+ ~l9a = Synth(s1, [\dur, ~f9, \vol, vol9]); ~l9b = Synth(s2, [\dur, ~f9, \vol, vol9]);
715716 ~l9c = Synth(s3, [\dur, ~f9/~icd3, \vol, vol9]); ~l9d = Synth(s4, [\dur, ~f9/~icd3, \vol, vol9]);
716- ~l9e = Synth(s5, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
717- ~l10a = Synth(s1_10, [\dur,~f10, \vol, vol10]); ~l10b = Synth(s2, [\dur, ~f10, \vol, vol10]);
717+ ~l9e = Synth(s5_9, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
718+ ~l10a = Synth(s1, [\dur,~f10, \vol, vol10]); ~l10b = Synth(s2, [\dur, ~f10, \vol, vol10]);
718719 ~l10c = Synth(s3, [\dur, ~f10/~icd3, \vol, vol10]);~l10d = Synth(s4, [\dur, ~f10/~icd3, \vol, vol10]);
719- ~l10e = Synth(s5, [\dur, ~f10/~icd6, \vol, vol10]);~l10f = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
720- ~l11a = Synth(s1_11, [\dur,~f11, \vol, vol11]); ~l11b = Synth(s2, [\dur, ~f11, \vol, vol11]);
720+ ~l10e = Synth(s5_10, [\dur, ~f10/~icd6, \vol, vol10]);~l10f = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
721+ ~l11a = Synth(s1, [\dur,~f11, \vol, vol11]); ~l11b = Synth(s2, [\dur, ~f11, \vol, vol11]);
721722 ~l11c = Synth(s3, [\dur, ~f11/~icd3, \vol, vol11]);~l11d = Synth(s4, [\dur, ~f11/~icd3, \vol, vol11]);
722- ~l11e = Synth(s5, [\dur, ~f11/~icd6, \vol, vol11]);~l11f = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
723- ~l12a = Synth(s1_12, [\dur,~f12, \vol, vol12]); ~l12b = Synth(s2, [\dur, ~f12, \vol, vol12]);
723+ ~l11e = Synth(s5_11, [\dur, ~f11/~icd6, \vol, vol11]);~l11f = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
724+ ~l12a = Synth(s1, [\dur,~f12, \vol, vol12]); ~l12b = Synth(s2, [\dur, ~f12, \vol, vol12]);
724725 ~l12c = Synth(s3, [\dur, ~f12/~icd3, \vol, vol12]);~l12d = Synth(s4, [\dur, ~f12/~icd3, \vol, vol12]);
725- ~l12e = Synth(s5, [\dur, ~f12/~icd6, \vol, vol12]);~l12f = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
726+ ~l12e = Synth(s5_12, [\dur, ~f12/~icd6, \vol, vol12]);~l12f = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
726727 });
727728 });
728729 );
@@ -777,50 +778,50 @@ s.waitForBoot({
777778 }););
778779
779780 (
780- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12;
781+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12;
781782 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8,~vol9,~vol10,~vol11,~vol12];
782783 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
783784 case
784- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 = \gsineicfld6!12;}
785- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 =
786- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8, \gsineicfld6_f9, \gsineicfld6_f10, \gsineicfld6_f11, \gsineicfld6_f12];};
785+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 = \gsineicfld1!12;}
786+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 =
787+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8, \gsineicfld1_f9, \gsineicfld1_f10, \gsineicfld1_f11, \gsineicfld1_f12];};
787788 s.makeBundle(0, {
788- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
789+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
789790 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
790- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
791- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
791+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
792+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
792793 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
793- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
794- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
794+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
795+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
795796 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
796- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
797- ~l4a1 = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
797+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
798+ ~l4a1 = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
798799 ~l4c1 = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d1 = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
799- ~l4e1 = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
800- ~l5a1 = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
800+ ~l4e1 = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
801+ ~l5a1 = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
801802 ~l5c1 = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d1 = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
802- ~l5e1 = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
803- ~l6a1 = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
803+ ~l5e1 = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
804+ ~l6a1 = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
804805 ~l6c1 = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d1 = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
805- ~l6e1 = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
806- ~l7a1 = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
806+ ~l6e1 = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
807+ ~l7a1 = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
807808 ~l7c1 = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d1 = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
808- ~l7e1 = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
809- ~l8a1 = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
809+ ~l7e1 = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
810+ ~l8a1 = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
810811 ~l8c1 = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d1 = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
811- ~l8e1 = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
812- ~l9a1 = Synth(s1_9, [\dur, ~f9, \vol, vol9]); ~l9b1 = Synth(s2, [\dur, ~f9, \vol, vol9]);
812+ ~l8e1 = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
813+ ~l9a1 = Synth(s1, [\dur, ~f9, \vol, vol9]); ~l9b1 = Synth(s2, [\dur, ~f9, \vol, vol9]);
813814 ~l9c1 = Synth(s3, [\dur, ~f9/~icd3, \vol, vol9]); ~l9d1 = Synth(s4, [\dur, ~f9/~icd3, \vol, vol9]);
814- ~l9e1 = Synth(s5, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f1 = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
815- ~l10a1 = Synth(s1_10, [\dur,~f10, \vol, vol10]); ~l10b1 = Synth(s2, [\dur, ~f10, \vol, vol10]);
815+ ~l9e1 = Synth(s5_9, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f1 = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
816+ ~l10a1 = Synth(s1, [\dur,~f10, \vol, vol10]); ~l10b1 = Synth(s2, [\dur, ~f10, \vol, vol10]);
816817 ~l10c1 = Synth(s3, [\dur, ~f10/~icd3, \vol, vol10]);~l10d1 = Synth(s4, [\dur, ~f10/~icd3, \vol, vol10]);
817- ~l10e1 = Synth(s5, [\dur, ~f10/~icd6, \vol, vol10]);~l10f1 = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
818- ~l11a1 = Synth(s1_11, [\dur,~f11, \vol, vol11]); ~l11b1 = Synth(s2, [\dur, ~f11, \vol, vol11]);
818+ ~l10e1 = Synth(s5_10, [\dur, ~f10/~icd6, \vol, vol10]);~l10f1 = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
819+ ~l11a1 = Synth(s1, [\dur,~f11, \vol, vol11]); ~l11b1 = Synth(s2, [\dur, ~f11, \vol, vol11]);
819820 ~l11c1 = Synth(s3, [\dur, ~f11/~icd3, \vol, vol11]);~l11d1 = Synth(s4, [\dur, ~f11/~icd3, \vol, vol11]);
820- ~l11e1 = Synth(s5, [\dur, ~f11/~icd6, \vol, vol11]);~l11f1 = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
821- ~l12a1 = Synth(s1_12, [\dur,~f12, \vol, vol12]); ~l12b1 = Synth(s2, [\dur, ~f12, \vol, vol12]);
821+ ~l11e1 = Synth(s5_11, [\dur, ~f11/~icd6, \vol, vol11]);~l11f1 = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
822+ ~l12a1 = Synth(s1, [\dur,~f12, \vol, vol12]); ~l12b1 = Synth(s2, [\dur, ~f12, \vol, vol12]);
822823 ~l12c1 = Synth(s3, [\dur, ~f12/~icd3, \vol, vol12]);~l12d1 = Synth(s4, [\dur, ~f12/~icd3, \vol, vol12]);
823- ~l12e1 = Synth(s5, [\dur, ~f12/~icd6, \vol, vol12]);~l12f1 = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
824+ ~l12e1 = Synth(s5_12, [\dur, ~f12/~icd6, \vol, vol12]);~l12f1 = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
824825 });
825826 });
826827 );
@@ -2237,40 +2238,6 @@ s.waitForBoot({
22372238
22382239 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
22392240
2240- x=0;
2241- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
2242-
2243-
2244- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
2245-
2246- case
2247- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
2248- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
2249- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
2250- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
2251- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
2252- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
2253- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
2254- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
2255- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
2256- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
2257- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
2258- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
2259- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
2260- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
2261- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
2262- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
2263- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
2264- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
2265- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
2266- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
2267- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
2268- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
2269- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
2270- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
2271- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
2272- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
2273-
22742241 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
22752242 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
22762243
@@ -2302,7 +2269,7 @@ s.waitForBoot({
23022269
23032270 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
23042271
2305- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
2272+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
23062273
23072274 if(~st != nil, {~st.close});
23082275 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2311,11 +2278,12 @@ s.waitForBoot({
23112278 AppClock.sched(~gm,{~st.close;});
23122279 });
23132280
2281+ ~menu2.value = ~gsinenum-1;
23142282
2315- //pop-menu for timewave base (lowest) frequency
23162283
2317- ~bfreqstart = ~basefreq;
2318- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
2284+ //pop-menu for timewave base(lowest) frequency
2285+
2286+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
23192287
23202288 if(~st != nil, {~st.close});
23212289 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2324,6 +2292,8 @@ s.waitForBoot({
23242292 AppClock.sched(~gm,{~st.close;});
23252293 });
23262294
2295+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
2296+
23272297
23282298 //synthdef pop-up menu
23292299
@@ -2392,12 +2362,14 @@ s.waitForBoot({
23922362
23932363 //switch to sendreply functions
23942364
2395- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
2365+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
23962366
23972367 case
23982368 {button.value == 0;}{~sendreplymenu_value = 0;}
23992369 {button.value == 1;}{~sendreplymenu_value = 1;}
2400- {button.value == 2;}{~sendreplymenu_value = 2;};
2370+ {button.value == 2;}{~sendreplymenu_value = 2;}
2371+ {button.value == 3;}{~sendreplymenu_value = 3;}
2372+ {button.value == 4;}{~sendreplymenu_value = 4;};
24012373
24022374 if(~st != nil, {~st.close});
24032375 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2411,14 +2383,16 @@ s.waitForBoot({
24112383 case
24122384 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
24132385 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
2414- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
2386+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
2387+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
2388+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
24152389
24162390
24172391 //set button for all settings
24182392
24192393 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
24202394
2421- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
2395+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
24222396
24232397 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
24242398
@@ -2440,38 +2414,39 @@ s.waitForBoot({
24402414
24412415 case
24422416 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
2443- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
2444- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
2417+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
2418+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
2419+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
2420+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
24452421
24462422
24472423 //evaluate synthdefs(gsine)
24482424
24492425 case
2450- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
2451- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
2452- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
2453- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
2454- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
2455- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
2456- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
2457- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
2458- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
2459- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
2460- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
2461- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
2462- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
2463- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
2464- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
2465- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
2466- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
2467- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
2468- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
2469- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
2470- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
2471- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
2472- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
2473- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
2474- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
2426+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
2427+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
2428+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
2429+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
2430+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
2431+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
2432+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
2433+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
2434+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
2435+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
2436+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
2437+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
2438+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
2439+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
2440+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
2441+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
2442+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
2443+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
2444+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
2445+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
2446+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
2447+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
2448+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
2449+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
24752450
24762451 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
24772452 ~st_load.stringColor = Color.white;
@@ -3303,13 +3278,13 @@ s.waitForBoot({
33033278 });
33043279
33053280
3306- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
3281+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
33073282
3308- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
3283+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
33093284
33103285 });
33113286
3312- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
3287+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
33133288 });
33143289
33153290
@@ -5439,7 +5414,7 @@ s.waitForBoot({
54395414 ~cpumonitorfunc = {
54405415 ~cpumonitor.close;
54415416 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
5442- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
5417+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
54435418 ~cpumonitor.string =
54445419 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
54455420 "ugens: "+s.numUGens.asString++"\n" ++
@@ -5463,6 +5438,7 @@ s.waitForBoot({
54635438 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
54645439
54655440 if(button.value == 1, {
5441+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
54665442 ~cpumonitorroutine.reset;
54675443 ~cpumonitorroutine.play;
54685444 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
--- a/timewavesynth12osx.scd
+++ b/timewavesynth12osx.scd
@@ -12,7 +12,7 @@
1212
1313 //This version is slightly CPU intensive due to the amount of synths it has, so a less-powerful computer may experience trouble running it
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -284,71 +286,15 @@ s.waitForBoot({
284286 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
285287 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
286288
287- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8,~sg1a9=~f9,~sg1a10=~f10,~sg1a11=~f11,~sg1a12=~f12];});
288- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8,~sg1b9=~f9,~sg1b10=~f10,~sg1b11=~f11,~sg1b12=~f12];});
289- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8,~sg1c9=~f9,~sg1c10=~f10,~sg1c11=~f11,~sg1c12=~f12];});
290- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8,~sg1d9=~f9,~sg1d10=~f10,~sg1d11=~f11,~sg1d12=~f12];});
291- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8,~sg1e9=~f9,~sg1e10=~f10,~sg1e11=~f11,~sg1e12=~f12];});
292- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8,~sg1f9=~f9,~sg1f10=~f10,~sg1f11=~f11,~sg1f12=~f12];});
293- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8,~sg1g9=~f9,~sg1g10=~f10,~sg1g11=~f11,~sg1g12=~f12];});
294- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8,~sg1h9=~f9,~sg1h10=~f10,~sg1h11=~f11,~sg1h12=~f12];});
295- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8,~sg2a9=~f9,~sg2a10=~f10,~sg2a11=~f11,~sg2a12=~f12];});
296- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8,~sg2b9=~f9,~sg2b10=~f10,~sg2b11=~f11,~sg2b12=~f12];});
297- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8,~sg2c9=~f9,~sg2c10=~f10,~sg2c11=~f11,~sg2c12=~f12];});
298- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8,~sg2d9=~f9,~sg2d10=~f10,~sg2d11=~f11,~sg2d12=~f12];});
299- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8,~sg2e9=~f9,~sg2e10=~f10,~sg2e11=~f11,~sg2e12=~f12];});
300- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8,~sg2f9=~f9,~sg2f10=~f10,~sg2f11=~f11,~sg2f12=~f12];});
301- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8,~sg2g9=~f9,~sg2g10=~f10,~sg2g11=~f11,~sg2g12=~f12];});
302- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8,~sg2h9=~f9,~sg2h10=~f10,~sg2h11=~f11,~sg2h12=~f12];});
303- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8,~sg3a9=~f9,~sg3a10=~f10,~sg3a11=~f11,~sg3a12=~f12];});
304- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8,~sg3b9=~f9,~sg3b10=~f10,~sg3b11=~f11,~sg3b12=~f12];});
305- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8,~sg3c9=~f9,~sg3c10=~f10,~sg3c11=~f11,~sg3c12=~f12];});
306- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8,~sg3d9=~f9,~sg3d10=~f10,~sg3d11=~f11,~sg3d12=~f12];});
307- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8,~sg3e9=~f9,~sg3e10=~f10,~sg3e11=~f11,~sg3e12=~f12];});
308- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8,~sg3f9=~f9,~sg3f10=~f10,~sg3f11=~f11,~sg3f12=~f12];});
309- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8,~sg3g9=~f9,~sg3g10=~f10,~sg3g11=~f11,~sg3g12=~f12];});
310- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8,~sg3h9=~f9,~sg3h10=~f10,~sg3h11=~f11,~sg3h12=~f12];});
311- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8,~sg4a9=~f9,~sg4a10=~f10,~sg4a11=~f11,~sg4a12=~f12];});
312- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8,~sg4b9=~f9,~sg4b10=~f10,~sg4b11=~f11,~sg4b12=~f12];});
313- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8,~sg4c9=~f9,~sg4c10=~f10,~sg4c11=~f11,~sg4c12=~f12];});
314- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8,~sg4d9=~f9,~sg4d10=~f10,~sg4d11=~f11,~sg4d12=~f12];});
315- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8,~sg4e9=~f9,~sg4e10=~f10,~sg4e11=~f11,~sg4e12=~f12];});
316- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8,~sg4f9=~f9,~sg4f10=~f10,~sg4f11=~f11,~sg4f12=~f12];});
317- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8,~sg4g9=~f9,~sg4g10=~f10,~sg4g11=~f11,~sg4g12=~f12];});
318- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8,~sg4h9=~f9,~sg4h10=~f10,~sg4h11=~f11,~sg4h12=~f12];});
319- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8,~sg5a9=~f9,~sg5a10=~f10,~sg5a11=~f11,~sg5a12=~f12];});
320- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8,~sg5b9=~f9,~sg5b10=~f10,~sg5b11=~f11,~sg5b12=~f12];});
321- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8,~sg5c9=~f9,~sg5c10=~f10,~sg5c11=~f11,~sg5c12=~f12];});
322- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8,~sg5d9=~f9,~sg5d10=~f10,~sg5d11=~f11,~sg5d12=~f12];});
323- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8,~sg5e9=~f9,~sg5e10=~f10,~sg5e11=~f11,~sg5e12=~f12];});
324- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8,~sg5f9=~f9,~sg5f10=~f10,~sg5f11=~f11,~sg5f12=~f12];});
325- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8,~sg5g9=~f9,~sg5g10=~f10,~sg5g11=~f11,~sg5g12=~f12];});
326- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8,~sg5h9=~f9,~sg5h10=~f10,~sg5h11=~f11,~sg5h12=~f12];});
327- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8,~sg6a9=~f9,~sg6a10=~f10,~sg6a11=~f11,~sg6a12=~f12];});
328- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8,~sg6b9=~f9,~sg6b10=~f10,~sg6b11=~f11,~sg6b12=~f12];});
329- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8,~sg6c9=~f9,~sg6c10=~f10,~sg6c11=~f11,~sg6c12=~f12];});
330- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8,~sg6d9=~f9,~sg6d10=~f10,~sg6d11=~f11,~sg6d12=~f12];});
331- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8,~sg6e9=~f9,~sg6e10=~f10,~sg6e11=~f11,~sg6e12=~f12];});
332- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8,~sg6f9=~f9,~sg6f10=~f10,~sg6f11=~f11,~sg6f12=~f12];});
333- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8,~sg6g9=~f9,~sg6g10=~f10,~sg6g11=~f11,~sg6g12=~f12];});
334- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8,~sg6h9=~f9,~sg6h10=~f10,~sg6h11=~f11,~sg6h12=~f12];});
335- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8,~sg7a9=~f9,~sg7a10=~f10,~sg7a11=~f11,~sg7a12=~f12];});
336- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8,~sg7b9=~f9,~sg7b10=~f10,~sg7b11=~f11,~sg7b12=~f12];});
337- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8,~sg7c9=~f9,~sg7c10=~f10,~sg7c11=~f11,~sg7c12=~f12];});
338- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8,~sg7d9=~f9,~sg7d10=~f10,~sg7d11=~f11,~sg7d12=~f12];});
339- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8,~sg7e9=~f9,~sg7e10=~f10,~sg7e11=~f11,~sg7e12=~f12];});
340- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8,~sg7f9=~f9,~sg7f10=~f10,~sg7f11=~f11,~sg7f12=~f12];});
341- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8,~sg7g9=~f9,~sg7g10=~f10,~sg7g11=~f11,~sg7g12=~f12];});
342- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8,~sg7h9=~f9,~sg7h10=~f10,~sg7h11=~f11,~sg7h12=~f12];});
343- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8,~sg8a9=~f9,~sg8a10=~f10,~sg8a11=~f11,~sg8a12=~f12];});
344- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8,~sg8b9=~f9,~sg8b10=~f10,~sg8b11=~f11,~sg8b12=~f12];});
345- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8,~sg8c9=~f9,~sg8c10=~f10,~sg8c11=~f11,~sg8c12=~f12];});
346- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8,~sg8d9=~f9,~sg8d10=~f10,~sg8d11=~f11,~sg8d12=~f12];});
347- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8,~sg8e9=~f9,~sg8e10=~f10,~sg8e11=~f11,~sg8e12=~f12];});
348- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8,~sg8f9=~f9,~sg8f10=~f10,~sg8f11=~f11,~sg8f12=~f12];});
349- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8,~sg8g9=~f9,~sg8g10=~f10,~sg8g11=~f11,~sg8g12=~f12];});
350- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8,~sg8h9=~f9,~sg8h10=~f10,~sg8h11=~f11,~sg8h12=~f12];});
351-
289+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
290+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
291+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
292+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
293+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
294+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
295+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
296+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
297+ */
352298
353299 //set n1-n9 ratio values
354300
@@ -487,32 +433,19 @@ s.waitForBoot({
487433
488434 if(~sendreplysynthdef_on == 1, {
489435
490- ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
491- ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
492- ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
493- ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
494- ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
495- ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
496- ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
497- ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
498- ~synthflow_random_sendreply_answer_f9 = '/synthflow_random_sendreply_answer_f9';
499- ~synthflow_random_sendreply_answer_f10 = '/synthflow_random_sendreply_answer_f10';
500- ~synthflow_random_sendreply_answer_f11 = '/synthflow_random_sendreply_answer_f11';
501- ~synthflow_random_sendreply_answer_f12 = '/synthflow_random_sendreply_answer_f12';
502-
503436 12.do(~sendreply_x = 0; {
504437
505438 ~sendreply_x=~sendreply_x+1;
506439
507- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
440+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
508441 a, b, c, d, e, f, pan=0, fc = 1;
509442 var s1, out, env1, s2, dseq;
510- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
443+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
511444 dseq = Dseq(
512445 case
513446 {~kws_setting == 1}{~kws_setting_1_a.value;}
514447 {~kws_setting == 2}{~kws_setting_2_a.value;}
515- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
448+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
516449 case
517450 {~kws_setting == 1}{~kws_setting_1_b.value;}
518451 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -520,7 +453,11 @@ s.waitForBoot({
520453 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
521454 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
522455 OffsetOut.ar(0, s1.dup*vol);
523- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
456+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
457+ case
458+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
459+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
460+ );
524461 }, [\ir]).add;
525462
526463 });
@@ -528,27 +465,91 @@ s.waitForBoot({
528465 };
529466
530467
531- //sendyreply functions
468+ //sendreply functions
532469
533- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
534- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
470+ ~sendreplyfunc_choose = 0;
471+
472+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
473+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
474+
475+ if(~sendreply_gm_fth_y_1 == nil, {12.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
476+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
477+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
478+
479+ }, {
480+ if(x > 1539.4729849465, {
481+ case
482+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
483+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
484+ }, {
485+ case
486+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
487+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
488+ });
489+ });
490+ };
491+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
492+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
493+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
494+ });
495+ };
496+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
535497
536498 case
537- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
538- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
539-
540- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
541- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
542- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
543- OSCFunc({~f4 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
544- OSCFunc({~f5 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
545- OSCFunc({~f6 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
546- OSCFunc({~f7 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
547- OSCFunc({~f8 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
548- OSCFunc({~f9 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f9');
549- OSCFunc({~f10 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f10');
550- OSCFunc({~f11 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f11');
551- OSCFunc({~f12 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f12');
499+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
500+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
501+
502+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
503+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
504+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
505+ ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
506+ ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
507+ ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
508+ ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
509+ ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
510+ ~synthflow_random_sendreply_answer_f9 = '/synthflow_random_sendreply_answer_f9';
511+ ~synthflow_random_sendreply_answer_f10 = '/synthflow_random_sendreply_answer_f10';
512+ ~synthflow_random_sendreply_answer_f11 = '/synthflow_random_sendreply_answer_f11';
513+ ~synthflow_random_sendreply_answer_f12 = '/synthflow_random_sendreply_answer_f12';
514+
515+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
516+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
517+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
518+ ~synthflow_gmf_sendreply_answer_f4 = '/synthflow_gmf_sendreply_answer_f4';
519+ ~synthflow_gmf_sendreply_answer_f5 = '/synthflow_gmf_sendreply_answer_f5';
520+ ~synthflow_gmf_sendreply_answer_f6 = '/synthflow_gmf_sendreply_answer_f6';
521+ ~synthflow_gmf_sendreply_answer_f7 = '/synthflow_gmf_sendreply_answer_f7';
522+ ~synthflow_gmf_sendreply_answer_f8 = '/synthflow_gmf_sendreply_answer_f8';
523+ ~synthflow_gmf_sendreply_answer_f9 = '/synthflow_gmf_sendreply_answer_f9';
524+ ~synthflow_gmf_sendreply_answer_f10 = '/synthflow_gmf_sendreply_answer_f10';
525+ ~synthflow_gmf_sendreply_answer_f11 = '/synthflow_gmf_sendreply_answer_f11';
526+ ~synthflow_gmf_sendreply_answer_f12 = '/synthflow_gmf_sendreply_answer_f12';
527+
528+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
529+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
530+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
531+ OSCFunc({~f4 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
532+ OSCFunc({~f5 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
533+ OSCFunc({~f6 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
534+ OSCFunc({~f7 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
535+ OSCFunc({~f8 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
536+ OSCFunc({~f9 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f9');
537+ OSCFunc({~f10 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f10');
538+ OSCFunc({~f11 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f11');
539+ OSCFunc({~f12 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f12');
540+
541+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
542+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
543+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
544+ OSCFunc({x = ~f4; y = ~sendreply_gm_fth_y_4; ~sendreply_gm_fth_func.value; ~f4 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_4 = y;}, '/synthflow_gmf_sendreply_answer_f4');
545+ OSCFunc({x = ~f5; y = ~sendreply_gm_fth_y_5; ~sendreply_gm_fth_func.value; ~f5 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_5 = y;}, '/synthflow_gmf_sendreply_answer_f5');
546+ OSCFunc({x = ~f6; y = ~sendreply_gm_fth_y_6; ~sendreply_gm_fth_func.value; ~f6 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_6 = y;}, '/synthflow_gmf_sendreply_answer_f6');
547+ OSCFunc({x = ~f7; y = ~sendreply_gm_fth_y_7; ~sendreply_gm_fth_func.value; ~f7 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_7 = y;}, '/synthflow_gmf_sendreply_answer_f7');
548+ OSCFunc({x = ~f8; y = ~sendreply_gm_fth_y_8; ~sendreply_gm_fth_func.value; ~f8 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_8 = y;}, '/synthflow_gmf_sendreply_answer_f8');
549+ OSCFunc({x = ~f9; y = ~sendreply_gm_fth_y_9; ~sendreply_gm_fth_func.value; ~f9 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_9 = y;}, '/synthflow_gmf_sendreply_answer_f9');
550+ OSCFunc({x = ~f10; y = ~sendreply_gm_fth_y_10; ~sendreply_gm_fth_func.value; ~f10 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_10 = y;}, '/synthflow_gmf_sendreply_answer_f10');
551+ OSCFunc({x = ~f11; y = ~sendreply_gm_fth_y_11; ~sendreply_gm_fth_func.value; ~f11 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_11 = y;}, '/synthflow_gmf_sendreply_answer_f11');
552+ OSCFunc({x = ~f12; y = ~sendreply_gm_fth_y_12; ~sendreply_gm_fth_func.value; ~f12 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_12 = y;}, '/synthflow_gmf_sendreply_answer_f12');
552553
553554
554555 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -679,50 +680,50 @@ s.waitForBoot({
679680 });
680681
681682 (
682- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12;
683+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12;
683684 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8,~vol9,~vol10,~vol11,~vol12];
684685 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
685686 case
686- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 = \gsineicfld6!12;}
687- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 =
688- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8, \gsineicfld6_f9, \gsineicfld6_f10, \gsineicfld6_f11, \gsineicfld6_f12];};
687+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 = \gsineicfld1!12;}
688+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 =
689+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8, \gsineicfld1_f9, \gsineicfld1_f10, \gsineicfld1_f11, \gsineicfld1_f12];};
689690 s.makeBundle(0, {
690- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
691+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
691692 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
692- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
693- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
693+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
694+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
694695 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
695- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
696- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
696+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
697+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
697698 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
698- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
699- ~l4a = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
699+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
700+ ~l4a = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
700701 ~l4c = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
701- ~l4e = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
702- ~l5a = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
702+ ~l4e = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
703+ ~l5a = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
703704 ~l5c = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
704- ~l5e = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
705- ~l6a = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
705+ ~l5e = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
706+ ~l6a = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
706707 ~l6c = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
707- ~l6e = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
708- ~l7a = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
708+ ~l6e = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
709+ ~l7a = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
709710 ~l7c = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
710- ~l7e = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
711- ~l8a = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
711+ ~l7e = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
712+ ~l8a = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
712713 ~l8c = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
713- ~l8e = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
714- ~l9a = Synth(s1_9, [\dur, ~f9, \vol, vol9]); ~l9b = Synth(s2, [\dur, ~f9, \vol, vol9]);
714+ ~l8e = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
715+ ~l9a = Synth(s1, [\dur, ~f9, \vol, vol9]); ~l9b = Synth(s2, [\dur, ~f9, \vol, vol9]);
715716 ~l9c = Synth(s3, [\dur, ~f9/~icd3, \vol, vol9]); ~l9d = Synth(s4, [\dur, ~f9/~icd3, \vol, vol9]);
716- ~l9e = Synth(s5, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
717- ~l10a = Synth(s1_10, [\dur,~f10, \vol, vol10]); ~l10b = Synth(s2, [\dur, ~f10, \vol, vol10]);
717+ ~l9e = Synth(s5_9, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
718+ ~l10a = Synth(s1, [\dur,~f10, \vol, vol10]); ~l10b = Synth(s2, [\dur, ~f10, \vol, vol10]);
718719 ~l10c = Synth(s3, [\dur, ~f10/~icd3, \vol, vol10]);~l10d = Synth(s4, [\dur, ~f10/~icd3, \vol, vol10]);
719- ~l10e = Synth(s5, [\dur, ~f10/~icd6, \vol, vol10]);~l10f = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
720- ~l11a = Synth(s1_11, [\dur,~f11, \vol, vol11]); ~l11b = Synth(s2, [\dur, ~f11, \vol, vol11]);
720+ ~l10e = Synth(s5_10, [\dur, ~f10/~icd6, \vol, vol10]);~l10f = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
721+ ~l11a = Synth(s1, [\dur,~f11, \vol, vol11]); ~l11b = Synth(s2, [\dur, ~f11, \vol, vol11]);
721722 ~l11c = Synth(s3, [\dur, ~f11/~icd3, \vol, vol11]);~l11d = Synth(s4, [\dur, ~f11/~icd3, \vol, vol11]);
722- ~l11e = Synth(s5, [\dur, ~f11/~icd6, \vol, vol11]);~l11f = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
723- ~l12a = Synth(s1_12, [\dur,~f12, \vol, vol12]); ~l12b = Synth(s2, [\dur, ~f12, \vol, vol12]);
723+ ~l11e = Synth(s5_11, [\dur, ~f11/~icd6, \vol, vol11]);~l11f = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
724+ ~l12a = Synth(s1, [\dur,~f12, \vol, vol12]); ~l12b = Synth(s2, [\dur, ~f12, \vol, vol12]);
724725 ~l12c = Synth(s3, [\dur, ~f12/~icd3, \vol, vol12]);~l12d = Synth(s4, [\dur, ~f12/~icd3, \vol, vol12]);
725- ~l12e = Synth(s5, [\dur, ~f12/~icd6, \vol, vol12]);~l12f = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
726+ ~l12e = Synth(s5_12, [\dur, ~f12/~icd6, \vol, vol12]);~l12f = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
726727 });
727728 });
728729 );
@@ -777,50 +778,50 @@ s.waitForBoot({
777778 }););
778779
779780 (
780- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12;
781+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12;
781782 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,vol9,vol10,vol11,vol12 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8,~vol9,~vol10,~vol11,~vol12];
782783 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
783784 case
784- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 = \gsineicfld6!12;}
785- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8,s1_9,s1_10,s1_11,s1_12 =
786- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8, \gsineicfld6_f9, \gsineicfld6_f10, \gsineicfld6_f11, \gsineicfld6_f12];};
785+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 = \gsineicfld1!12;}
786+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8,s5_9,s5_10,s5_11,s5_12 =
787+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8, \gsineicfld1_f9, \gsineicfld1_f10, \gsineicfld1_f11, \gsineicfld1_f12];};
787788 s.makeBundle(0, {
788- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
789+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
789790 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
790- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
791- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
791+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
792+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
792793 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
793- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
794- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
794+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
795+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
795796 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
796- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
797- ~l4a1 = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
797+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
798+ ~l4a1 = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
798799 ~l4c1 = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d1 = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
799- ~l4e1 = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
800- ~l5a1 = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
800+ ~l4e1 = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
801+ ~l5a1 = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
801802 ~l5c1 = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d1 = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
802- ~l5e1 = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
803- ~l6a1 = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
803+ ~l5e1 = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
804+ ~l6a1 = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
804805 ~l6c1 = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d1 = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
805- ~l6e1 = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
806- ~l7a1 = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
806+ ~l6e1 = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
807+ ~l7a1 = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
807808 ~l7c1 = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d1 = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
808- ~l7e1 = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
809- ~l8a1 = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
809+ ~l7e1 = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
810+ ~l8a1 = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
810811 ~l8c1 = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d1 = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
811- ~l8e1 = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
812- ~l9a1 = Synth(s1_9, [\dur, ~f9, \vol, vol9]); ~l9b1 = Synth(s2, [\dur, ~f9, \vol, vol9]);
812+ ~l8e1 = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
813+ ~l9a1 = Synth(s1, [\dur, ~f9, \vol, vol9]); ~l9b1 = Synth(s2, [\dur, ~f9, \vol, vol9]);
813814 ~l9c1 = Synth(s3, [\dur, ~f9/~icd3, \vol, vol9]); ~l9d1 = Synth(s4, [\dur, ~f9/~icd3, \vol, vol9]);
814- ~l9e1 = Synth(s5, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f1 = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
815- ~l10a1 = Synth(s1_10, [\dur,~f10, \vol, vol10]); ~l10b1 = Synth(s2, [\dur, ~f10, \vol, vol10]);
815+ ~l9e1 = Synth(s5_9, [\dur, ~f9/~icd6, \vol, vol9]); ~l9f1 = Synth(s6, [\dur, ~f9/~icd6, \vol, vol9]);
816+ ~l10a1 = Synth(s1, [\dur,~f10, \vol, vol10]); ~l10b1 = Synth(s2, [\dur, ~f10, \vol, vol10]);
816817 ~l10c1 = Synth(s3, [\dur, ~f10/~icd3, \vol, vol10]);~l10d1 = Synth(s4, [\dur, ~f10/~icd3, \vol, vol10]);
817- ~l10e1 = Synth(s5, [\dur, ~f10/~icd6, \vol, vol10]);~l10f1 = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
818- ~l11a1 = Synth(s1_11, [\dur,~f11, \vol, vol11]); ~l11b1 = Synth(s2, [\dur, ~f11, \vol, vol11]);
818+ ~l10e1 = Synth(s5_10, [\dur, ~f10/~icd6, \vol, vol10]);~l10f1 = Synth(s6, [\dur, ~f10/~icd6, \vol, vol10]);
819+ ~l11a1 = Synth(s1, [\dur,~f11, \vol, vol11]); ~l11b1 = Synth(s2, [\dur, ~f11, \vol, vol11]);
819820 ~l11c1 = Synth(s3, [\dur, ~f11/~icd3, \vol, vol11]);~l11d1 = Synth(s4, [\dur, ~f11/~icd3, \vol, vol11]);
820- ~l11e1 = Synth(s5, [\dur, ~f11/~icd6, \vol, vol11]);~l11f1 = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
821- ~l12a1 = Synth(s1_12, [\dur,~f12, \vol, vol12]); ~l12b1 = Synth(s2, [\dur, ~f12, \vol, vol12]);
821+ ~l11e1 = Synth(s5_11, [\dur, ~f11/~icd6, \vol, vol11]);~l11f1 = Synth(s6, [\dur, ~f11/~icd6, \vol, vol11]);
822+ ~l12a1 = Synth(s1, [\dur,~f12, \vol, vol12]); ~l12b1 = Synth(s2, [\dur, ~f12, \vol, vol12]);
822823 ~l12c1 = Synth(s3, [\dur, ~f12/~icd3, \vol, vol12]);~l12d1 = Synth(s4, [\dur, ~f12/~icd3, \vol, vol12]);
823- ~l12e1 = Synth(s5, [\dur, ~f12/~icd6, \vol, vol12]);~l12f1 = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
824+ ~l12e1 = Synth(s5_12, [\dur, ~f12/~icd6, \vol, vol12]);~l12f1 = Synth(s6, [\dur, ~f12/~icd6, \vol, vol12]);
824825 });
825826 });
826827 );
@@ -2237,40 +2238,6 @@ s.waitForBoot({
22372238
22382239 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
22392240
2240- x=0;
2241- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
2242-
2243-
2244- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
2245-
2246- case
2247- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
2248- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
2249- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
2250- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
2251- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
2252- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
2253- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
2254- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
2255- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
2256- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
2257- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
2258- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
2259- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
2260- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
2261- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
2262- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
2263- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
2264- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
2265- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
2266- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
2267- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
2268- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
2269- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
2270- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
2271- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
2272- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
2273-
22742241 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
22752242 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
22762243
@@ -2302,7 +2269,7 @@ s.waitForBoot({
23022269
23032270 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
23042271
2305- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
2272+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
23062273
23072274 if(~st != nil, {~st.close});
23082275 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2311,11 +2278,12 @@ s.waitForBoot({
23112278 AppClock.sched(~gm,{~st.close;});
23122279 });
23132280
2281+ ~menu2.value = ~gsinenum-1;
23142282
2315- //pop-menu for timewave base (lowest) frequency
23162283
2317- ~bfreqstart = ~basefreq;
2318- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
2284+ //pop-menu for timewave base(lowest) frequency
2285+
2286+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
23192287
23202288 if(~st != nil, {~st.close});
23212289 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2324,6 +2292,8 @@ s.waitForBoot({
23242292 AppClock.sched(~gm,{~st.close;});
23252293 });
23262294
2295+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
2296+
23272297
23282298 //synthdef pop-up menu
23292299
@@ -2392,12 +2362,14 @@ s.waitForBoot({
23922362
23932363 //switch to sendreply functions
23942364
2395- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
2365+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
23962366
23972367 case
23982368 {button.value == 0;}{~sendreplymenu_value = 0;}
23992369 {button.value == 1;}{~sendreplymenu_value = 1;}
2400- {button.value == 2;}{~sendreplymenu_value = 2;};
2370+ {button.value == 2;}{~sendreplymenu_value = 2;}
2371+ {button.value == 3;}{~sendreplymenu_value = 3;}
2372+ {button.value == 4;}{~sendreplymenu_value = 4;};
24012373
24022374 if(~st != nil, {~st.close});
24032375 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -2411,14 +2383,16 @@ s.waitForBoot({
24112383 case
24122384 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
24132385 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
2414- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
2386+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
2387+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
2388+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
24152389
24162390
24172391 //set button for all settings
24182392
24192393 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
24202394
2421- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
2395+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
24222396
24232397 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
24242398
@@ -2440,38 +2414,39 @@ s.waitForBoot({
24402414
24412415 case
24422416 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
2443- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
2444- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
2417+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
2418+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
2419+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
2420+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
24452421
24462422
24472423 //evaluate synthdefs(gsine)
24482424
24492425 case
2450- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
2451- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
2452- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
2453- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
2454- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
2455- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
2456- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
2457- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
2458- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
2459- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
2460- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
2461- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
2462- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
2463- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
2464- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
2465- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
2466- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
2467- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
2468- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
2469- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
2470- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
2471- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
2472- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
2473- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
2474- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
2426+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
2427+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
2428+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
2429+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
2430+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
2431+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
2432+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
2433+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
2434+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
2435+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
2436+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
2437+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
2438+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
2439+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
2440+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
2441+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
2442+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
2443+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
2444+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
2445+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
2446+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
2447+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
2448+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
2449+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
24752450
24762451 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
24772452 ~st_load.stringColor = Color.white;
@@ -3303,13 +3278,13 @@ s.waitForBoot({
33033278 });
33043279
33053280
3306- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
3281+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
33073282
3308- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
3283+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
33093284
33103285 });
33113286
3312- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
3287+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
33133288 });
33143289
33153290
@@ -5439,7 +5414,7 @@ s.waitForBoot({
54395414 ~cpumonitorfunc = {
54405415 ~cpumonitor.close;
54415416 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
5442- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
5417+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
54435418 ~cpumonitor.string =
54445419 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
54455420 "ugens: "+s.numUGens.asString++"\n" ++
@@ -5463,6 +5438,7 @@ s.waitForBoot({
54635438 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
54645439
54655440 if(button.value == 1, {
5441+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
54665442 ~cpumonitorroutine.reset;
54675443 ~cpumonitorroutine.play;
54685444 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
--- a/timewavesynth3.scd
+++ b/timewavesynth3.scd
@@ -12,7 +12,7 @@
1212
1313 //This synth is compatible with the Korg NanoKontrol 2
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -275,71 +277,15 @@ s.waitForBoot({
275277 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
276278 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
277279
278- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8];});
279- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8];});
280- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8];});
281- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8];});
282- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8];});
283- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8];});
284- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8];});
285- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8];});
286- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8];});
287- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8];});
288- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8];});
289- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8];});
290- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8];});
291- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8];});
292- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8];});
293- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8];});
294- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8];});
295- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8];});
296- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8];});
297- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8];});
298- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8];});
299- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8];});
300- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8];});
301- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8];});
302- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8];});
303- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8];});
304- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8];});
305- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8];});
306- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8];});
307- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8];});
308- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8];});
309- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8];});
310- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8];});
311- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8];});
312- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8];});
313- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8];});
314- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8];});
315- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8];});
316- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8];});
317- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8];});
318- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8];});
319- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8];});
320- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8];});
321- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8];});
322- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8];});
323- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8];});
324- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8];});
325- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8];});
326- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8];});
327- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8];});
328- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8];});
329- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8];});
330- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8];});
331- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8];});
332- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8];});
333- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8];});
334- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8];});
335- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8];});
336- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8];});
337- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8];});
338- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8];});
339- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8];});
340- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8];});
341- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8];});
342-
280+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
281+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
282+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
283+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
284+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
285+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
286+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
287+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
288+ */
343289
344290 //set n1-n9 ratio values
345291
@@ -486,15 +432,15 @@ s.waitForBoot({
486432
487433 ~sendreply_x=~sendreply_x+1;
488434
489- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
435+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
490436 a, b, c, d, e, f, pan=0, fc = 1;
491437 var s1, out, env1, s2, dseq;
492- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
438+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
493439 dseq = Dseq(
494440 case
495441 {~kws_setting == 1}{~kws_setting_1_a.value;}
496442 {~kws_setting == 2}{~kws_setting_2_a.value;}
497- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
443+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
498444 case
499445 {~kws_setting == 1}{~kws_setting_1_b.value;}
500446 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -502,7 +448,11 @@ s.waitForBoot({
502448 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
503449 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
504450 OffsetOut.ar(0, s1.dup*vol);
505- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
451+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
452+ case
453+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
454+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
455+ );
506456 }, [\ir]).add;
507457
508458 });
@@ -510,18 +460,55 @@ s.waitForBoot({
510460 };
511461
512462
513- //sendyreply functions
463+ //sendreply functions
464+
465+ ~sendreplyfunc_choose = 0;
466+
467+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
468+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
514469
515- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
516- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
470+ if(~sendreply_gm_fth_y_1 == nil, {3.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
471+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
472+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
473+
474+ }, {
475+ if(x > 1539.4729849465, {
476+ case
477+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
478+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
479+ }, {
480+ case
481+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
482+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
483+ });
484+ });
485+ };
486+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
487+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
488+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
489+ });
490+ };
491+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
517492
518493 case
519- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
520- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
494+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
495+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
496+
497+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
498+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
499+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
521500
522- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
523- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
524- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
501+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
502+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
503+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
504+
505+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
506+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
507+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
508+
509+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
510+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
511+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
525512
526513
527514 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -606,23 +593,23 @@ s.waitForBoot({
606593 });
607594
608595 (
609- 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3;
596+ 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3;
610597 #vol1,vol2,vol3 = [~vol1,~vol2,~vol3];
611598 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
612599 case
613- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3 = \gsineicfld6!3;}
614- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3 =
615- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3];};
600+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3 = \gsineicfld1!3;}
601+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3 =
602+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3];};
616603 s.makeBundle(0, {
617- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
604+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
618605 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
619- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
620- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
606+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
607+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
621608 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
622- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
623- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
609+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
610+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
624611 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
625- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
612+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
626613 });
627614 });
628615 );
@@ -650,23 +637,23 @@ s.waitForBoot({
650637 }););
651638
652639 (
653- 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3;
640+ 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3;
654641 #vol1,vol2,vol3 = [~vol1,~vol2,~vol3];
655642 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
656643 case
657- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3 = \gsineicfld6!3;}
658- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3 =
659- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3];};
644+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3 = \gsineicfld1!3;}
645+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3 =
646+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3];};
660647 s.makeBundle(0, {
661- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
648+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
662649 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
663- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
664- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
650+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
651+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
665652 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
666- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
667- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
653+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
654+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
668655 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
669- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
656+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
670657 });
671658 });
672659 );
@@ -1287,40 +1274,6 @@ s.waitForBoot({
12871274
12881275 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
12891276
1290- x=0;
1291- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
1292-
1293-
1294- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
1295-
1296- case
1297- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
1298- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
1299- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
1300- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
1301- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
1302- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
1303- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
1304- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
1305- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
1306- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
1307- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
1308- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
1309- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
1310- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
1311- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
1312- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
1313- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
1314- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
1315- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
1316- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
1317- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
1318- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
1319- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
1320- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
1321- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
1322- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
1323-
13241277 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
13251278 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
13261279
@@ -1352,7 +1305,7 @@ s.waitForBoot({
13521305
13531306 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
13541307
1355- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
1308+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
13561309
13571310 if(~st != nil, {~st.close});
13581311 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1361,11 +1314,12 @@ s.waitForBoot({
13611314 AppClock.sched(~gm,{~st.close;});
13621315 });
13631316
1317+ ~menu2.value = ~gsinenum-1;
1318+
13641319
1365- //pop-menu for timewave base (lowest) frequency
1320+ //pop-menu for timewave base(lowest) frequency
13661321
1367- ~bfreqstart = ~basefreq;
1368- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
1322+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
13691323
13701324 if(~st != nil, {~st.close});
13711325 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1374,6 +1328,8 @@ s.waitForBoot({
13741328 AppClock.sched(~gm,{~st.close;});
13751329 });
13761330
1331+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
1332+
13771333
13781334 //synthdef pop-up menu
13791335
@@ -1442,12 +1398,14 @@ s.waitForBoot({
14421398
14431399 //switch to sendreply functions
14441400
1445- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
1401+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
14461402
14471403 case
14481404 {button.value == 0;}{~sendreplymenu_value = 0;}
14491405 {button.value == 1;}{~sendreplymenu_value = 1;}
1450- {button.value == 2;}{~sendreplymenu_value = 2;};
1406+ {button.value == 2;}{~sendreplymenu_value = 2;}
1407+ {button.value == 3;}{~sendreplymenu_value = 3;}
1408+ {button.value == 4;}{~sendreplymenu_value = 4;};
14511409
14521410 if(~st != nil, {~st.close});
14531411 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1461,14 +1419,16 @@ s.waitForBoot({
14611419 case
14621420 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
14631421 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
1464- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
1422+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
1423+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
1424+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
14651425
14661426
14671427 //set button for all settings
14681428
14691429 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
14701430
1471- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
1431+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
14721432
14731433 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
14741434
@@ -1490,38 +1450,39 @@ s.waitForBoot({
14901450
14911451 case
14921452 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
1493- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
1494- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
1453+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
1454+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
1455+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
1456+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
14951457
14961458
14971459 //evaluate synthdefs(gsine)
14981460
14991461 case
1500- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
1501- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
1502- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
1503- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
1504- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
1505- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
1506- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
1507- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
1508- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
1509- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
1510- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
1511- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
1512- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
1513- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
1514- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
1515- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
1516- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
1517- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
1518- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
1519- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
1520- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
1521- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
1522- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
1523- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
1524- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
1462+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
1463+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
1464+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
1465+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
1466+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
1467+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
1468+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
1469+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
1470+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
1471+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
1472+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
1473+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
1474+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
1475+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
1476+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
1477+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
1478+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
1479+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
1480+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
1481+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
1482+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
1483+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
1484+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
1485+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
15251486
15261487 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
15271488 ~st_load.stringColor = Color.white;
@@ -2277,13 +2238,13 @@ s.waitForBoot({
22772238 });
22782239
22792240
2280- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
2241+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
22812242
2282- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
2243+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
22832244
22842245 });
22852246
2286- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
2247+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
22872248 });
22882249
22892250
@@ -3390,7 +3351,7 @@ s.waitForBoot({
33903351 ~cpumonitorfunc = {
33913352 ~cpumonitor.close;
33923353 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
3393- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
3354+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
33943355 ~cpumonitor.string =
33953356 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
33963357 "ugens: "+s.numUGens.asString++"\n" ++
@@ -3413,6 +3374,7 @@ s.waitForBoot({
34133374 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
34143375
34153376 if(button.value == 1, {
3377+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
34163378 ~cpumonitorroutine.reset;
34173379 ~cpumonitorroutine.play;
34183380 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
--- a/timewavesynth3osx.scd
+++ b/timewavesynth3osx.scd
@@ -12,7 +12,7 @@
1212
1313 //This synth is compatible with the Korg NanoKontrol 2
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -275,71 +277,15 @@ s.waitForBoot({
275277 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
276278 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
277279
278- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8];});
279- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8];});
280- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8];});
281- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8];});
282- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8];});
283- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8];});
284- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8];});
285- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8];});
286- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8];});
287- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8];});
288- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8];});
289- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8];});
290- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8];});
291- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8];});
292- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8];});
293- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8];});
294- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8];});
295- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8];});
296- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8];});
297- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8];});
298- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8];});
299- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8];});
300- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8];});
301- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8];});
302- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8];});
303- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8];});
304- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8];});
305- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8];});
306- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8];});
307- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8];});
308- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8];});
309- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8];});
310- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8];});
311- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8];});
312- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8];});
313- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8];});
314- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8];});
315- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8];});
316- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8];});
317- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8];});
318- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8];});
319- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8];});
320- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8];});
321- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8];});
322- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8];});
323- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8];});
324- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8];});
325- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8];});
326- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8];});
327- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8];});
328- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8];});
329- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8];});
330- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8];});
331- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8];});
332- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8];});
333- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8];});
334- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8];});
335- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8];});
336- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8];});
337- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8];});
338- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8];});
339- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8];});
340- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8];});
341- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8];});
342-
280+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
281+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
282+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
283+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
284+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
285+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
286+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
287+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
288+ */
343289
344290 //set n1-n9 ratio values
345291
@@ -486,15 +432,15 @@ s.waitForBoot({
486432
487433 ~sendreply_x=~sendreply_x+1;
488434
489- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
435+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
490436 a, b, c, d, e, f, pan=0, fc = 1;
491437 var s1, out, env1, s2, dseq;
492- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
438+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
493439 dseq = Dseq(
494440 case
495441 {~kws_setting == 1}{~kws_setting_1_a.value;}
496442 {~kws_setting == 2}{~kws_setting_2_a.value;}
497- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
443+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
498444 case
499445 {~kws_setting == 1}{~kws_setting_1_b.value;}
500446 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -502,7 +448,11 @@ s.waitForBoot({
502448 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
503449 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
504450 OffsetOut.ar(0, s1.dup*vol);
505- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
451+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
452+ case
453+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
454+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
455+ );
506456 }, [\ir]).add;
507457
508458 });
@@ -510,18 +460,55 @@ s.waitForBoot({
510460 };
511461
512462
513- //sendyreply functions
463+ //sendreply functions
464+
465+ ~sendreplyfunc_choose = 0;
466+
467+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
468+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
514469
515- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
516- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
470+ if(~sendreply_gm_fth_y_1 == nil, {3.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
471+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
472+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
473+
474+ }, {
475+ if(x > 1539.4729849465, {
476+ case
477+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
478+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
479+ }, {
480+ case
481+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
482+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
483+ });
484+ });
485+ };
486+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
487+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
488+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
489+ });
490+ };
491+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
517492
518493 case
519- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
520- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
494+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
495+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
496+
497+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
498+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
499+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
521500
522- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
523- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
524- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
501+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
502+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
503+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
504+
505+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
506+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
507+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
508+
509+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
510+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
511+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
525512
526513
527514 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -606,23 +593,23 @@ s.waitForBoot({
606593 });
607594
608595 (
609- 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3;
596+ 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3;
610597 #vol1,vol2,vol3 = [~vol1,~vol2,~vol3];
611598 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
612599 case
613- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3 = \gsineicfld6!3;}
614- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3 =
615- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3];};
600+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3 = \gsineicfld1!3;}
601+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3 =
602+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3];};
616603 s.makeBundle(0, {
617- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
604+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
618605 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
619- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
620- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
606+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
607+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
621608 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
622- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
623- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
609+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
610+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
624611 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
625- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
612+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
626613 });
627614 });
628615 );
@@ -650,23 +637,23 @@ s.waitForBoot({
650637 }););
651638
652639 (
653- 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3;
640+ 1.do({var vol1,vol2,vol3,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3;
654641 #vol1,vol2,vol3 = [~vol1,~vol2,~vol3];
655642 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
656643 case
657- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3 = \gsineicfld6!3;}
658- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3 =
659- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3];};
644+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3 = \gsineicfld1!3;}
645+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3 =
646+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3];};
660647 s.makeBundle(0, {
661- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
648+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
662649 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
663- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
664- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
650+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
651+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
665652 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
666- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
667- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
653+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
654+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
668655 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
669- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
656+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
670657 });
671658 });
672659 );
@@ -1287,39 +1274,7 @@ s.waitForBoot({
12871274
12881275 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
12891276
1290- x=0;
1291- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
1292-
1293-
1294- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
1295-
1296- case
1297- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
1298- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
1299- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
1300- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
1301- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
1302- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
1303- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
1304- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
1305- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
1306- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
1307- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
1308- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
1309- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
1310- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
1311- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
1312- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
1313- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
1314- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
1315- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
1316- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
1317- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
1318- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
1319- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
1320- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
1321- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
1322- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
1277+ //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
13231278
13241279 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
13251280 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
@@ -1352,7 +1307,7 @@ s.waitForBoot({
13521307
13531308 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
13541309
1355- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
1310+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
13561311
13571312 if(~st != nil, {~st.close});
13581313 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1361,11 +1316,12 @@ s.waitForBoot({
13611316 AppClock.sched(~gm,{~st.close;});
13621317 });
13631318
1319+ ~menu2.value = ~gsinenum-1;
1320+
13641321
1365- //pop-menu for timewave base (lowest) frequency
1322+ //pop-menu for timewave base(lowest) frequency
13661323
1367- ~bfreqstart = ~basefreq;
1368- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
1324+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
13691325
13701326 if(~st != nil, {~st.close});
13711327 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1374,6 +1330,8 @@ s.waitForBoot({
13741330 AppClock.sched(~gm,{~st.close;});
13751331 });
13761332
1333+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
1334+
13771335
13781336 //synthdef pop-up menu
13791337
@@ -1442,12 +1400,14 @@ s.waitForBoot({
14421400
14431401 //switch to sendreply functions
14441402
1445- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
1403+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
14461404
14471405 case
14481406 {button.value == 0;}{~sendreplymenu_value = 0;}
14491407 {button.value == 1;}{~sendreplymenu_value = 1;}
1450- {button.value == 2;}{~sendreplymenu_value = 2;};
1408+ {button.value == 2;}{~sendreplymenu_value = 2;}
1409+ {button.value == 3;}{~sendreplymenu_value = 3;}
1410+ {button.value == 4;}{~sendreplymenu_value = 4;};
14511411
14521412 if(~st != nil, {~st.close});
14531413 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1461,14 +1421,16 @@ s.waitForBoot({
14611421 case
14621422 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
14631423 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
1464- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
1424+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
1425+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
1426+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
14651427
14661428
14671429 //set button for all settings
14681430
14691431 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
14701432
1471- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
1433+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
14721434
14731435 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
14741436
@@ -1490,38 +1452,39 @@ s.waitForBoot({
14901452
14911453 case
14921454 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
1493- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
1494- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
1455+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
1456+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
1457+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
1458+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
14951459
14961460
14971461 //evaluate synthdefs(gsine)
14981462
14991463 case
1500- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
1501- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
1502- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
1503- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
1504- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
1505- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
1506- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
1507- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
1508- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
1509- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
1510- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
1511- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
1512- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
1513- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
1514- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
1515- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
1516- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
1517- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
1518- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
1519- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
1520- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
1521- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
1522- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
1523- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
1524- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
1464+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
1465+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
1466+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
1467+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
1468+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
1469+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
1470+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
1471+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
1472+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
1473+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
1474+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
1475+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
1476+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
1477+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
1478+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
1479+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
1480+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
1481+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
1482+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
1483+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
1484+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
1485+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
1486+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
1487+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
15251488
15261489 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
15271490 ~st_load.stringColor = Color.white;
@@ -2277,13 +2240,13 @@ s.waitForBoot({
22772240 });
22782241
22792242
2280- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
2243+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
22812244
2282- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
2245+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
22832246
22842247 });
22852248
2286- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
2249+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
22872250 });
22882251
22892252
@@ -3390,7 +3353,7 @@ s.waitForBoot({
33903353 ~cpumonitorfunc = {
33913354 ~cpumonitor.close;
33923355 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
3393- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
3356+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
33943357 ~cpumonitor.string =
33953358 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
33963359 "ugens: "+s.numUGens.asString++"\n" ++
@@ -3413,6 +3376,7 @@ s.waitForBoot({
34133376 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
34143377
34153378 if(button.value == 1, {
3379+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
34163380 ~cpumonitorroutine.reset;
34173381 ~cpumonitorroutine.play;
34183382 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
--- a/timewavesynth8.scd
+++ b/timewavesynth8.scd
@@ -12,7 +12,7 @@
1212
1313 //This synth is compatible with the Korg NanoKontrol 2
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -280,71 +282,15 @@ s.waitForBoot({
280282 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
281283 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
282284
283- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8];});
284- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8];});
285- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8];});
286- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8];});
287- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8];});
288- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8];});
289- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8];});
290- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8];});
291- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8];});
292- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8];});
293- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8];});
294- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8];});
295- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8];});
296- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8];});
297- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8];});
298- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8];});
299- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8];});
300- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8];});
301- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8];});
302- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8];});
303- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8];});
304- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8];});
305- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8];});
306- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8];});
307- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8];});
308- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8];});
309- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8];});
310- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8];});
311- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8];});
312- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8];});
313- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8];});
314- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8];});
315- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8];});
316- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8];});
317- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8];});
318- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8];});
319- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8];});
320- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8];});
321- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8];});
322- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8];});
323- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8];});
324- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8];});
325- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8];});
326- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8];});
327- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8];});
328- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8];});
329- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8];});
330- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8];});
331- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8];});
332- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8];});
333- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8];});
334- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8];});
335- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8];});
336- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8];});
337- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8];});
338- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8];});
339- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8];});
340- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8];});
341- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8];});
342- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8];});
343- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8];});
344- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8];});
345- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8];});
346- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8];});
347-
285+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
286+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
287+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
288+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
289+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
290+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
291+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
292+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
293+ */
348294
349295 //set n1-n9 ratio values
350296
@@ -483,28 +429,20 @@ s.waitForBoot({
483429
484430 if(~sendreplysynthdef_on == 1, {
485431
486- ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
487- ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
488- ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
489- ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
490- ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
491- ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
492- ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
493- ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
494432
495433 8.do(~sendreply_x = 0; {
496434
497435 ~sendreply_x=~sendreply_x+1;
498436
499- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
437+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
500438 a, b, c, d, e, f, pan=0, fc = 1;
501439 var s1, out, env1, s2, dseq;
502- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
440+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
503441 dseq = Dseq(
504442 case
505443 {~kws_setting == 1}{~kws_setting_1_a.value;}
506444 {~kws_setting == 2}{~kws_setting_2_a.value;}
507- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
445+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
508446 case
509447 {~kws_setting == 1}{~kws_setting_1_b.value;}
510448 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -512,7 +450,11 @@ s.waitForBoot({
512450 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
513451 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
514452 OffsetOut.ar(0, s1.dup*vol);
515- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
453+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
454+ case
455+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
456+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
457+ );
516458 }, [\ir]).add;
517459
518460 });
@@ -520,23 +462,75 @@ s.waitForBoot({
520462 };
521463
522464
523- //sendyreply functions
465+ //sendreply functions
524466
525- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
526- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
467+ ~sendreplyfunc_choose = 0;
527468
528- case
529- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
530- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
469+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
470+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
531471
532- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
533- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
534- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
535- OSCFunc({~f4 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
536- OSCFunc({~f5 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
537- OSCFunc({~f6 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
538- OSCFunc({~f7 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
539- OSCFunc({~f8 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
472+ if(~sendreply_gm_fth_y_1 == nil, {8.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
473+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
474+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
475+
476+ }, {
477+ if(x > 1539.4729849465, {
478+ case
479+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
480+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
481+ }, {
482+ case
483+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
484+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
485+ });
486+ });
487+ };
488+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
489+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
490+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
491+ });
492+ };
493+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
494+
495+ case
496+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
497+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
498+
499+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
500+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
501+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
502+ ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
503+ ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
504+ ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
505+ ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
506+ ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
507+
508+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
509+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
510+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
511+ ~synthflow_gmf_sendreply_answer_f4 = '/synthflow_gmf_sendreply_answer_f4';
512+ ~synthflow_gmf_sendreply_answer_f5 = '/synthflow_gmf_sendreply_answer_f5';
513+ ~synthflow_gmf_sendreply_answer_f6 = '/synthflow_gmf_sendreply_answer_f6';
514+ ~synthflow_gmf_sendreply_answer_f7 = '/synthflow_gmf_sendreply_answer_f7';
515+ ~synthflow_gmf_sendreply_answer_f8 = '/synthflow_gmf_sendreply_answer_f8';
516+
517+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
518+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
519+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
520+ OSCFunc({~f4 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
521+ OSCFunc({~f5 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
522+ OSCFunc({~f6 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
523+ OSCFunc({~f7 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
524+ OSCFunc({~f8 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
525+
526+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
527+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
528+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
529+ OSCFunc({x = ~f4; y = ~sendreply_gm_fth_y_4; ~sendreply_gm_fth_func.value; ~f4 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_4 = y;}, '/synthflow_gmf_sendreply_answer_f4');
530+ OSCFunc({x = ~f5; y = ~sendreply_gm_fth_y_5; ~sendreply_gm_fth_func.value; ~f5 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_5 = y;}, '/synthflow_gmf_sendreply_answer_f5');
531+ OSCFunc({x = ~f6; y = ~sendreply_gm_fth_y_6; ~sendreply_gm_fth_func.value; ~f6 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_6 = y;}, '/synthflow_gmf_sendreply_answer_f6');
532+ OSCFunc({x = ~f7; y = ~sendreply_gm_fth_y_7; ~sendreply_gm_fth_func.value; ~f7 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_7 = y;}, '/synthflow_gmf_sendreply_answer_f7');
533+ OSCFunc({x = ~f8; y = ~sendreply_gm_fth_y_8; ~sendreply_gm_fth_func.value; ~f8 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_8 = y;}, '/synthflow_gmf_sendreply_answer_f8');
540534
541535
542536 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -647,38 +641,38 @@ s.waitForBoot({
647641 });
648642
649643 (
650- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8;
644+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8;
651645 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
652646 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
653647 case
654- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 = \gsineicfld6!8;}
655- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 =
656- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8];};
648+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 = \gsineicfld1!8;}
649+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 =
650+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8];};
657651 s.makeBundle(0, {
658- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
652+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
659653 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
660- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
661- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
654+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
655+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
662656 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
663- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
664- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
657+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
658+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
665659 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
666- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
667- ~l4a = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
660+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
661+ ~l4a = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
668662 ~l4c = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
669- ~l4e = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
670- ~l5a = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
663+ ~l4e = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
664+ ~l5a = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
671665 ~l5c = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
672- ~l5e = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
673- ~l6a = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
666+ ~l5e = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
667+ ~l6a = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
674668 ~l6c = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
675- ~l6e = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
676- ~l7a = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
669+ ~l6e = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
670+ ~l7a = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
677671 ~l7c = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
678- ~l7e = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
679- ~l8a = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
672+ ~l7e = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
673+ ~l8a = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
680674 ~l8c = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
681- ~l8e = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
675+ ~l8e = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
682676 });
683677 });
684678 );
@@ -721,38 +715,38 @@ s.waitForBoot({
721715 }););
722716
723717 (
724- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8;
718+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8;
725719 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
726720 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
727721 case
728- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 = \gsineicfld6!8;}
729- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 =
730- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8];};
722+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 = \gsineicfld1!8;}
723+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 =
724+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8];};
731725 s.makeBundle(0, {
732- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
726+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
733727 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
734- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
735- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
728+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
729+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
736730 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
737- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
738- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
731+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
732+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
739733 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
740- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
741- ~l4a1 = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
734+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
735+ ~l4a1 = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
742736 ~l4c1 = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d1 = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
743- ~l4e1 = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
744- ~l5a1 = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
737+ ~l4e1 = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
738+ ~l5a1 = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
745739 ~l5c1 = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d1 = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
746- ~l5e1 = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
747- ~l6a1 = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
740+ ~l5e1 = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
741+ ~l6a1 = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
748742 ~l6c1 = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d1 = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
749- ~l6e1 = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
750- ~l7a1 = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
743+ ~l6e1 = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
744+ ~l7a1 = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
751745 ~l7c1 = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d1 = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
752- ~l7e1 = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
753- ~l8a1 = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
746+ ~l7e1 = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
747+ ~l8a1 = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
754748 ~l8c1 = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d1 = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
755- ~l8e1 = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
749+ ~l8e1 = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
756750 });
757751 });
758752 );
@@ -1815,40 +1809,6 @@ s.waitForBoot({
18151809
18161810 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
18171811
1818- x=0;
1819- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
1820-
1821-
1822- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
1823-
1824- case
1825- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
1826- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
1827- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
1828- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
1829- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
1830- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
1831- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
1832- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
1833- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
1834- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
1835- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
1836- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
1837- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
1838- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
1839- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
1840- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
1841- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
1842- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
1843- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
1844- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
1845- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
1846- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
1847- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
1848- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
1849- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
1850- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
1851-
18521812 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
18531813 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
18541814
@@ -1880,7 +1840,7 @@ s.waitForBoot({
18801840
18811841 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
18821842
1883- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
1843+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
18841844
18851845 if(~st != nil, {~st.close});
18861846 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1889,11 +1849,12 @@ s.waitForBoot({
18891849 AppClock.sched(~gm,{~st.close;});
18901850 });
18911851
1852+ ~menu2.value = ~gsinenum-1;
18921853
1893- //pop-menu for timewave base (lowest) frequency
18941854
1895- ~bfreqstart = ~basefreq;
1896- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
1855+ //pop-menu for timewave base(lowest) frequency
1856+
1857+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
18971858
18981859 if(~st != nil, {~st.close});
18991860 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1902,6 +1863,8 @@ s.waitForBoot({
19021863 AppClock.sched(~gm,{~st.close;});
19031864 });
19041865
1866+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
1867+
19051868
19061869 //synthdef pop-up menu
19071870
@@ -1970,12 +1933,14 @@ s.waitForBoot({
19701933
19711934 //switch to sendreply functions
19721935
1973- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
1936+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
19741937
19751938 case
19761939 {button.value == 0;}{~sendreplymenu_value = 0;}
19771940 {button.value == 1;}{~sendreplymenu_value = 1;}
1978- {button.value == 2;}{~sendreplymenu_value = 2;};
1941+ {button.value == 2;}{~sendreplymenu_value = 2;}
1942+ {button.value == 3;}{~sendreplymenu_value = 3;}
1943+ {button.value == 4;}{~sendreplymenu_value = 4;};
19791944
19801945 if(~st != nil, {~st.close});
19811946 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1989,14 +1954,16 @@ s.waitForBoot({
19891954 case
19901955 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
19911956 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
1992- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
1957+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
1958+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
1959+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
19931960
19941961
19951962 //set button for all settings
19961963
19971964 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
19981965
1999- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
1966+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
20001967
20011968 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
20021969
@@ -2018,38 +1985,39 @@ s.waitForBoot({
20181985
20191986 case
20201987 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
2021- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
2022- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
1988+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
1989+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
1990+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
1991+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
20231992
20241993
20251994 //evaluate synthdefs(gsine)
20261995
20271996 case
2028- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
2029- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
2030- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
2031- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
2032- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
2033- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
2034- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
2035- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
2036- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
2037- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
2038- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
2039- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
2040- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
2041- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
2042- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
2043- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
2044- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
2045- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
2046- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
2047- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
2048- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
2049- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
2050- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
2051- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
2052- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
1997+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
1998+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
1999+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
2000+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
2001+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
2002+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
2003+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
2004+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
2005+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
2006+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
2007+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
2008+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
2009+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
2010+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
2011+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
2012+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
2013+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
2014+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
2015+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
2016+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
2017+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
2018+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
2019+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
2020+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
20532021
20542022 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
20552023 ~st_load.stringColor = Color.white;
@@ -2864,13 +2832,13 @@ s.waitForBoot({
28642832 });
28652833
28662834
2867- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
2835+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
28682836
2869- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
2837+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
28702838
28712839 });
28722840
2873- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
2841+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
28742842 });
28752843
28762844
@@ -4845,7 +4813,7 @@ s.waitForBoot({
48454813 ~cpumonitorfunc = {
48464814 ~cpumonitor.close;
48474815 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
4848- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
4816+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
48494817 ~cpumonitor.string =
48504818 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
48514819 "ugens: "+s.numUGens.asString++"\n" ++
@@ -4868,6 +4836,7 @@ s.waitForBoot({
48684836 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
48694837
48704838 if(button.value == 1, {
4839+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
48714840 ~cpumonitorroutine.reset;
48724841 ~cpumonitorroutine.play;
48734842 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
--- a/timewavesynth8osx.scd
+++ b/timewavesynth8osx.scd
@@ -12,7 +12,7 @@
1212
1313 //This synth is compatible with the Korg NanoKontrol 2
1414
15-s.options.memSize = 2097152/4;
15+s.options.memSize = 2097152/2;
1616 MIDIIn.connectAll;
1717
1818 (
@@ -43,9 +43,9 @@ s.waitForBoot({
4343
4444 //timewave starting base (lowest) frequency
4545
46- x = 432; y = 63.027950580135; z = 63.027950580135; ~basefreqmap = Array.fill(8, {z=z/1.0835058821738}).reverse++[63.027950580135]++Array.fill(23, {y=y*1.0835058821738})++[432]++Array.fill(25, {x=x*1.0835058821738}); //create basefreqmap array
46+ x = 432; y = 432; ~basefreqmap = Array.fill(32, {x=x/1.0835058821738}).reverse++[432]++Array.fill(25, {y=y*1.0835058821738}); //create basefreqmap array
4747
48- ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580135). replace "~basefreqmap.at(#)" for custom value.
48+ ~base_frequency = ~basefreqmap.at(8); //default 8 (63.027950580203). replace "~basefreqmap.at(#)" for custom value.
4949
5050
5151 //starting synthdef setting
@@ -70,6 +70,8 @@ s.waitForBoot({
7070
7171 if(~sendreplysynthdef_on == nil, {~sendreplysynthdef_on = 0; //switch for mid-timewave sequence events. 0 is off, 1 is on. default is 0
7272 });
73+ if(~sendreplyfunc_choose == nil, {~sendreplyfunc_choose = 0; //switch for specific mid-timewave sequence events function. default is 0
74+ });
7375 if(~sendreplyfuncswitch == nil, {~sendreplyfuncswitch = 1; //1 is random western scale note change per timewave half-cycle, 2 is eastern scale. default is 1
7476 });
7577
@@ -280,71 +282,15 @@ s.waitForBoot({
280282 12.do(x = 0; {("u"++(x=x+1)++"g").asSymbol.envirPut([~fp1g,~fp2g,~fp3g,~fp4g,~fp5g,~fp6g,~fp7g,~fp8g,~fp9g,~fp10g,~fp11g,~fp12g].at(x-1))});
281283 12.do(x = 0; {("u"++(x=x+1)++"h").asSymbol.envirPut([~fp1h,~fp2h,~fp3h,~fp4h,~fp5h,~fp6h,~fp7h,~fp8h,~fp9h,~fp10h,~fp11h,~fp12h].at(x-1))});
282284
283- if([~sg1a1,~sg1a2,~sg1a3,~sg1a4,~sg1a5,~sg1a6,~sg1a7,~sg1a8,~sg1a9,~sg1a10,~sg1a11,~sg1a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1a1=~f1,~sg1a2=~f2,~sg1a3=~f3,~sg1a4=~f4,~sg1a5=~f5,~sg1a6=~f6,~sg1a7=~f7,~sg1a8=~f8];});
284- if([~sg1b1,~sg1b2,~sg1b3,~sg1b4,~sg1b5,~sg1b6,~sg1b7,~sg1b8,~sg1b9,~sg1b10,~sg1b11,~sg1b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1b1=~f1,~sg1b2=~f2,~sg1b3=~f3,~sg1b4=~f4,~sg1b5=~f5,~sg1b6=~f6,~sg1b7=~f7,~sg1b8=~f8];});
285- if([~sg1c1,~sg1c2,~sg1c3,~sg1c4,~sg1c5,~sg1c6,~sg1c7,~sg1c8,~sg1c9,~sg1c10,~sg1c11,~sg1c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1c1=~f1,~sg1c2=~f2,~sg1c3=~f3,~sg1c4=~f4,~sg1c5=~f5,~sg1c6=~f6,~sg1c7=~f7,~sg1c8=~f8];});
286- if([~sg1d1,~sg1d2,~sg1d3,~sg1d4,~sg1d5,~sg1d6,~sg1d7,~sg1d8,~sg1d9,~sg1d10,~sg1d11,~sg1d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1d1=~f1,~sg1d2=~f2,~sg1d3=~f3,~sg1d4=~f4,~sg1d5=~f5,~sg1d6=~f6,~sg1d7=~f7,~sg1d8=~f8];});
287- if([~sg1e1,~sg1e2,~sg1e3,~sg1e4,~sg1e5,~sg1e6,~sg1e7,~sg1e8,~sg1e9,~sg1e10,~sg1e11,~sg1e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1e1=~f1,~sg1e2=~f2,~sg1e3=~f3,~sg1e4=~f4,~sg1e5=~f5,~sg1e6=~f6,~sg1e7=~f7,~sg1e8=~f8];});
288- if([~sg1f1,~sg1f2,~sg1f3,~sg1f4,~sg1f5,~sg1f6,~sg1f7,~sg1f8,~sg1f9,~sg1f10,~sg1f11,~sg1f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1f1=~f1,~sg1f2=~f2,~sg1f3=~f3,~sg1f4=~f4,~sg1f5=~f5,~sg1f6=~f6,~sg1f7=~f7,~sg1f8=~f8];});
289- if([~sg1g1,~sg1g2,~sg1g3,~sg1g4,~sg1g5,~sg1g6,~sg1g7,~sg1g8,~sg1g9,~sg1g10,~sg1g11,~sg1g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1g1=~f1,~sg1g2=~f2,~sg1g3=~f3,~sg1g4=~f4,~sg1g5=~f5,~sg1g6=~f6,~sg1g7=~f7,~sg1g8=~f8];});
290- if([~sg1h1,~sg1h2,~sg1h3,~sg1h4,~sg1h5,~sg1h6,~sg1h7,~sg1h8,~sg1h9,~sg1h10,~sg1h11,~sg1h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg1h1=~f1,~sg1h2=~f2,~sg1h3=~f3,~sg1h4=~f4,~sg1h5=~f5,~sg1h6=~f6,~sg1h7=~f7,~sg1h8=~f8];});
291- if([~sg2a1,~sg2a2,~sg2a3,~sg2a4,~sg2a5,~sg2a6,~sg2a7,~sg2a8,~sg2a9,~sg2a10,~sg2a11,~sg2a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2a1=~f1,~sg2a2=~f2,~sg2a3=~f3,~sg2a4=~f4,~sg2a5=~f5,~sg2a6=~f6,~sg2a7=~f7,~sg2a8=~f8];});
292- if([~sg2b1,~sg2b2,~sg2b3,~sg2b4,~sg2b5,~sg2b6,~sg2b7,~sg2b8,~sg2b9,~sg2b10,~sg2b11,~sg2b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2b1=~f1,~sg2b2=~f2,~sg2b3=~f3,~sg2b4=~f4,~sg2b5=~f5,~sg2b6=~f6,~sg2b7=~f7,~sg2b8=~f8];});
293- if([~sg2c1,~sg2c2,~sg2c3,~sg2c4,~sg2c5,~sg2c6,~sg2c7,~sg2c8,~sg2c9,~sg2c10,~sg2c11,~sg2c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2c1=~f1,~sg2c2=~f2,~sg2c3=~f3,~sg2c4=~f4,~sg2c5=~f5,~sg2c6=~f6,~sg2c7=~f7,~sg2c8=~f8];});
294- if([~sg2d1,~sg2d2,~sg2d3,~sg2d4,~sg2d5,~sg2d6,~sg2d7,~sg2d8,~sg2d9,~sg2d10,~sg2d11,~sg2d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2d1=~f1,~sg2d2=~f2,~sg2d3=~f3,~sg2d4=~f4,~sg2d5=~f5,~sg2d6=~f6,~sg2d7=~f7,~sg2d8=~f8];});
295- if([~sg2e1,~sg2e2,~sg2e3,~sg2e4,~sg2e5,~sg2e6,~sg2e7,~sg2e8,~sg2e9,~sg2e10,~sg2e11,~sg2e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2e1=~f1,~sg2e2=~f2,~sg2e3=~f3,~sg2e4=~f4,~sg2e5=~f5,~sg2e6=~f6,~sg2e7=~f7,~sg2e8=~f8];});
296- if([~sg2f1,~sg2f2,~sg2f3,~sg2f4,~sg2f5,~sg2f6,~sg2f7,~sg2f8,~sg2f9,~sg2f10,~sg2f11,~sg2f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2f1=~f1,~sg2f2=~f2,~sg2f3=~f3,~sg2f4=~f4,~sg2f5=~f5,~sg2f6=~f6,~sg2f7=~f7,~sg2f8=~f8];});
297- if([~sg2g1,~sg2g2,~sg2g3,~sg2g4,~sg2g5,~sg2g6,~sg2g7,~sg2g8,~sg2g9,~sg2g10,~sg2g11,~sg2g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2g1=~f1,~sg2g2=~f2,~sg2g3=~f3,~sg2g4=~f4,~sg2g5=~f5,~sg2g6=~f6,~sg2g7=~f7,~sg2g8=~f8];});
298- if([~sg2h1,~sg2h2,~sg2h3,~sg2h4,~sg2h5,~sg2h6,~sg2h7,~sg2h8,~sg2h9,~sg2h10,~sg2h11,~sg2h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg2h1=~f1,~sg2h2=~f2,~sg2h3=~f3,~sg2h4=~f4,~sg2h5=~f5,~sg2h6=~f6,~sg2h7=~f7,~sg2h8=~f8];});
299- if([~sg3a1,~sg3a2,~sg3a3,~sg3a4,~sg3a5,~sg3a6,~sg3a7,~sg3a8,~sg3a9,~sg3a10,~sg3a11,~sg3a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3a1=~f1,~sg3a2=~f2,~sg3a3=~f3,~sg3a4=~f4,~sg3a5=~f5,~sg3a6=~f6,~sg3a7=~f7,~sg3a8=~f8];});
300- if([~sg3b1,~sg3b2,~sg3b3,~sg3b4,~sg3b5,~sg3b6,~sg3b7,~sg3b8,~sg3b9,~sg3b10,~sg3b11,~sg3b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3b1=~f1,~sg3b2=~f2,~sg3b3=~f3,~sg3b4=~f4,~sg3b5=~f5,~sg3b6=~f6,~sg3b7=~f7,~sg3b8=~f8];});
301- if([~sg3c1,~sg3c2,~sg3c3,~sg3c4,~sg3c5,~sg3c6,~sg3c7,~sg3c8,~sg3c9,~sg3c10,~sg3c11,~sg3c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3c1=~f1,~sg3c2=~f2,~sg3c3=~f3,~sg3c4=~f4,~sg3c5=~f5,~sg3c6=~f6,~sg3c7=~f7,~sg3c8=~f8];});
302- if([~sg3d1,~sg3d2,~sg3d3,~sg3d4,~sg3d5,~sg3d6,~sg3d7,~sg3d8,~sg3d9,~sg3d10,~sg3d11,~sg3d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3d1=~f1,~sg3d2=~f2,~sg3d3=~f3,~sg3d4=~f4,~sg3d5=~f5,~sg3d6=~f6,~sg3d7=~f7,~sg3d8=~f8];});
303- if([~sg3e1,~sg3e2,~sg3e3,~sg3e4,~sg3e5,~sg3e6,~sg3e7,~sg3e8,~sg3e9,~sg3e10,~sg3e11,~sg3e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3e1=~f1,~sg3e2=~f2,~sg3e3=~f3,~sg3e4=~f4,~sg3e5=~f5,~sg3e6=~f6,~sg3e7=~f7,~sg3e8=~f8];});
304- if([~sg3f1,~sg3f2,~sg3f3,~sg3f4,~sg3f5,~sg3f6,~sg3f7,~sg3f8,~sg3f9,~sg3f10,~sg3f11,~sg3f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3f1=~f1,~sg3f2=~f2,~sg3f3=~f3,~sg3f4=~f4,~sg3f5=~f5,~sg3f6=~f6,~sg3f7=~f7,~sg3f8=~f8];});
305- if([~sg3g1,~sg3g2,~sg3g3,~sg3g4,~sg3g5,~sg3g6,~sg3g7,~sg3g8,~sg3g9,~sg3g10,~sg3g11,~sg3g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3g1=~f1,~sg3g2=~f2,~sg3g3=~f3,~sg3g4=~f4,~sg3g5=~f5,~sg3g6=~f6,~sg3g7=~f7,~sg3g8=~f8];});
306- if([~sg3h1,~sg3h2,~sg3h3,~sg3h4,~sg3h5,~sg3h6,~sg3h7,~sg3h8,~sg3h9,~sg3h10,~sg3h11,~sg3h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg3h1=~f1,~sg3h2=~f2,~sg3h3=~f3,~sg3h4=~f4,~sg3h5=~f5,~sg3h6=~f6,~sg3h7=~f7,~sg3h8=~f8];});
307- if([~sg4a1,~sg4a2,~sg4a3,~sg4a4,~sg4a5,~sg4a6,~sg4a7,~sg4a8,~sg4a9,~sg4a10,~sg4a11,~sg4a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4a1=~f1,~sg4a2=~f2,~sg4a3=~f3,~sg4a4=~f4,~sg4a5=~f5,~sg4a6=~f6,~sg4a7=~f7,~sg4a8=~f8];});
308- if([~sg4b1,~sg4b2,~sg4b3,~sg4b4,~sg4b5,~sg4b6,~sg4b7,~sg4b8,~sg4b9,~sg4b10,~sg4b11,~sg4b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4b1=~f1,~sg4b2=~f2,~sg4b3=~f3,~sg4b4=~f4,~sg4b5=~f5,~sg4b6=~f6,~sg4b7=~f7,~sg4b8=~f8];});
309- if([~sg4c1,~sg4c2,~sg4c3,~sg4c4,~sg4c5,~sg4c6,~sg4c7,~sg4c8,~sg4c9,~sg4c10,~sg4c11,~sg4c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4c1=~f1,~sg4c2=~f2,~sg4c3=~f3,~sg4c4=~f4,~sg4c5=~f5,~sg4c6=~f6,~sg4c7=~f7,~sg4c8=~f8];});
310- if([~sg4d1,~sg4d2,~sg4d3,~sg4d4,~sg4d5,~sg4d6,~sg4d7,~sg4d8,~sg4d9,~sg4d10,~sg4d11,~sg4d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4d1=~f1,~sg4d2=~f2,~sg4d3=~f3,~sg4d4=~f4,~sg4d5=~f5,~sg4d6=~f6,~sg4d7=~f7,~sg4d8=~f8];});
311- if([~sg4e1,~sg4e2,~sg4e3,~sg4e4,~sg4e5,~sg4e6,~sg4e7,~sg4e8,~sg4e9,~sg4e10,~sg4e11,~sg4e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4e1=~f1,~sg4e2=~f2,~sg4e3=~f3,~sg4e4=~f4,~sg4e5=~f5,~sg4e6=~f6,~sg4e7=~f7,~sg4e8=~f8];});
312- if([~sg4f1,~sg4f2,~sg4f3,~sg4f4,~sg4f5,~sg4f6,~sg4f7,~sg4f8,~sg4f9,~sg4f10,~sg4f11,~sg4f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4f1=~f1,~sg4f2=~f2,~sg4f3=~f3,~sg4f4=~f4,~sg4f5=~f5,~sg4f6=~f6,~sg4f7=~f7,~sg4f8=~f8];});
313- if([~sg4g1,~sg4g2,~sg4g3,~sg4g4,~sg4g5,~sg4g6,~sg4g7,~sg4g8,~sg4g9,~sg4g10,~sg4g11,~sg4g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4g1=~f1,~sg4g2=~f2,~sg4g3=~f3,~sg4g4=~f4,~sg4g5=~f5,~sg4g6=~f6,~sg4g7=~f7,~sg4g8=~f8];});
314- if([~sg4h1,~sg4h2,~sg4h3,~sg4h4,~sg4h5,~sg4h6,~sg4h7,~sg4h8,~sg4h9,~sg4h10,~sg4h11,~sg4h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg4h1=~f1,~sg4h2=~f2,~sg4h3=~f3,~sg4h4=~f4,~sg4h5=~f5,~sg4h6=~f6,~sg4h7=~f7,~sg4h8=~f8];});
315- if([~sg5a1,~sg5a2,~sg5a3,~sg5a4,~sg5a5,~sg5a6,~sg5a7,~sg5a8,~sg5a9,~sg5a10,~sg5a11,~sg5a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5a1=~f1,~sg5a2=~f2,~sg5a3=~f3,~sg5a4=~f4,~sg5a5=~f5,~sg5a6=~f6,~sg5a7=~f7,~sg5a8=~f8];});
316- if([~sg5b1,~sg5b2,~sg5b3,~sg5b4,~sg5b5,~sg5b6,~sg5b7,~sg5b8,~sg5b9,~sg5b10,~sg5b11,~sg5b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5b1=~f1,~sg5b2=~f2,~sg5b3=~f3,~sg5b4=~f4,~sg5b5=~f5,~sg5b6=~f6,~sg5b7=~f7,~sg5b8=~f8];});
317- if([~sg5c1,~sg5c2,~sg5c3,~sg5c4,~sg5c5,~sg5c6,~sg5c7,~sg5c8,~sg5c9,~sg5c10,~sg5c11,~sg5c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5c1=~f1,~sg5c2=~f2,~sg5c3=~f3,~sg5c4=~f4,~sg5c5=~f5,~sg5c6=~f6,~sg5c7=~f7,~sg5c8=~f8];});
318- if([~sg5d1,~sg5d2,~sg5d3,~sg5d4,~sg5d5,~sg5d6,~sg5d7,~sg5d8,~sg5d9,~sg5d10,~sg5d11,~sg5d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5d1=~f1,~sg5d2=~f2,~sg5d3=~f3,~sg5d4=~f4,~sg5d5=~f5,~sg5d6=~f6,~sg5d7=~f7,~sg5d8=~f8];});
319- if([~sg5e1,~sg5e2,~sg5e3,~sg5e4,~sg5e5,~sg5e6,~sg5e7,~sg5e8,~sg5e9,~sg5e10,~sg5e11,~sg5e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5e1=~f1,~sg5e2=~f2,~sg5e3=~f3,~sg5e4=~f4,~sg5e5=~f5,~sg5e6=~f6,~sg5e7=~f7,~sg5e8=~f8];});
320- if([~sg5f1,~sg5f2,~sg5f3,~sg5f4,~sg5f5,~sg5f6,~sg5f7,~sg5f8,~sg5f9,~sg5f10,~sg5f11,~sg5f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5f1=~f1,~sg5f2=~f2,~sg5f3=~f3,~sg5f4=~f4,~sg5f5=~f5,~sg5f6=~f6,~sg5f7=~f7,~sg5f8=~f8];});
321- if([~sg5g1,~sg5g2,~sg5g3,~sg5g4,~sg5g5,~sg5g6,~sg5g7,~sg5g8,~sg5g9,~sg5g10,~sg5g11,~sg5g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5g1=~f1,~sg5g2=~f2,~sg5g3=~f3,~sg5g4=~f4,~sg5g5=~f5,~sg5g6=~f6,~sg5g7=~f7,~sg5g8=~f8];});
322- if([~sg5h1,~sg5h2,~sg5h3,~sg5h4,~sg5h5,~sg5h6,~sg5h7,~sg5h8,~sg5h9,~sg5h10,~sg5h11,~sg5h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg5h1=~f1,~sg5h2=~f2,~sg5h3=~f3,~sg5h4=~f4,~sg5h5=~f5,~sg5h6=~f6,~sg5h7=~f7,~sg5h8=~f8];});
323- if([~sg6a1,~sg6a2,~sg6a3,~sg6a4,~sg6a5,~sg6a6,~sg6a7,~sg6a8,~sg6a9,~sg6a10,~sg6a11,~sg6a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6a1=~f1,~sg6a2=~f2,~sg6a3=~f3,~sg6a4=~f4,~sg6a5=~f5,~sg6a6=~f6,~sg6a7=~f7,~sg6a8=~f8];});
324- if([~sg6b1,~sg6b2,~sg6b3,~sg6b4,~sg6b5,~sg6b6,~sg6b7,~sg6b8,~sg6b9,~sg6b10,~sg6b11,~sg6b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6b1=~f1,~sg6b2=~f2,~sg6b3=~f3,~sg6b4=~f4,~sg6b5=~f5,~sg6b6=~f6,~sg6b7=~f7,~sg6b8=~f8];});
325- if([~sg6c1,~sg6c2,~sg6c3,~sg6c4,~sg6c5,~sg6c6,~sg6c7,~sg6c8,~sg6c9,~sg6c10,~sg6c11,~sg6c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6c1=~f1,~sg6c2=~f2,~sg6c3=~f3,~sg6c4=~f4,~sg6c5=~f5,~sg6c6=~f6,~sg6c7=~f7,~sg6c8=~f8];});
326- if([~sg6d1,~sg6d2,~sg6d3,~sg6d4,~sg6d5,~sg6d6,~sg6d7,~sg6d8,~sg6d9,~sg6d10,~sg6d11,~sg6d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6d1=~f1,~sg6d2=~f2,~sg6d3=~f3,~sg6d4=~f4,~sg6d5=~f5,~sg6d6=~f6,~sg6d7=~f7,~sg6d8=~f8];});
327- if([~sg6e1,~sg6e2,~sg6e3,~sg6e4,~sg6e5,~sg6e6,~sg6e7,~sg6e8,~sg6e9,~sg6e10,~sg6e11,~sg6e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6e1=~f1,~sg6e2=~f2,~sg6e3=~f3,~sg6e4=~f4,~sg6e5=~f5,~sg6e6=~f6,~sg6e7=~f7,~sg6e8=~f8];});
328- if([~sg6f1,~sg6f2,~sg6f3,~sg6f4,~sg6f5,~sg6f6,~sg6f7,~sg6f8,~sg6f9,~sg6f10,~sg6f11,~sg6f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6f1=~f1,~sg6f2=~f2,~sg6f3=~f3,~sg6f4=~f4,~sg6f5=~f5,~sg6f6=~f6,~sg6f7=~f7,~sg6f8=~f8];});
329- if([~sg6g1,~sg6g2,~sg6g3,~sg6g4,~sg6g5,~sg6g6,~sg6g7,~sg6g8,~sg6g9,~sg6g10,~sg6g11,~sg6g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6g1=~f1,~sg6g2=~f2,~sg6g3=~f3,~sg6g4=~f4,~sg6g5=~f5,~sg6g6=~f6,~sg6g7=~f7,~sg6g8=~f8];});
330- if([~sg6h1,~sg6h2,~sg6h3,~sg6h4,~sg6h5,~sg6h6,~sg6h7,~sg6h8,~sg6h9,~sg6h10,~sg6h11,~sg6h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg6h1=~f1,~sg6h2=~f2,~sg6h3=~f3,~sg6h4=~f4,~sg6h5=~f5,~sg6h6=~f6,~sg6h7=~f7,~sg6h8=~f8];});
331- if([~sg7a1,~sg7a2,~sg7a3,~sg7a4,~sg7a5,~sg7a6,~sg7a7,~sg7a8,~sg7a9,~sg7a10,~sg7a11,~sg7a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7a1=~f1,~sg7a2=~f2,~sg7a3=~f3,~sg7a4=~f4,~sg7a5=~f5,~sg7a6=~f6,~sg7a7=~f7,~sg7a8=~f8];});
332- if([~sg7b1,~sg7b2,~sg7b3,~sg7b4,~sg7b5,~sg7b6,~sg7b7,~sg7b8,~sg7b9,~sg7b10,~sg7b11,~sg7b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7b1=~f1,~sg7b2=~f2,~sg7b3=~f3,~sg7b4=~f4,~sg7b5=~f5,~sg7b6=~f6,~sg7b7=~f7,~sg7b8=~f8];});
333- if([~sg7c1,~sg7c2,~sg7c3,~sg7c4,~sg7c5,~sg7c6,~sg7c7,~sg7c8,~sg7c9,~sg7c10,~sg7c11,~sg7c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7c1=~f1,~sg7c2=~f2,~sg7c3=~f3,~sg7c4=~f4,~sg7c5=~f5,~sg7c6=~f6,~sg7c7=~f7,~sg7c8=~f8];});
334- if([~sg7d1,~sg7d2,~sg7d3,~sg7d4,~sg7d5,~sg7d6,~sg7d7,~sg7d8,~sg7d9,~sg7d10,~sg7d11,~sg7d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7d1=~f1,~sg7d2=~f2,~sg7d3=~f3,~sg7d4=~f4,~sg7d5=~f5,~sg7d6=~f6,~sg7d7=~f7,~sg7d8=~f8];});
335- if([~sg7e1,~sg7e2,~sg7e3,~sg7e4,~sg7e5,~sg7e6,~sg7e7,~sg7e8,~sg7e9,~sg7e10,~sg7e11,~sg7e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7e1=~f1,~sg7e2=~f2,~sg7e3=~f3,~sg7e4=~f4,~sg7e5=~f5,~sg7e6=~f6,~sg7e7=~f7,~sg7e8=~f8];});
336- if([~sg7f1,~sg7f2,~sg7f3,~sg7f4,~sg7f5,~sg7f6,~sg7f7,~sg7f8,~sg7f9,~sg7f10,~sg7f11,~sg7f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7f1=~f1,~sg7f2=~f2,~sg7f3=~f3,~sg7f4=~f4,~sg7f5=~f5,~sg7f6=~f6,~sg7f7=~f7,~sg7f8=~f8];});
337- if([~sg7g1,~sg7g2,~sg7g3,~sg7g4,~sg7g5,~sg7g6,~sg7g7,~sg7g8,~sg7g9,~sg7g10,~sg7g11,~sg7g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7g1=~f1,~sg7g2=~f2,~sg7g3=~f3,~sg7g4=~f4,~sg7g5=~f5,~sg7g6=~f6,~sg7g7=~f7,~sg7g8=~f8];});
338- if([~sg7h1,~sg7h2,~sg7h3,~sg7h4,~sg7h5,~sg7h6,~sg7h7,~sg7h8,~sg7h9,~sg7h10,~sg7h11,~sg7h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg7h1=~f1,~sg7h2=~f2,~sg7h3=~f3,~sg7h4=~f4,~sg7h5=~f5,~sg7h6=~f6,~sg7h7=~f7,~sg7h8=~f8];});
339- if([~sg8a1,~sg8a2,~sg8a3,~sg8a4,~sg8a5,~sg8a6,~sg8a7,~sg8a8,~sg8a9,~sg8a10,~sg8a11,~sg8a12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8a1=~f1,~sg8a2=~f2,~sg8a3=~f3,~sg8a4=~f4,~sg8a5=~f5,~sg8a6=~f6,~sg8a7=~f7,~sg8a8=~f8];});
340- if([~sg8b1,~sg8b2,~sg8b3,~sg8b4,~sg8b5,~sg8b6,~sg8b7,~sg8b8,~sg8b9,~sg8b10,~sg8b11,~sg8b12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8b1=~f1,~sg8b2=~f2,~sg8b3=~f3,~sg8b4=~f4,~sg8b5=~f5,~sg8b6=~f6,~sg8b7=~f7,~sg8b8=~f8];});
341- if([~sg8c1,~sg8c2,~sg8c3,~sg8c4,~sg8c5,~sg8c6,~sg8c7,~sg8c8,~sg8c9,~sg8c10,~sg8c11,~sg8c12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8c1=~f1,~sg8c2=~f2,~sg8c3=~f3,~sg8c4=~f4,~sg8c5=~f5,~sg8c6=~f6,~sg8c7=~f7,~sg8c8=~f8];});
342- if([~sg8d1,~sg8d2,~sg8d3,~sg8d4,~sg8d5,~sg8d6,~sg8d7,~sg8d8,~sg8d9,~sg8d10,~sg8d11,~sg8d12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8d1=~f1,~sg8d2=~f2,~sg8d3=~f3,~sg8d4=~f4,~sg8d5=~f5,~sg8d6=~f6,~sg8d7=~f7,~sg8d8=~f8];});
343- if([~sg8e1,~sg8e2,~sg8e3,~sg8e4,~sg8e5,~sg8e6,~sg8e7,~sg8e8,~sg8e9,~sg8e10,~sg8e11,~sg8e12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8e1=~f1,~sg8e2=~f2,~sg8e3=~f3,~sg8e4=~f4,~sg8e5=~f5,~sg8e6=~f6,~sg8e7=~f7,~sg8e8=~f8];});
344- if([~sg8f1,~sg8f2,~sg8f3,~sg8f4,~sg8f5,~sg8f6,~sg8f7,~sg8f8,~sg8f9,~sg8f10,~sg8f11,~sg8f12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8f1=~f1,~sg8f2=~f2,~sg8f3=~f3,~sg8f4=~f4,~sg8f5=~f5,~sg8f6=~f6,~sg8f7=~f7,~sg8f8=~f8];});
345- if([~sg8g1,~sg8g2,~sg8g3,~sg8g4,~sg8g5,~sg8g6,~sg8g7,~sg8g8,~sg8g9,~sg8g10,~sg8g11,~sg8g12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8g1=~f1,~sg8g2=~f2,~sg8g3=~f3,~sg8g4=~f4,~sg8g5=~f5,~sg8g6=~f6,~sg8g7=~f7,~sg8g8=~f8];});
346- if([~sg8h1,~sg8h2,~sg8h3,~sg8h4,~sg8h5,~sg8h6,~sg8h7,~sg8h8,~sg8h9,~sg8h10,~sg8h11,~sg8h12] == [nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil,nil], {[~sg8h1=~f1,~sg8h2=~f2,~sg8h3=~f3,~sg8h4=~f4,~sg8h5=~f5,~sg8h6=~f6,~sg8h7=~f7,~sg8h8=~f8];});
347-
285+ /*if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
286+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"b"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
287+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"c"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
288+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"d"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
289+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"e"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
290+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"f"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
291+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"g"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
292+ if(96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"h"++(z=z+1)).asSymbol.envirGet; if(z>=12, {x= x+1; y = 0; z = 0;});}).collect.every({arg item; item == nil;}), {96.do(x = 1; y = (-1); z = 0; {("sg"++(x)++"a"++(z=z+1)).asSymbol.envirPut([~fp1,~fp2,~fp3,~fp4,~fp5,~fp6,~fp7,~fp8,~fp9,~fp10,~fp11,~fp12].at(y=y+1)); if(z>=12, {x= x+1; y = 0; z = 0;});});});
293+ */
348294
349295 //set n1-n9 ratio values
350296
@@ -483,28 +429,20 @@ s.waitForBoot({
483429
484430 if(~sendreplysynthdef_on == 1, {
485431
486- ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
487- ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
488- ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
489- ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
490- ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
491- ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
492- ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
493- ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
494432
495433 8.do(~sendreply_x = 0; {
496434
497435 ~sendreply_x=~sendreply_x+1;
498436
499- SynthDef(\gsineicfld6_f++(~sendreply_x), {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,
437+ SynthDef(\gsineicfld1_f++(~sendreply_x), {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,
500438 a, b, c, d, e, f, pan=0, fc = 1;
501439 var s1, out, env1, s2, dseq;
502- 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value6)});
440+ 9.do(x = 0; {("n"++(x=x+1)).asSymbol.envirPut(~n_value1)});
503441 dseq = Dseq(
504442 case
505443 {~kws_setting == 1}{~kws_setting_1_a.value;}
506444 {~kws_setting == 2}{~kws_setting_2_a.value;}
507- {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~third_harmonic -1), {
445+ {~kws_setting == 3}{~kws_setting_3_a.value;} ++ Array.fill((~gsinenum*~first_harmonic -1), {
508446 case
509447 {~kws_setting == 1}{~kws_setting_1_b.value;}
510448 {~kws_setting == 2}{~kws_setting_2_b.value;}
@@ -512,7 +450,11 @@ s.waitForBoot({
512450 s1 = GrainSin.ar(1, Impulse.ar(dur), 1/(dur),Demand.ar(Impulse.ar(dur), 0, dseq));
513451 if(~low_pass_filter_on == 1, {s1 = BLowPass.ar(s1, ~low_pass_filter_freq_limit);}, {s1 = s1});
514452 OffsetOut.ar(0, s1.dup*vol);
515- SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~third_harmonic))), ("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet, [ dseq]);
453+ SendReply.ar(PulseDivider.ar(Impulse.ar(dur), (~kws_setting_1_a.value.size*(~gsinenum*~first_harmonic))),
454+ case
455+ {~sendreplyfunc_choose == 0}{("synthflow_gmf_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;}
456+ {~sendreplyfunc_choose == 1}{("synthflow_random_sendreply_answer_f"++(~sendreply_x)).asSymbol.envirGet;};
457+ );
516458 }, [\ir]).add;
517459
518460 });
@@ -520,23 +462,75 @@ s.waitForBoot({
520462 };
521463
522464
523- //sendyreply functions
465+ //sendreply functions
524466
525- ~send_reply_func_western = {~freqmap.at(rrand(60, 91));};
526- ~send_reply_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
467+ ~sendreplyfunc_choose = 0;
527468
528- case
529- {~sendreplyfuncswitch == 1;}{~send_reply_func = ~send_reply_func_western;}
530- {~sendreplyfuncswitch == 2;}{~send_reply_func = ~send_reply_func_eastern;};
469+ ~send_reply_random_func_western = {~freqmap.at(rrand(60, 91));};
470+ ~send_reply_random_func_eastern = {(rrand(~freqmap.at(60), ~freqmap.at(91);))};
531471
532- OSCFunc({~f1 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
533- OSCFunc({~f2 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
534- OSCFunc({~f3 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
535- OSCFunc({~f4 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
536- OSCFunc({~f5 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
537- OSCFunc({~f6 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
538- OSCFunc({~f7 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
539- OSCFunc({~f8 = ~send_reply_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
472+ if(~sendreply_gm_fth_y_1 == nil, {8.do(x = 0; {("sendreply_gm_fth_y_"++(x=x+1)).asSymbol.envirPut((-1);)});});
473+ ~sendreply_gm_fth_func_1 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
474+ x = x*[[a = 1.6842135623729, a = 0.5937489296732].choose, [a = 1.4142135623729, a = 0.70710678118665].choose].at(y=y+1); if(y>=1, {y=(-1)});
475+
476+ }, {
477+ if(x > 1539.4729849465, {
478+ case
479+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x/2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
480+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x/2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
481+ }, {
482+ case
483+ {(a == 1.6842135623729) or: (a == 0.5937489296732)}{x = x*2; x = x*[a = 1.4142135623729, a = 0.70710678118665].choose; y=y+1; if(y>=1, {y=(-1)});}
484+ {(a == 1.4142135623729) or: (a == 0.70710678118665)}{x = x*2; x = x*[a = 1.6842135623729, a = 0.5937489296732].choose; y=y+1; if(y>=1, {y=(-1)});};
485+ });
486+ });
487+ };
488+ ~sendreply_gm_fth_func_2 = {if((x <= 1539.4729849465) and: (x >= 256.86873684059), {
489+ x = x*[a = 1.6842135623729, a = 0.5937489296732].choose;}, {
490+ if(x > 1539.4729849465, {x = x/2; x = x*[1.6842135623729, 0.5937489296732].choose;}, {x = x*2; x = x*[1.6842135623729, 0.5937489296732].choose;});
491+ });
492+ };
493+ if(~sendreply_gm_fth_func == nil, {~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1});
494+
495+ case
496+ {~sendreplyfuncswitch == 1;}{~send_reply_random_func = ~send_reply_random_func_western;}
497+ {~sendreplyfuncswitch == 2;}{~send_reply_random_func = ~send_reply_random_func_eastern;};
498+
499+ ~synthflow_random_sendreply_answer_f1 = '/synthflow_random_sendreply_answer_f1';
500+ ~synthflow_random_sendreply_answer_f2 = '/synthflow_random_sendreply_answer_f2';
501+ ~synthflow_random_sendreply_answer_f3 = '/synthflow_random_sendreply_answer_f3';
502+ ~synthflow_random_sendreply_answer_f4 = '/synthflow_random_sendreply_answer_f4';
503+ ~synthflow_random_sendreply_answer_f5 = '/synthflow_random_sendreply_answer_f5';
504+ ~synthflow_random_sendreply_answer_f6 = '/synthflow_random_sendreply_answer_f6';
505+ ~synthflow_random_sendreply_answer_f7 = '/synthflow_random_sendreply_answer_f7';
506+ ~synthflow_random_sendreply_answer_f8 = '/synthflow_random_sendreply_answer_f8';
507+
508+ ~synthflow_gmf_sendreply_answer_f1 = '/synthflow_gmf_sendreply_answer_f1';
509+ ~synthflow_gmf_sendreply_answer_f2 = '/synthflow_gmf_sendreply_answer_f2';
510+ ~synthflow_gmf_sendreply_answer_f3 = '/synthflow_gmf_sendreply_answer_f3';
511+ ~synthflow_gmf_sendreply_answer_f4 = '/synthflow_gmf_sendreply_answer_f4';
512+ ~synthflow_gmf_sendreply_answer_f5 = '/synthflow_gmf_sendreply_answer_f5';
513+ ~synthflow_gmf_sendreply_answer_f6 = '/synthflow_gmf_sendreply_answer_f6';
514+ ~synthflow_gmf_sendreply_answer_f7 = '/synthflow_gmf_sendreply_answer_f7';
515+ ~synthflow_gmf_sendreply_answer_f8 = '/synthflow_gmf_sendreply_answer_f8';
516+
517+ OSCFunc({~f1 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f1');
518+ OSCFunc({~f2 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f2');
519+ OSCFunc({~f3 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f3');
520+ OSCFunc({~f4 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f4');
521+ OSCFunc({~f5 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f5');
522+ OSCFunc({~f6 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f6');
523+ OSCFunc({~f7 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f7');
524+ OSCFunc({~f8 = ~send_reply_random_func.value; AppClock.sched(0,{~synthflow.value;});}, '/synthflow_random_sendreply_answer_f8');
525+
526+ OSCFunc({x = ~f1; y = ~sendreply_gm_fth_y_1; ~sendreply_gm_fth_func.value; ~f1 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_1 = y;}, '/synthflow_gmf_sendreply_answer_f1');
527+ OSCFunc({x = ~f2; y = ~sendreply_gm_fth_y_2; ~sendreply_gm_fth_func.value; ~f2 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_2 = y;}, '/synthflow_gmf_sendreply_answer_f2');
528+ OSCFunc({x = ~f3; y = ~sendreply_gm_fth_y_3; ~sendreply_gm_fth_func.value; ~f3 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_3 = y;}, '/synthflow_gmf_sendreply_answer_f3');
529+ OSCFunc({x = ~f4; y = ~sendreply_gm_fth_y_4; ~sendreply_gm_fth_func.value; ~f4 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_4 = y;}, '/synthflow_gmf_sendreply_answer_f4');
530+ OSCFunc({x = ~f5; y = ~sendreply_gm_fth_y_5; ~sendreply_gm_fth_func.value; ~f5 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_5 = y;}, '/synthflow_gmf_sendreply_answer_f5');
531+ OSCFunc({x = ~f6; y = ~sendreply_gm_fth_y_6; ~sendreply_gm_fth_func.value; ~f6 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_6 = y;}, '/synthflow_gmf_sendreply_answer_f6');
532+ OSCFunc({x = ~f7; y = ~sendreply_gm_fth_y_7; ~sendreply_gm_fth_func.value; ~f7 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_7 = y;}, '/synthflow_gmf_sendreply_answer_f7');
533+ OSCFunc({x = ~f8; y = ~sendreply_gm_fth_y_8; ~sendreply_gm_fth_func.value; ~f8 = x; AppClock.sched(0,{~synthflow.value;}); ~sendreply_gm_fth_y_8 = y;}, '/synthflow_gmf_sendreply_answer_f8');
540534
541535
542536 //set base (lowest) frequencies, set starting values for synthdef, and load synthdef on server boot
@@ -647,38 +641,38 @@ s.waitForBoot({
647641 });
648642
649643 (
650- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8;
644+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8;
651645 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
652646 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
653647 case
654- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 = \gsineicfld6!8;}
655- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 =
656- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8];};
648+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 = \gsineicfld1!8;}
649+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 =
650+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8];};
657651 s.makeBundle(0, {
658- ~l1a = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
652+ ~l1a = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b = Synth(s2, [\dur, ~f1, \vol, vol1]);
659653 ~l1c = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
660- ~l1e = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
661- ~l2a = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
654+ ~l1e = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
655+ ~l2a = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b = Synth(s2, [\dur, ~f2, \vol, vol2]);
662656 ~l2c = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
663- ~l2e = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
664- ~l3a = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
657+ ~l2e = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
658+ ~l3a = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b = Synth(s2, [\dur, ~f3, \vol, vol3]);
665659 ~l3c = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
666- ~l3e = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
667- ~l4a = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
660+ ~l3e = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
661+ ~l4a = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b = Synth(s2, [\dur, ~f4, \vol, vol4]);
668662 ~l4c = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
669- ~l4e = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
670- ~l5a = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
663+ ~l4e = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
664+ ~l5a = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b = Synth(s2, [\dur, ~f5, \vol, vol5]);
671665 ~l5c = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
672- ~l5e = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
673- ~l6a = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
666+ ~l5e = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
667+ ~l6a = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b = Synth(s2, [\dur, ~f6, \vol, vol6]);
674668 ~l6c = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
675- ~l6e = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
676- ~l7a = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
669+ ~l6e = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
670+ ~l7a = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b = Synth(s2, [\dur, ~f7, \vol, vol7]);
677671 ~l7c = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
678- ~l7e = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
679- ~l8a = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
672+ ~l7e = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
673+ ~l8a = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b = Synth(s2, [\dur, ~f8, \vol, vol8]);
680674 ~l8c = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
681- ~l8e = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
675+ ~l8e = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
682676 });
683677 });
684678 );
@@ -721,38 +715,38 @@ s.waitForBoot({
721715 }););
722716
723717 (
724- 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8;
718+ 1.do({var vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8,s1,s2,s3,s4,s5,s6,s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8;
725719 #vol1,vol2,vol3,vol4,vol5,vol6,vol7,vol8 = [~vol1,~vol2,~vol3,~vol4,~vol5,~vol6,~vol7,~vol8];
726720 #s1,s2,s3,s4,s5,s6 = [\gsineicfld6, \gsineicrld6, \gsineicfld2, \gsineicrld2, \gsineicfld1, \gsineicrld1];
727721 case
728- {~sendreplysynthdef_on == 0}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 = \gsineicfld6!8;}
729- {~sendreplysynthdef_on == 1}{#s1_1,s1_2,s1_3,s1_4,s1_5,s1_6,s1_7,s1_8 =
730- [\gsineicfld6_f1, \gsineicfld6_f2, \gsineicfld6_f3, \gsineicfld6_f4, \gsineicfld6_f5, \gsineicfld6_f6, \gsineicfld6_f7, \gsineicfld6_f8];};
722+ {~sendreplysynthdef_on == 0}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 = \gsineicfld1!8;}
723+ {~sendreplysynthdef_on == 1}{#s5_1,s5_2,s5_3,s5_4,s5_5,s5_6,s5_7,s5_8 =
724+ [\gsineicfld1_f1, \gsineicfld1_f2, \gsineicfld1_f3, \gsineicfld1_f4, \gsineicfld1_f5, \gsineicfld1_f6, \gsineicfld1_f7, \gsineicfld1_f8];};
731725 s.makeBundle(0, {
732- ~l1a1 = Synth(s1_1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
726+ ~l1a1 = Synth(s1, [\dur, ~f1, \vol, vol1]).register; ~l1b1 = Synth(s2, [\dur, ~f1, \vol, vol1]);
733727 ~l1c1 = Synth(s3, [\dur, ~f1/~icd3, \vol, vol1]); ~l1d1 = Synth(s4, [\dur, ~f1/~icd3, \vol, vol1]);
734- ~l1e1 = Synth(s5, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
735- ~l2a1 = Synth(s1_2, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
728+ ~l1e1 = Synth(s5_1, [\dur, ~f1/~icd6, \vol, vol1]); ~l1f1 = Synth(s6, [\dur, ~f1/~icd6, \vol, vol1]);
729+ ~l2a1 = Synth(s1, [\dur, ~f2, \vol, vol2]); ~l2b1 = Synth(s2, [\dur, ~f2, \vol, vol2]);
736730 ~l2c1 = Synth(s3, [\dur, ~f2/~icd3, \vol, vol2]); ~l2d1 = Synth(s4, [\dur, ~f2/~icd3, \vol, vol2]);
737- ~l2e1 = Synth(s5, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
738- ~l3a1 = Synth(s1_3, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
731+ ~l2e1 = Synth(s5_2, [\dur, ~f2/~icd6, \vol, vol2]); ~l2f1 = Synth(s6, [\dur, ~f2/~icd6, \vol, vol2]);
732+ ~l3a1 = Synth(s1, [\dur, ~f3, \vol, vol3]); ~l3b1 = Synth(s2, [\dur, ~f3, \vol, vol3]);
739733 ~l3c1 = Synth(s3, [\dur, ~f3/~icd3, \vol, vol3]); ~l3d1 = Synth(s4, [\dur, ~f3/~icd3, \vol, vol3]);
740- ~l3e1 = Synth(s5, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
741- ~l4a1 = Synth(s1_4, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
734+ ~l3e1 = Synth(s5_3, [\dur, ~f3/~icd6, \vol, vol3]); ~l3f1 = Synth(s6, [\dur, ~f3/~icd6, \vol, vol3]);
735+ ~l4a1 = Synth(s1, [\dur, ~f4, \vol, vol4]); ~l4b1 = Synth(s2, [\dur, ~f4, \vol, vol4]);
742736 ~l4c1 = Synth(s3, [\dur, ~f4/~icd3, \vol, vol4]); ~l4d1 = Synth(s4, [\dur, ~f4/~icd3, \vol, vol4]);
743- ~l4e1 = Synth(s5, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
744- ~l5a1 = Synth(s1_5, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
737+ ~l4e1 = Synth(s5_4, [\dur, ~f4/~icd6, \vol, vol4]); ~l4f1 = Synth(s6, [\dur, ~f4/~icd6, \vol, vol4]);
738+ ~l5a1 = Synth(s1, [\dur, ~f5, \vol, vol5]); ~l5b1 = Synth(s2, [\dur, ~f5, \vol, vol5]);
745739 ~l5c1 = Synth(s3, [\dur, ~f5/~icd3, \vol, vol5]); ~l5d1 = Synth(s4, [\dur, ~f5/~icd3, \vol, vol5]);
746- ~l5e1 = Synth(s5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
747- ~l6a1 = Synth(s1_6, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
740+ ~l5e1 = Synth(s5_5, [\dur, ~f5/~icd6, \vol, vol5]); ~l5f1 = Synth(s6, [\dur, ~f5/~icd6, \vol, vol5]);
741+ ~l6a1 = Synth(s1, [\dur, ~f6, \vol, vol6]); ~l6b1 = Synth(s2, [\dur, ~f6, \vol, vol6]);
748742 ~l6c1 = Synth(s3, [\dur, ~f6/~icd3, \vol, vol6]); ~l6d1 = Synth(s4, [\dur, ~f6/~icd3, \vol, vol6]);
749- ~l6e1 = Synth(s5, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
750- ~l7a1 = Synth(s1_7, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
743+ ~l6e1 = Synth(s5_6, [\dur, ~f6/~icd6, \vol, vol6]); ~l6f1 = Synth(s6, [\dur, ~f6/~icd6, \vol, vol6]);
744+ ~l7a1 = Synth(s1, [\dur, ~f7, \vol, vol7]); ~l7b1 = Synth(s2, [\dur, ~f7, \vol, vol7]);
751745 ~l7c1 = Synth(s3, [\dur, ~f7/~icd3, \vol, vol7]); ~l7d1 = Synth(s4, [\dur, ~f7/~icd3, \vol, vol7]);
752- ~l7e1 = Synth(s5, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
753- ~l8a1 = Synth(s1_8, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
746+ ~l7e1 = Synth(s5_7, [\dur, ~f7/~icd6, \vol, vol7]); ~l7f1 = Synth(s6, [\dur, ~f7/~icd6, \vol, vol7]);
747+ ~l8a1 = Synth(s1, [\dur, ~f8, \vol, vol8]); ~l8b1 = Synth(s2, [\dur, ~f8, \vol, vol8]);
754748 ~l8c1 = Synth(s3, [\dur, ~f8/~icd3, \vol, vol8]); ~l8d1 = Synth(s4, [\dur, ~f8/~icd3, \vol, vol8]);
755- ~l8e1 = Synth(s5, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
749+ ~l8e1 = Synth(s5_8, [\dur, ~f8/~icd6, \vol, vol8]); ~l8f1 = Synth(s6, [\dur, ~f8/~icd6, \vol, vol8]);
756750 });
757751 });
758752 );
@@ -1815,40 +1809,6 @@ s.waitForBoot({
18151809
18161810 //generate values for number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
18171811
1818- x=0;
1819- ~menu2values = Array.fill(24, {(x=x+1).asString++" kws"});
1820-
1821-
1822- //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) upon starting value
1823-
1824- case
1825- {~gsinenum == nil}{~menu2start = ~menu2values.at(~synthdefnum-1)}
1826- {~gsinenum == 1}{~menu2start = ~menu2values.at(0)}
1827- {~gsinenum == 2}{~menu2start = ~menu2values.at(1)}
1828- {~gsinenum == 3}{~menu2start = ~menu2values.at(2)}
1829- {~gsinenum == 4}{~menu2start = ~menu2values.at(3)}
1830- {~gsinenum == 5}{~menu2start = ~menu2values.at(4)}
1831- {~gsinenum == 6}{~menu2start = ~menu2values.at(5)}
1832- {~gsinenum == 7}{~menu2start = ~menu2values.at(6)}
1833- {~gsinenum == 8}{~menu2start = ~menu2values.at(7)}
1834- {~gsinenum == 9}{~menu2start = ~menu2values.at(8)}
1835- {~gsinenum == 10}{~menu2start = ~menu2values.at(9)}
1836- {~gsinenum == 11}{~menu2start = ~menu2values.at(10)}
1837- {~gsinenum == 12}{~menu2start = ~menu2values.at(11)}
1838- {~gsinenum == 13}{~menu2start = ~menu2values.at(12)}
1839- {~gsinenum == 14}{~menu2start = ~menu2values.at(13)}
1840- {~gsinenum == 15}{~menu2start = ~menu2values.at(14)}
1841- {~gsinenum == 16}{~menu2start = ~menu2values.at(15)}
1842- {~gsinenum == 17}{~menu2start = ~menu2values.at(16)}
1843- {~gsinenum == 18}{~menu2start = ~menu2values.at(17)}
1844- {~gsinenum == 19}{~menu2start = ~menu2values.at(18)}
1845- {~gsinenum == 20}{~menu2start = ~menu2values.at(19)}
1846- {~gsinenum == 21}{~menu2start = ~menu2values.at(20)}
1847- {~gsinenum == 22}{~menu2start = ~menu2values.at(21)}
1848- {~gsinenum == 23}{~menu2start = ~menu2values.at(22)}
1849- {~gsinenum == 24}{~menu2start = ~menu2values.at(23)};
1850- if(~menu2synthdefstart.value == nil, {~menu2synthdefstart = ~synthdefnum}, {~menu2synthdefstart = ~gsinenum});
1851-
18521812 if(~low_pass_filter_set_value == nil, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
18531813 if(~low_pass_filter_set_value != ~low_pass_filter_freq_limit, {~low_pass_filter_set_value = ~low_pass_filter_freq_limit});
18541814
@@ -1880,7 +1840,7 @@ s.waitForBoot({
18801840
18811841 //number of KW(King Wen) sequences in a timewave half-cycle (or amplitude x2) pop-up menu
18821842
1883- ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(~mvalue = (-1); [~menu2start.asString]++Array.fill(24, {~menu2values.at(~mvalue = ~mvalue+1);});).background_(Color.black).stringColor_(Color.white).action_({arg button;
1843+ ~menu2 = PopUpMenu(~settingsview,Rect(lefttimebox , top=top, widthbox, heightbox)).items_(x = 0; Array.fill(24, {(x=x+1).asString++" kws"});).background_(Color.black).stringColor_(Color.white).action_({arg button;
18841844
18851845 if(~st != nil, {~st.close});
18861846 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1889,11 +1849,12 @@ s.waitForBoot({
18891849 AppClock.sched(~gm,{~st.close;});
18901850 });
18911851
1852+ ~menu2.value = ~gsinenum-1;
18921853
1893- //pop-menu for timewave base (lowest) frequency
18941854
1895- ~bfreqstart = ~basefreq;
1896- ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); [~basefreq.asString]++Array.fill(140, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
1855+ //pop-menu for timewave base(lowest) frequency
1856+
1857+ ~bfreq = PopUpMenu(~settingsview, Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(~bfreqv = (-1); Array.fill(~basefreqmap.size, {~basefreqmap.at(~bfreqv=~bfreqv+1).asString})).background_(Color.black).stringColor_(Color.white).action_({arg button;
18971858
18981859 if(~st != nil, {~st.close});
18991860 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1902,6 +1863,8 @@ s.waitForBoot({
19021863 AppClock.sched(~gm,{~st.close;});
19031864 });
19041865
1866+ if(~bfreqval != nil, {~bfreq.value = ~bfreqval}, {~bfreq.value = ~basefreqmap.indexOf(~base_frequency);});
1867+
19051868
19061869 //synthdef pop-up menu
19071870
@@ -1970,12 +1933,14 @@ s.waitForBoot({
19701933
19711934 //switch to sendreply functions
19721935
1973- ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
1936+ ~sendreplymenu = PopUpMenu(~settingsview,Rect(lefttimebox , top=top+heightbox+5, widthbox, heightbox)).items_(["off","phi/fth trans","phi trans","western scale","eastern scale"]).background_(Color.black).stringColor_(Color.white).action_({arg button;
19741937
19751938 case
19761939 {button.value == 0;}{~sendreplymenu_value = 0;}
19771940 {button.value == 1;}{~sendreplymenu_value = 1;}
1978- {button.value == 2;}{~sendreplymenu_value = 2;};
1941+ {button.value == 2;}{~sendreplymenu_value = 2;}
1942+ {button.value == 3;}{~sendreplymenu_value = 3;}
1943+ {button.value == 4;}{~sendreplymenu_value = 4;};
19791944
19801945 if(~st != nil, {~st.close});
19811946 ~st = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
@@ -1989,14 +1954,16 @@ s.waitForBoot({
19891954 case
19901955 {~sendreplymenu_value == 0}{~sendreplymenu.value = 0;}
19911956 {~sendreplymenu_value == 1}{~sendreplymenu.value = 1;}
1992- {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;};
1957+ {~sendreplymenu_value == 2}{~sendreplymenu.value = 2;}
1958+ {~sendreplymenu_value == 3}{~sendreplymenu.value = 3;}
1959+ {~sendreplymenu_value == 4}{~sendreplymenu.value = 4;};
19931960
19941961
19951962 //set button for all settings
19961963
19971964 ~set1=Button(~settingsview,Rect(lefttimebox+widthbox-60, top=top+height+20, 60, 60/~gm)).states_([["set",Color.white,Color.black]]).mouseDownAction_({
19981965
1999- if(~bfreq.value > 0, {~basefreq = ~basefreqmap.at(~bfreq.value - 1)}, {~basefreq = ~bfreqstart});
1966+ ~basefreq = ~basefreqmap.at(~bfreq.value;); ~bfreqval = ~bfreq.value;
20001967
20011968 (#a,b,c,d,e,f = [ ~basefreq,~basefreq,~basefreq,~basefreq,~basefreq,~basefreq ]; ~a = a; ~b = b; ~c =c; ~d = d; ~e = e;~f=f;);
20021969
@@ -2018,38 +1985,39 @@ s.waitForBoot({
20181985
20191986 case
20201987 {~sendreplymenu.value == 0}{~sendreplysynthdef_on = 0;}
2021- {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_western; ~sendreplyfuncswitch = 1;}
2022- {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~send_reply_func = ~send_reply_func_eastern; ~sendreplyfuncswitch = 2;};
1988+ {~sendreplymenu.value == 1}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_1}
1989+ {~sendreplymenu.value == 2}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 0; ~sendreply_gm_fth_func = ~sendreply_gm_fth_func_2}
1990+ {~sendreplymenu.value == 3}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_western; ~sendreplyfuncswitch = 1;}
1991+ {~sendreplymenu.value == 4}{~sendreplysynthdef_on = 1; ~sendreplyfunc_choose = 1; ~send_reply_random_func = ~send_reply_random_func_eastern; ~sendreplyfuncswitch = 2;};
20231992
20241993
20251994 //evaluate synthdefs(gsine)
20261995
20271996 case
2028- {~menu2.value == 0}{~gsinenum = ~menu2synthdefstart; ~gsine.value;}
2029- {~menu2.value == 1}{~gsinenum = 1; ~gsine.value;}
2030- {~menu2.value == 2}{~gsinenum = 2; ~gsine.value;}
2031- {~menu2.value == 3}{~gsinenum = 3; ~gsine.value;}
2032- {~menu2.value == 4}{~gsinenum = 4; ~gsine.value;}
2033- {~menu2.value == 5}{~gsinenum = 5; ~gsine.value;}
2034- {~menu2.value == 6}{~gsinenum = 6; ~gsine.value;}
2035- {~menu2.value == 7}{~gsinenum = 7; ~gsine.value;}
2036- {~menu2.value == 8}{~gsinenum = 8; ~gsine.value;}
2037- {~menu2.value == 9}{~gsinenum = 9; ~gsine.value;}
2038- {~menu2.value == 10}{~gsinenum = 10; ~gsine.value;}
2039- {~menu2.value == 11}{~gsinenum = 11; ~gsine.value;}
2040- {~menu2.value == 12}{~gsinenum = 12; ~gsine.value;}
2041- {~menu2.value == 13}{~gsinenum = 13; ~gsine.value;}
2042- {~menu2.value == 14}{~gsinenum = 14; ~gsine.value;}
2043- {~menu2.value == 15}{~gsinenum = 15; ~gsine.value;}
2044- {~menu2.value == 16}{~gsinenum = 16; ~gsine.value;}
2045- {~menu2.value == 17}{~gsinenum = 17; ~gsine.value;}
2046- {~menu2.value == 18}{~gsinenum = 18; ~gsine.value;}
2047- {~menu2.value == 19}{~gsinenum = 19; ~gsine.value;}
2048- {~menu2.value == 20}{~gsinenum = 20; ~gsine.value;}
2049- {~menu2.value == 21}{~gsinenum = 21; ~gsine.value;}
2050- {~menu2.value == 22}{~gsinenum = 22; ~gsine.value;}
2051- {~menu2.value == 23}{~gsinenum = 23; ~gsine.value;}
2052- {~menu2.value == 24}{~gsinenum = 24; ~gsine.value;};
1997+ {~menu2.value == 0}{~gsinenum = 1; ~gsine.value;}
1998+ {~menu2.value == 1}{~gsinenum = 2; ~gsine.value;}
1999+ {~menu2.value == 2}{~gsinenum = 3; ~gsine.value;}
2000+ {~menu2.value == 3}{~gsinenum = 4; ~gsine.value;}
2001+ {~menu2.value == 4}{~gsinenum = 5; ~gsine.value;}
2002+ {~menu2.value == 5}{~gsinenum = 6; ~gsine.value;}
2003+ {~menu2.value == 6}{~gsinenum = 7; ~gsine.value;}
2004+ {~menu2.value == 7}{~gsinenum = 8; ~gsine.value;}
2005+ {~menu2.value == 8}{~gsinenum = 9; ~gsine.value;}
2006+ {~menu2.value == 9}{~gsinenum = 10; ~gsine.value;}
2007+ {~menu2.value == 10}{~gsinenum = 11; ~gsine.value;}
2008+ {~menu2.value == 11}{~gsinenum = 12; ~gsine.value;}
2009+ {~menu2.value == 12}{~gsinenum = 13; ~gsine.value;}
2010+ {~menu2.value == 13}{~gsinenum = 14; ~gsine.value;}
2011+ {~menu2.value == 14}{~gsinenum = 15; ~gsine.value;}
2012+ {~menu2.value == 15}{~gsinenum = 16; ~gsine.value;}
2013+ {~menu2.value == 16}{~gsinenum = 17; ~gsine.value;}
2014+ {~menu2.value == 17}{~gsinenum = 18; ~gsine.value;}
2015+ {~menu2.value == 18}{~gsinenum = 19; ~gsine.value;}
2016+ {~menu2.value == 19}{~gsinenum = 20; ~gsine.value;}
2017+ {~menu2.value == 20}{~gsinenum = 21; ~gsine.value;}
2018+ {~menu2.value == 21}{~gsinenum = 22; ~gsine.value;}
2019+ {~menu2.value == 22}{~gsinenum = 23; ~gsine.value;}
2020+ {~menu2.value == 23}{~gsinenum = 24; ~gsine.value;};
20532021
20542022 ~st_load = StaticText(~settingsview, Rect(lefttime, top, 200, 20)).background_(Color.black);
20552023 ~st_load.stringColor = Color.white;
@@ -2864,13 +2832,13 @@ s.waitForBoot({
28642832 });
28652833
28662834
2867- Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button; button.value.postln}).action_({arg button;
2835+ Button.new(~extraoptionsview,Rect(0,80,120,20)).states_([["close eo",Color.white,Color.black],["close eo",Color.white,Color.black]]).action_({arg button;
28682836
2869- ~extraoptionsview.close; ~slideview.close; ~synthfreqsetview.close; ~extraoptions.value = 0;
2837+ ~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;}); ~extraoptions.value = 0;
28702838
28712839 });
28722840
2873- }, {~extraoptionsview.close; ~slideview.close; ~synthfreqset.close;});
2841+ }, {~extraoptionsview.close; if(~slideview != nil, {~slideview.close;}); if(~synthfreqsetview != nil, {~synthfreqsetview.close;});});
28742842 });
28752843
28762844
@@ -4845,7 +4813,7 @@ s.waitForBoot({
48454813 ~cpumonitorfunc = {
48464814 ~cpumonitor.close;
48474815 ~cpumonitor = StaticText(w, Rect(20,~bpt-100,800,124/1.6180339887499)).background_(Color.black).stringColor_(Color.white);
4848- if(~settingsbutton.value == 1, {~cpumonitorroutine.stop; ~cpumonitor.close; ~cpumonitorbutton.value = 0;});
4816+ if(~settingsbutton.value == 1, {~cpumonitorbutton.valueAction = 0;});
48494817 ~cpumonitor.string =
48504818 "cpu: "+s.avgCPU.asString+"%"++"\n" ++
48514819 "ugens: "+s.numUGens.asString++"\n" ++
@@ -4868,6 +4836,7 @@ s.waitForBoot({
48684836 ~cpumonitorbutton = Button.new(w,Rect(Window.screenBounds.width-20-20-20-20,~bpt+69+5,20,20/1.6180339887499)).states_([["cm",Color.white,Color.black],["cm",Color.white,Color.black]]).action_({arg button;
48694837
48704838 if(button.value == 1, {
4839+ if(~settingsbutton.value == 1, {~settingsbutton.valueAction = 0;});
48714840 ~cpumonitorroutine.reset;
48724841 ~cpumonitorroutine.play;
48734842 }, {~cpumonitorroutine.stop; ~cpumonitor.close;});
Show on old repository browser