Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

We’re showing branches in this repository, but you can also compare across forks.

base fork: marcodsad/xth-sense-lib
base: a7d630d4dc
...
head fork: marcodsad/xth-sense-lib
compare: master
  • 9 commits
  • 55 files changed
  • 0 commit comments
  • 1 contributor
Showing with 4,903 additions and 682 deletions.
  1. +18 −0 anlz.envelope~-help.pd
  2. +33 −0 anlz.envelope~.pd
  3. +6 −3 anlz.rms~.pd
  4. +2 −2 anlz.scope~.pd
  5. +10 −0 anlz.speriod-help.pd
  6. +9 −0 anlz.speriod.pd
  7. +1 −1  count.line.pd
  8. +2 −1  count.loop-help.pd
  9. +47 −0 efx.filter.bank~.pd
  10. +114 −0 efx.gui.clipfbd~.pd
  11. +21 −1 efx.gui.freeverb~.pd
  12. +7 −3 efx.gui.granular.live~.pd
  13. +33 −35 efx.gui.grunger~.pd
  14. +4 −4 efx.gui.pan.cos.mono~.pd
  15. +24 −26 efx.gui.pdelay~.pd
  16. +3 −3 efx.gui.pshift.ssb~.pd
  17. +98 −84 efx.gui.tstretch~.pd
  18. +66 −0 gen.pulse.sine~.pd
  19. +6 −3 gen.sine.mod~.pd
  20. +2,572 −0 gen.xbass~.pd
  21. +15 −7 gui.ead~.pd
  22. +4 −4 gui.nbx.pd
  23. +24 −0 gui.nbx.small.pd
  24. +37 −0 gui.slider.2map-help.pd
  25. +90 −0 gui.slider.2map.pd
  26. +13 −10 gui.slider.mini-help.pd
  27. +58 −28 gui.slider.mini.pd
  28. +428 −0 gui.sssad.mix.automation.pd
  29. +54 −53 gui.sssad.send.pd
  30. +61 −0 line3-help.pd
  31. BIN  line3.pd_darwin
  32. BIN  line3.pd_linux
  33. +54 −54 md_anlg.in.pd
  34. +57 −47 midi.send.pd
  35. +28 −26 mix.ch.stereo~.pd
  36. +49 −0 mix.fade.in.pd
  37. +49 −0 mix.fade.out.pd
  38. +4 −4 mix.set.aux~.pd
  39. +1 −1  mix.switchoglitch.pd
  40. +1 −1  scale.gui.curve.circle.pd
  41. +7 −3 scale.gui.multi.pd
  42. +3 −1 smp.loop.mono~.pd
  43. +8 −0 utils.bng.on.scene.pd
  44. +30 −51 utils.gui.switch~.pd
  45. +4 −6 utils.rec.mono~-help.pd
  46. +91 −55 utils.rec.mono~.pd
  47. +9 −11 utils.rec.stereo~-help.pd
  48. +101 −65 utils.rec.stereo~.pd
  49. +9 −9 utils.timebase.pd
  50. +281 −0 xsssad.auto.pd
  51. +153 −0 xsssad.autostore.pd
  52. +5 −2 xsssad.event.pd
  53. +61 −51 xsssad.eventstore.pd
  54. +4 −8 xsssad.pd
  55. +34 −19 xsssad.presetstore.pd
18 anlz.envelope~-help.pd
View
@@ -0,0 +1,18 @@
+#N canvas 534 297 469 453 10;
+#X obj 42 95 noise~;
+#X floatatom 129 99 5 0 0 0 - - -;
+#X obj 42 140 anlz.envelope~;
+#X floatatom 42 185 5 0 0 0 - - -;
+#X text 210 28 It translates an audio input into \; control values.
+Similar to anlz.snap \; but this one has a lo-pass filter \; that smooth
+the values \, and report \; a nice envelope.;
+#X text 211 141 ARGUMENTS_;
+#X text 210 265 OUTLET;
+#X text 210 215 Audio input;
+#X text 210 199 INLETS;
+#X text 211 161 None;
+#X text 210 230 Speed in ms;
+#X text 210 281 Control values;
+#X connect 0 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 3 0;
33 anlz.envelope~.pd
View
@@ -0,0 +1,33 @@
+#N canvas 126 202 487 449 10;
+#X obj 101 101 nbx 8 16 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8
+-1 -262144 -1 0 256;
+#X obj 164 101 cnv 16 30 16 empty empty rms 10 8 0 8 -1 -262144 0;
+#X obj 101 130 outlet;
+#X obj 100 -128 inlet~;
+#X obj 100 -102 *~;
+#X text 133 -100 square the signal;
+#X text 243 175 from: H06.envelope.follower \; Pd help files;
+#X obj 100 -72 lop~ 10;
+#X text 155 -73 responsiveness;
+#X obj 101 42 snapshot~;
+#X obj 101 69 sqrt;
+#X obj 119 16 r metro;
+#X obj 227 -15 metro 250;
+#X obj 227 -40 loadbang;
+#X obj 227 7 s metro;
+#X obj 284 -38 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 346 -58 inlet speed;
+#X connect 0 0 2 0;
+#X connect 3 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 7 0;
+#X connect 7 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 0 0;
+#X connect 11 0 9 0;
+#X connect 12 0 14 0;
+#X connect 13 0 12 0;
+#X connect 15 0 12 0;
+#X connect 16 0 12 1;
+#X coords 0 -1 1 1 94 18 2 100 100;
9 anlz.rms~.pd
View
@@ -1,11 +1,14 @@
-#N canvas 914 375 300 169 10;
+#N canvas 945 348 427 232 10;
#X obj 100 101 nbx 8 16 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8
--1 -262144 -1 0.346772 256;
+-1 -262144 -1 0.969901 256;
#X obj 163 101 cnv 16 30 16 empty empty rms 10 8 0 8 -1 -262144 0;
#X obj 99 13 inlet~;
#X obj 100 70 scale.lin 1 0 100;
#X obj 100 130 outlet;
-#X obj 100 38 env~ 512;
+#X obj 100 38 env~ 512 256;
+#X text 239 28 256 is sample \; sampling period is \; 5.8ms;
+#X text 237 81 Thus \, sampling rate is \; 1000 ms / 5.8 ms = 172Hz
+;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 0 0;
4 anlz.scope~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 213 247 609 485 10;
+#N canvas 216 247 609 485 10;
#X obj 0 18 cnv 15 160 100 empty empty empty 20 12 0 14 -200717 -66577
0;
#N canvas 18 93 452 302 (subpatch) 0;
@@ -47,4 +47,4 @@
#X connect 19 0 15 0;
#X connect 20 0 10 0;
#X connect 21 0 5 0;
-#X coords 0 0 1 1 160 118 1 0 0;
+#X coords 0 0 1 1 160 118 2 0 0;
10 anlz.speriod-help.pd
View
@@ -0,0 +1,10 @@
+#N canvas 836 344 537 332 10;
+#X obj 49 102 anlz.speriod;
+#X floatatom 49 65 5 0 0 0 - - -;
+#X text 182 51 This can be used to monitor the sampling \; period of
+a stream of values \; most likely \; you want to plug into its inlet
+the data \; received from a sensor to check whether \; the stream is
+reported in a steady period \; It prints the time between each value
+\; in the console window. The more the values \; are similar \, the
+steadier the sampling period.;
+#X connect 1 0 0 0;
9 anlz.speriod.pd
View
@@ -0,0 +1,9 @@
+#N canvas 501 281 320 221 10;
+#X obj 84 81 t b b;
+#X obj 84 103 timer;
+#X obj 84 125 print sampling-period;
+#X obj 84 61 inlet;
+#X connect 0 0 1 0;
+#X connect 0 1 1 1;
+#X connect 1 0 2 0;
+#X connect 3 0 0 0;
2  count.line.pd
View
@@ -1,4 +1,4 @@
-#N canvas 916 255 269 524 10;
+#N canvas 907 269 269 524 10;
#X obj 63 27 inlet;
#X obj 82 449 outlet;
#X msg 82 158 \$1 \$2;
3  count.loop-help.pd
View
@@ -1,4 +1,4 @@
-#N canvas 887 379 450 300 10;
+#N canvas 893 402 450 300 10;
#X obj 43 33 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X floatatom 43 126 5 0 0 0 - - -;
@@ -10,5 +10,6 @@
#X text 191 58 ARGUMENTS;
#X text 194 210 Integers ramp;
#X text 188 18 Generate integer ramp \, and start again.;
+#X text 192 90 Target value;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
47 efx.filter.bank~.pd
View
@@ -0,0 +1,47 @@
+#N canvas 759 267 248 469 10;
+#X obj 50 30 inlet~;
+#X obj 50 377 outlet~;
+#X obj 49 215 demux~;
+#X obj 115 377 outlet~;
+#X obj 102 61 loadbang;
+#X obj 102 103 symbol \$1;
+#X msg 102 168 0;
+#X msg 153 169 1;
+#X obj 49 243 hip~ \$2;
+#X obj 49 263 hip~ \$2;
+#X obj 49 283 hip~ \$2;
+#X obj 49 303 hip~ \$2;
+#X obj 49 343 hip~ \$2;
+#X obj 49 323 hip~ \$2;
+#X obj 114 243 lop~ \$2;
+#X obj 114 263 lop~ \$2;
+#X obj 114 283 lop~ \$2;
+#X obj 113 303 lop~ \$2;
+#X obj 113 323 lop~ \$2;
+#X obj 114 343 lop~ \$2;
+#X obj 102 82 del 10;
+#X obj 102 147 route hip;
+#X msg 102 124 \$1;
+#X connect 0 0 2 0;
+#X connect 2 0 8 0;
+#X connect 2 1 14 0;
+#X connect 4 0 20 0;
+#X connect 5 0 22 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 1 0;
+#X connect 13 0 12 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 19 0 3 0;
+#X connect 20 0 5 0;
+#X connect 21 0 6 0;
+#X connect 21 1 7 0;
+#X connect 22 0 21 0;
114 efx.gui.clipfbd~.pd
View
@@ -0,0 +1,114 @@
+#N canvas 784 217 775 333 10;
+#X obj -156 69 inlet~;
+#X obj -187 49 inlet~;
+#N canvas 713 403 626 409 dsp 0;
+#X obj 59 241 clip~ -1 1;
+#X obj 140 239 clip~ -1 1;
+#X obj 141 123 *~ 400;
+#X obj 60 124 *~ 400;
+#X obj 299 156 *~ 0.9;
+#X obj 140 29 inlet~;
+#X obj 60 29 inlet~;
+#X obj 60 214 +~;
+#X obj 418 156 *~ 0.9;
+#X obj 140 214 +~;
+#X obj 59 311 outlet~;
+#X obj 141 312 outlet~;
+#X obj 540 5 inlet;
+#X obj 565 30 loadbang;
+#X msg 565 53 1;
+#X obj 540 79 switch~;
+#X obj 198 32 r \$0-clip;
+#X obj 198 54 t f f;
+#X obj 300 77 delread~ fdb-l 10;
+#X obj 419 77 delread~ fdb-r 10;
+#X obj 263 300 delwrite~ fdb-l 300;
+#X obj 389 300 delwrite~ fdb-r 300;
+#X obj 332 102 r \$0-fdb;
+#X obj 300 30 r \$0-time;
+#X obj 300 52 t f f;
+#X obj 332 124 t f f;
+#X obj 298 181 clip~ -1 1;
+#X obj 417 180 clip~ -1 1;
+#X connect 0 0 10 0;
+#X connect 0 0 20 0;
+#X connect 1 0 11 0;
+#X connect 1 0 21 0;
+#X connect 2 0 9 0;
+#X connect 3 0 7 0;
+#X connect 4 0 26 0;
+#X connect 5 0 2 0;
+#X connect 6 0 3 0;
+#X connect 7 0 0 0;
+#X connect 8 0 27 0;
+#X connect 9 0 1 0;
+#X connect 12 0 15 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 16 0 17 0;
+#X connect 17 0 3 1;
+#X connect 17 1 2 1;
+#X connect 18 0 4 0;
+#X connect 19 0 8 0;
+#X connect 22 0 25 0;
+#X connect 23 0 24 0;
+#X connect 24 0 18 0;
+#X connect 24 1 19 0;
+#X connect 25 0 4 1;
+#X connect 25 1 8 1;
+#X connect 26 0 7 1;
+#X connect 27 0 9 1;
+#X restore -122 134 pd dsp;
+#X obj -56 143 r \$0-mix;
+#X obj -188 172 mix.xfade.curve.stereo~ 1 -1;
+#X obj -23 209 mix.switchoglitch 12;
+#X obj -189 226 outlet~;
+#X obj -132 226 outlet~;
+#X obj 100 117 gui.slider clip 5000 10;
+#X obj 376 100 s \$0-mix;
+#X obj 100 168 gui.slider mix 1 -1;
+#X obj 344 199 xsssad \$1/clp.clp;
+#X obj 345 260 xsssad \$1/clp.mix;
+#X obj 455 260 loadbang;
+#X obj 375 40 s \$0-clip;
+#X obj 375 60 s \$0-fdb;
+#X obj 375 80 s \$0-time;
+#X obj 344 219 xsssad \$1/clp.fdb;
+#X obj 344 239 xsssad \$1/clp.time;
+#X obj 100 151 gui.slider time 5000 1;
+#X obj 100 100 cnv 15 156 15 empty empty Clipfdb 5 8 0 8 -1 -162280
+0;
+#X obj -9 11 r \$1/clp.clp;
+#X obj -9 31 r \$1/clp.fdb;
+#X obj -9 51 r \$1/clp.time;
+#X obj -8 72 r \$1/clp.mix;
+#X obj 100 134 gui.slider fdb 3 0.1;
+#X connect 0 0 4 1;
+#X connect 0 0 2 1;
+#X connect 1 0 4 0;
+#X connect 1 0 2 0;
+#X connect 2 0 4 2;
+#X connect 2 1 4 3;
+#X connect 3 0 4 4;
+#X connect 4 0 6 0;
+#X connect 4 1 7 0;
+#X connect 4 3 5 0;
+#X connect 5 0 2 2;
+#X connect 8 0 14 0;
+#X connect 8 1 11 1;
+#X connect 10 0 9 0;
+#X connect 10 1 12 1;
+#X connect 11 0 8 0;
+#X connect 12 0 10 0;
+#X connect 13 0 12 2;
+#X connect 17 0 25 0;
+#X connect 18 0 19 0;
+#X connect 19 0 16 0;
+#X connect 19 1 18 1;
+#X connect 21 0 8 0;
+#X connect 22 0 25 0;
+#X connect 23 0 19 0;
+#X connect 24 0 10 0;
+#X connect 25 0 15 0;
+#X connect 25 1 17 1;
+#X coords 0 -1 1 1 157 84 2 100 100;
22 efx.gui.freeverb~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 670 214 807 409 10;
+#N canvas 679 237 807 409 10;
#X obj -261 114 inlet~;
#X obj -308 113 inlet~;
#N canvas 698 189 528 427 dsp 0;
@@ -83,6 +83,21 @@
#X obj 101 370 s \$0-freeze;
#X obj 101 348 s \$0-mix;
#X obj 287 44 inlet mix;
+#N canvas 127 251 450 300 workaround 0;
+#X obj 107 52 noise~;
+#X obj 154 111 dbtorms;
+#X msg 154 83 1;
+#X obj 185 84 init 1;
+#X obj 107 147 *~ 0.01;
+#X floatatom 171 137 12 0 0 0 - - -;
+#X obj 108 181 outlet~;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 1 0 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 0;
+#X connect 4 0 6 0;
+#X restore -170 74 pd workaround;
#X connect 0 0 2 1;
#X connect 0 0 6 1;
#X connect 1 0 2 0;
@@ -116,6 +131,11 @@
#X connect 23 0 13 0;
#X connect 24 0 35 0;
#X connect 24 1 28 1;
+#X connect 26 0 24 0;
#X connect 28 0 24 0;
#X connect 36 0 24 0;
+#X connect 37 0 2 0;
+#X connect 37 0 2 1;
+#X connect 37 0 6 0;
+#X connect 37 0 6 1;
#X coords 0 -1 1 1 157 117 2 100 100;
10 efx.gui.granular.live~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 127 134 1332 659 10;
+#N canvas 145 183 1332 659 10;
#X obj 522 203 loadbang;
#X obj 579 203 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
@@ -316,10 +316,10 @@
#X floatatom 941 -77 5 0 0 0 - - -;
#X obj 933 -9 *;
#X obj 1079 -94 hsl 128 15 1 2000 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 0 1;
+-262144 -1 -1 1000 1;
#X floatatom 1095 -67 5 0 0 0 - - -;
#X obj 921 54 hsl 128 15 0 5 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 0 1;
+-1 -1 1100 1;
#X floatatom 937 81 5 0 0 0 - - -;
#X obj 918 130 * 44100;
#X obj 1080 53 hsl 128 15 1 2 0 0 empty empty empty -2 -8 0 10 -262144
@@ -511,6 +511,7 @@
#X obj 297 261 xsssad \$1/gr.drtn;
#X obj 298 285 xsssad \$1/gr.pitch;
#X obj 298 309 xsssad \$1/gr.mix;
+#X obj 298 335 xsssad \$1/gr.play;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 3 0 5 0;
@@ -551,6 +552,7 @@
#X connect 39 0 20 0;
#X connect 40 0 21 0;
#X connect 41 0 11 0;
+#X connect 48 0 81 1;
#X connect 49 0 50 0;
#X connect 49 0 51 0;
#X connect 50 0 25 0;
@@ -561,6 +563,7 @@
#X connect 55 0 78 2;
#X connect 55 0 79 2;
#X connect 55 0 80 2;
+#X connect 55 0 81 2;
#X connect 56 0 63 0;
#X connect 57 0 64 0;
#X connect 58 0 65 0;
@@ -589,4 +592,5 @@
#X connect 78 0 64 0;
#X connect 79 0 65 0;
#X connect 80 0 66 0;
+#X connect 81 0 48 0;
#X coords 0 -1 1 1 156 100 2 100 100;
68 efx.gui.grunger~.pd
View
@@ -1,6 +1,6 @@
-#N canvas 737 177 747 446 10;
+#N canvas 758 177 747 446 10;
#X obj -126 77 inlet~;
-#N canvas 1022 177 610 557 dsp 1;
+#N canvas 1022 177 610 557 dsp 0;
#X obj 46 92 inlet~;
#X obj 46 445 outlet~;
#X obj 410 102 inlet;
@@ -74,7 +74,7 @@
#X obj 338 92 s \$0-dist.onoff;
#X obj 101 185 cnv 15 155 15 \$0-record empty empty 20 12 0 14 -1 -228856
0;
-#X obj 102 185 tgl 15 0 \$0-start.rnd empty empty 17 7 0 10 -191407
+#X obj 104 185 tgl 15 0 \$0-start.rnd empty empty 17 7 0 10 -191407
-1 -1 110.323 110.323;
#X obj 340 173 s \$0-mix;
#X obj 339 152 s \$0-pitch;
@@ -85,10 +85,9 @@
#X obj 185 28 inlet filt;
#X obj 310 28 inlet pitch;
#X obj 255 29 inlet q;
-#X obj 385 30 inlet pitch;
#X obj 6 40 loadbang;
#X msg 7 64 0;
-#X obj 470 31 inlet mix;
+#X obj 387 28 inlet mix;
#X obj 101 117 gui.slider filt 127 0;
#X obj 60 -76 r \$1/gru.filt;
#X obj 59 -52 r \$1/gru.q.filt;
@@ -97,7 +96,7 @@
#X obj 101 134 gui.slider q.filt 50 0;
#X obj 101 151 gui.slider pitch 400 -400;
#X obj 101 168 gui.slider mix 1 -1;
-#X obj 100 100 cnv 15 156 15 empty empty Grunger 5 8 0 8 -1 -162280
+#X obj 101 100 cnv 15 156 15 empty empty Grunger 5 8 0 8 -1 -162280
0;
#X obj 273 225 xsssad \$1/gru.filt;
#X obj 272 249 xsssad \$1/gru.q.filt;
@@ -108,42 +107,41 @@
#X obj 273 321 xsssad \$1/dist.switch;
#X obj 38 223 mix.switchoglitch 12;
#X connect 0 0 1 0;
-#X connect 0 0 35 0;
-#X connect 1 0 35 2;
-#X connect 1 1 35 3;
-#X connect 2 0 35 4;
+#X connect 0 0 34 0;
+#X connect 1 0 34 2;
+#X connect 1 1 34 3;
+#X connect 2 0 34 4;
#X connect 7 0 5 0;
-#X connect 7 0 36 1;
+#X connect 7 0 35 1;
#X connect 10 0 11 0;
#X connect 13 0 12 0;
-#X connect 14 0 21 0;
-#X connect 15 0 27 0;
-#X connect 16 0 26 0;
-#X connect 17 0 28 0;
-#X connect 18 0 19 0;
-#X connect 19 0 7 0;
-#X connect 20 0 7 0;
-#X connect 21 1 3 0;
-#X connect 21 1 30 1;
-#X connect 22 0 21 0;
+#X connect 14 0 20 0;
+#X connect 15 0 26 0;
+#X connect 16 0 25 0;
+#X connect 17 0 18 0;
+#X connect 18 0 7 0;
+#X connect 19 0 27 0;
+#X connect 20 1 3 0;
+#X connect 20 1 29 1;
+#X connect 21 0 20 0;
+#X connect 22 0 25 0;
#X connect 23 0 26 0;
#X connect 24 0 27 0;
-#X connect 25 0 28 0;
-#X connect 26 0 4 0;
+#X connect 25 0 4 0;
+#X connect 25 1 30 1;
+#X connect 26 0 9 0;
#X connect 26 1 31 1;
-#X connect 27 0 9 0;
+#X connect 27 0 8 0;
#X connect 27 1 32 1;
-#X connect 28 0 8 0;
-#X connect 28 1 33 1;
-#X connect 30 0 21 0;
+#X connect 29 0 20 0;
+#X connect 30 0 25 0;
#X connect 31 0 26 0;
#X connect 32 0 27 0;
-#X connect 33 0 28 0;
-#X connect 34 0 1 1;
-#X connect 34 0 35 1;
-#X connect 35 0 10 0;
-#X connect 35 1 13 0;
-#X connect 35 3 37 0;
-#X connect 36 0 7 0;
-#X connect 37 0 1 2;
+#X connect 33 0 1 1;
+#X connect 33 0 34 1;
+#X connect 34 0 10 0;
+#X connect 34 1 13 0;
+#X connect 34 3 36 0;
+#X connect 35 0 7 0;
+#X connect 36 0 1 2;
#X coords 0 -1 1 1 157 101 2 100 100;
8 efx.gui.pan.cos.mono~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 674 191 787 462 10;
+#N canvas 260 135 787 462 10;
#X obj 310 113 inlet~ signal;
#X obj 364 10 inlet control;
#X obj 309 317 *~;
@@ -12,7 +12,7 @@
#X obj 427 208 *~ 0.25;
#X obj 428 229 -~ 0.25;
#X obj 324 265 -~ 0.25;
-#X obj 100 117 gui.slider pan 1 0;
+#X obj 100 118 gui.slider pan 1 0;
#X obj 111 47 r \$1/cos.pan;
#X obj 100 100 cnv 15 156 15 empty empty Pan.cos.mono 5 8 0 8 -1 -162280
0;
@@ -22,7 +22,7 @@
#X msg 308 83 set \$1;
#X obj 364 34 t f f;
#X obj 470 48 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 1100 1;
+-1 -1 0 1;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 20 0;
@@ -42,8 +42,8 @@
#X connect 16 0 13 0;
#X connect 17 0 20 0;
#X connect 18 0 19 0;
-#X connect 19 0 13 0;
#X connect 20 0 18 0;
+#X connect 20 0 13 0;
#X connect 20 1 6 0;
#X connect 21 0 20 0;
#X coords 0 -1 1 1 156 33 2 100 100;
50 efx.gui.pdelay~.pd
View
@@ -1,6 +1,6 @@
-#N canvas 898 165 738 561 10;
+#N canvas 856 165 738 561 10;
#X obj -169 79 inlet~;
-#N canvas 567 178 588 338 dsp 0;
+#N canvas 570 178 588 338 dsp 0;
#X obj 46 30 inlet~;
#X obj 410 22 inlet;
#X obj 410 60 switch~;
@@ -29,7 +29,7 @@
#X obj 102 412 s \$0-pitchdel;
#X msg 102 388 octave \$1;
#X obj 101 203 hradio 13 1 0 7 empty octave-set oct 122 6 0 8 -191407
--1 -228856 1;
+-1 -228856 0;
#X obj 102 364 - 3;
#N canvas 166 159 514 538 control 0;
#X text 15 45 time - the delay time. Since the pitch-shifting effect
@@ -54,38 +54,36 @@ volumes as desired.;
shifted. The controls have equal tempered intervals (minor second major
second etc) with just intonation ratios in between.;
#X restore -120 -7 pd control details;
-#N canvas 369 141 450 447 init 0;
+#N canvas 375 141 450 447 init 1;
#X msg 77 302 12.9;
#X msg 137 209 0;
#X msg 193 173 25;
-#X obj 77 325 s pit_time;
-#X obj 137 287 s pit_pitfact;
-#X obj 137 256 s pit_fb;
-#X obj 137 234 s pit_oct;
#X msg 253 118 85;
-#X obj 193 199 s pit_lpdepth;
-#X obj 253 143 s pit_dryvol;
#X obj 253 167 s pit_delvol;
#X msg 38 359 \; pd dsp 1 \;;
#X obj 38 -18 loadbang;
#X obj 38 5 t b b b b b b;
-#X obj 306 105 s octave-set;
#X msg 306 82 3;
-#X connect 0 0 3 0;
-#X connect 1 0 4 0;
-#X connect 1 0 5 0;
-#X connect 1 0 6 0;
-#X connect 2 0 8 0;
-#X connect 7 0 9 0;
-#X connect 7 0 10 0;
-#X connect 12 0 13 0;
-#X connect 13 0 11 0;
-#X connect 13 1 0 0;
-#X connect 13 2 1 0;
-#X connect 13 3 2 0;
-#X connect 13 4 7 0;
-#X connect 13 5 15 0;
-#X connect 15 0 14 0;
+#X obj 77 325 s \$1/pdel.time;
+#X obj 137 287 s \$1/pdel.fact;
+#X obj 193 199 s \$1/pdel.depth;
+#X obj 152 248 s \$1/pdel.fdb;
+#X obj 253 143 s \$1/pdel.mix;
+#X obj 306 105 s \$1/pdel.oct;
+#X connect 0 0 9 0;
+#X connect 1 0 10 0;
+#X connect 1 0 12 0;
+#X connect 2 0 11 0;
+#X connect 3 0 4 0;
+#X connect 3 0 13 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 7 1 0 0;
+#X connect 7 2 1 0;
+#X connect 7 3 2 0;
+#X connect 7 4 3 0;
+#X connect 7 5 8 0;
+#X connect 8 0 14 0;
#X restore -120 13 pd init;
#X obj 100 185 gui.slider mix 1 -1;
#X obj 100 117 gui.slider time 5000 1;
6 efx.gui.pshift.ssb~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 567 275 810 556 10;
+#N canvas 591 286 810 556 10;
#X obj -155 49 inlet~;
#X obj -124 70 inlet~;
#N canvas 728 395 610 447 dsp 0;
@@ -59,8 +59,8 @@
#X obj 432 117 loadbang;
#X obj 304 100 s \$0-pitch;
#X obj 304 120 s \$0-mix;
-#X obj 100 26 inlet pitch;
-#X obj 120 51 inlet mix;
+#X obj 77 30 inlet pitch;
+#X obj 159 31 inlet mix;
#X obj 100 117 gui.slider pitch 8000 0;
#X obj 100 134 gui.slider mix 1 -1;
#X obj 100 100 cnv 15 156 15 empty empty Pshift.ssb 5 8 0 8 -1 -162280
182 efx.gui.tstretch~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 218 72 976 770 10;
+#N canvas 456 77 1063 770 10;
#X obj 448 383 hip~ 5;
#X floatatom 450 -99 4 0 100 0 - - -;
#X obj 449 330 *~;
@@ -40,9 +40,7 @@
#X msg 450 -121 25;
#X floatatom 581 46 4 0 900 0 - - -;
#X obj 581 66 * 0.001;
-#X msg 581 24 900;
#X text 490 -99 <-- chunk size (msec);
-#X obj 799 -10 expr (pow(2 \, $f1/120)-$f3)/$f2;
#X obj 581 91 t b f;
#X obj 581 0 loadbang;
#X text 624 42 <-- loop length;
@@ -69,11 +67,11 @@
#X obj 683 -103 r \$0-trasposition;
#X obj 448 159 r \$0-chunk-size;
#X obj 153 -210 inlet~;
-#X obj 185 -187 inlet tgl-write;
-#X msg 212 -51 stop;
-#X obj 185 -162 t f f;
-#X obj 212 -107 sel 0 1;
-#X msg 231 -84 start;
+#X obj 243 -208 inlet tgl-write;
+#X msg 248 -62 stop;
+#X obj 243 -183 t f f;
+#X obj 248 -118 sel 0 1;
+#X msg 267 -95 start;
#X obj 125 -18 tabwrite~ \$0-source;
#X obj 125 -313 bng 15 250 50 0 empty \$0-record empty 17 7 0 10 -209550
-1 -1;
@@ -94,14 +92,13 @@
#X floatatom 172 300 5 0 0 0 - - -;
#X obj 433 -193 inlet comp;
#X obj 506 -193 inlet trsp;
-#X obj 185 -135 utils.zipper~;
-#X obj 100 117 gui.slider comp 100 0;
+#X obj 243 -156 utils.zipper~;
+#X obj 100 117 gui.slider comp 3000 0;
#X obj 100 134 gui.slider trsp 1000 0;
#X obj 23 34 r \$1/tstre.comp;
#X obj 23 54 r \$1/tstre.trsp;
#X obj 153 -110 *~;
-#X obj 169 -241 vline~;
-#X msg 169 -265 1 50 \, 0 100 2000;
+#X obj 182 -240 vline~;
#X obj 125 -290 t b b;
#X obj 683 -81 int;
#X obj 23 75 r \$1/tstre.bng;
@@ -109,32 +106,45 @@
0;
#X obj 217 234 xsssad \$1/tstre.comp;
#X obj 217 258 xsssad \$1/tstre.trsp;
-#X connect 0 0 87 0;
+#X msg 581 24 2000;
+#X floatatom 295 35 5 0 0 0 - - -;
+#X obj 799 -10 expr (pow(2 \, $f1/120)-$f3)/$f2;
+#X obj 780 -270 loadbang;
+#X obj 780 -247 f \$0;
+#X obj 780 -225 makefilename %s;
+#X obj 750 -269 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X msg 780 -203 \; \$1-source const 0;
+#X text 777 -299 RESET TABLE SOURCE;
+#X obj 871 -272 inlet reset-table-source;
+#X text 340 -267 old last parameter was 1700;
+#X msg 182 -265 0 100 \, 1 500 \, 0 100 1700;
+#X connect 0 0 85 0;
#X connect 1 0 19 0;
#X connect 2 0 17 0;
#X connect 3 0 25 0;
#X connect 4 0 21 0;
#X connect 5 0 6 0;
#X connect 6 0 4 0;
-#X connect 7 0 43 0;
-#X connect 10 0 43 0;
-#X connect 10 1 43 1;
+#X connect 7 0 105 0;
+#X connect 10 0 105 0;
+#X connect 10 1 105 1;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 2 1;
#X connect 14 0 15 0;
-#X connect 14 0 65 0;
+#X connect 14 0 63 0;
#X connect 15 0 16 0;
-#X connect 16 0 66 0;
+#X connect 16 0 64 0;
#X connect 17 0 0 0;
-#X connect 19 0 51 0;
-#X connect 20 0 48 0;
+#X connect 19 0 49 0;
+#X connect 20 0 46 0;
#X connect 21 0 22 0;
-#X connect 22 0 84 0;
-#X connect 24 0 43 0;
-#X connect 24 1 43 2;
-#X connect 25 0 49 0;
-#X connect 25 0 53 0;
+#X connect 22 0 82 0;
+#X connect 24 0 105 0;
+#X connect 24 1 105 2;
+#X connect 25 0 47 0;
+#X connect 25 0 51 0;
#X connect 26 0 17 1;
#X connect 27 0 33 0;
#X connect 28 0 29 0;
@@ -143,66 +153,70 @@
#X connect 31 0 32 0;
#X connect 32 0 26 1;
#X connect 33 0 34 0;
-#X connect 34 0 83 0;
+#X connect 34 0 81 0;
#X connect 36 0 38 0;
#X connect 38 0 1 0;
#X connect 39 0 40 0;
-#X connect 40 0 44 0;
-#X connect 40 0 48 1;
-#X connect 41 0 39 0;
-#X connect 43 0 14 0;
-#X connect 43 0 23 0;
-#X connect 44 0 49 0;
-#X connect 44 1 49 1;
-#X connect 45 0 41 0;
-#X connect 48 0 55 0;
-#X connect 49 0 20 0;
-#X connect 50 0 25 0;
-#X connect 52 0 10 0;
-#X connect 54 0 24 0;
-#X connect 56 0 4 1;
-#X connect 57 0 5 1;
-#X connect 58 0 6 1;
-#X connect 59 0 11 0;
-#X connect 60 0 28 1;
-#X connect 61 0 30 0;
-#X connect 62 0 27 1;
-#X connect 63 0 29 1;
-#X connect 64 0 28 0;
-#X connect 67 0 101 0;
-#X connect 68 0 5 0;
-#X connect 69 0 97 0;
-#X connect 70 0 72 0;
-#X connect 71 0 75 0;
-#X connect 72 0 92 0;
-#X connect 72 1 73 0;
-#X connect 73 0 71 0;
-#X connect 73 1 74 0;
-#X connect 74 0 75 0;
-#X connect 76 0 100 0;
-#X connect 80 0 81 0;
-#X connect 82 0 79 0;
-#X connect 83 0 26 0;
-#X connect 84 0 2 0;
-#X connect 88 0 104 2;
-#X connect 88 0 105 2;
-#X connect 90 0 93 0;
-#X connect 91 0 94 0;
-#X connect 92 0 97 1;
-#X connect 93 0 85 0;
-#X connect 93 1 104 1;
-#X connect 94 0 86 0;
-#X connect 94 1 105 1;
-#X connect 95 0 93 0;
-#X connect 96 0 94 0;
-#X connect 97 0 75 0;
-#X connect 98 0 97 1;
-#X connect 99 0 98 0;
-#X connect 100 0 75 0;
-#X connect 100 1 99 0;
-#X connect 101 0 43 0;
-#X connect 102 0 79 0;
-#X connect 104 0 93 0;
-#X connect 105 0 89 0;
-#X connect 105 0 94 0;
+#X connect 40 0 42 0;
+#X connect 40 0 46 1;
+#X connect 42 0 47 0;
+#X connect 42 1 47 1;
+#X connect 43 0 103 0;
+#X connect 46 0 53 0;
+#X connect 47 0 20 0;
+#X connect 48 0 25 0;
+#X connect 50 0 10 0;
+#X connect 52 0 24 0;
+#X connect 54 0 4 1;
+#X connect 55 0 5 1;
+#X connect 56 0 6 1;
+#X connect 57 0 11 0;
+#X connect 58 0 28 1;
+#X connect 59 0 30 0;
+#X connect 60 0 27 1;
+#X connect 61 0 29 1;
+#X connect 62 0 28 0;
+#X connect 65 0 98 0;
+#X connect 66 0 5 0;
+#X connect 67 0 95 0;
+#X connect 68 0 70 0;
+#X connect 70 0 90 0;
+#X connect 70 1 71 0;
+#X connect 71 0 69 0;
+#X connect 71 1 72 0;
+#X connect 74 0 97 0;
+#X connect 78 0 79 0;
+#X connect 80 0 77 0;
+#X connect 81 0 26 0;
+#X connect 82 0 2 0;
+#X connect 86 0 101 2;
+#X connect 86 0 102 2;
+#X connect 88 0 91 0;
+#X connect 89 0 92 0;
+#X connect 90 0 95 1;
+#X connect 91 0 83 0;
+#X connect 91 1 101 1;
+#X connect 92 0 84 0;
+#X connect 92 1 102 1;
+#X connect 93 0 91 0;
+#X connect 94 0 92 0;
+#X connect 95 0 73 0;
+#X connect 96 0 95 1;
+#X connect 97 0 73 0;
+#X connect 97 1 114 0;
+#X connect 98 0 105 0;
+#X connect 99 0 77 0;
+#X connect 101 0 91 0;
+#X connect 102 0 87 0;
+#X connect 102 0 92 0;
+#X connect 103 0 39 0;
+#X connect 104 0 83 0;
+#X connect 105 0 14 0;
+#X connect 105 0 23 0;
+#X connect 106 0 107 0;
+#X connect 107 0 108 0;
+#X connect 108 0 110 0;
+#X connect 109 0 107 0;
+#X connect 112 0 107 0;
+#X connect 114 0 96 0;
#X coords 0 -1 1 1 156 66 2 100 100;
66 gen.pulse.sine~.pd
View
@@ -0,0 +1,66 @@
+#N canvas 575 404 779 392 10;
+#X obj 100 117 cnv 15 156 18 empty empty empty 20 12 0 14 -1 -66577
+0;
+#X obj 100 137 cnv 15 156 18 empty empty empty 20 12 0 6 -1 -66577
+0;
+#X obj 100 100 cnv 15 156 15 empty empty Pulse.sine 5 8 0 8 -1 -162280
+0;
+#N canvas 1103 428 450 300 dsp 0;
+#X floatatom 34 21 5 0 0 0 - - -;
+#X obj 124 156 *~;
+#X obj 34 47 osc~ 44;
+#X obj 139 98 inlet~;
+#X obj 33 206 outlet~;
+#X obj 33 95 demux~;
+#X obj 33 156 *~ 1;
+#X obj 73 21 r \$0-freq;
+#X obj 50 70 r \$0-pulse;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 1 1;
+#X connect 5 0 6 0;
+#X connect 5 1 1 0;
+#X connect 6 0 4 0;
+#X connect 7 0 2 0;
+#X connect 8 0 5 0;
+#X restore 21 65 pd dsp;
+#X obj 103 139 tgl 15 0 empty empty pulse/wave 18 7 0 8 -66577 -228856
+-228856 1 1;
+#X obj 21 93 outlet~;
+#X obj 9 257 xsssad \$1/gen.sin.frq;
+#X obj 36 281 xsssad \$1/gen.sin.pls;
+#X obj 100 18 r \$1/gen.sin.frq;
+#X obj 171 41 r \$1/gen.sin.pls;
+#X obj 288 288 s \$0-pulse;
+#X obj 289 265 s \$0-freq;
+#X obj 216 335 outlet freq;
+#X obj 357 14 inlet freq;
+#X obj 20 28 r~ \$0-ead;
+#X obj 100 119 gui.slider freq 500 5;
+#X obj 100 157 cnv 15 156 18 empty empty empty 20 12 0 6 -1 -66577
+0;
+#X obj 191 137 gui.ead~;
+#X obj 436 15 inlet bng.pulse;
+#X obj 292 217 s~ \$0-ead;
+#X obj 396 207 xsssad \$1/gen.sin.atk;
+#X obj 393 230 xsssad \$1/gen.sin.decay;
+#X connect 3 0 5 0;
+#X connect 4 0 10 0;
+#X connect 4 0 7 1;
+#X connect 6 0 15 0;
+#X connect 7 0 4 0;
+#X connect 8 0 15 0;
+#X connect 9 0 4 0;
+#X connect 13 0 15 0;
+#X connect 14 0 3 0;
+#X connect 15 0 12 0;
+#X connect 15 0 11 0;
+#X connect 15 1 6 1;
+#X connect 17 0 19 0;
+#X connect 17 1 20 1;
+#X connect 17 2 21 1;
+#X connect 18 0 17 0;
+#X connect 20 0 17 1;
+#X connect 21 0 17 2;
+#X coords 0 -1 1 1 156 76 2 100 100;
9 gen.sine.mod~.pd
View
@@ -1,4 +1,4 @@
-#N canvas 129 238 714 511 10;
+#N canvas 141 238 714 511 10;
#X obj 163 -71 inlet carFreq;
#X obj 263 -72 inlet mod;
#X obj 84 -71 inlet vol;
@@ -209,7 +209,7 @@
#X obj 10 44 gui.radio.tgl;
#X obj 10 10 cnv 15 156 15 empty empty Sine.mod 5 8 0 8 -1 -162280
0;
-#N canvas 730 147 643 545 dsp 0;
+#N canvas 736 147 643 545 dsp 0;
#X obj 391 180 *~;
#X obj 448 248 *~;
#X obj 448 322 fdn~ 64 40000;
@@ -319,6 +319,8 @@
#X obj -129 -32 r \$1/smod.mod;
#X obj 108 249 xsssad \$1/smod.frq;
#X obj -129 -56 r \$1/smod.frq;
+#X text 103 -127 Frequency modulator (FM) synthesiser;
+#X obj -3 -71 inlet on.off;
#X connect 0 0 12 0;
#X connect 1 0 13 0;
#X connect 2 0 11 1;
@@ -337,7 +339,7 @@
#X connect 16 0 19 0;
#X connect 16 1 18 0;
#X connect 21 0 11 1;
-#X connect 22 0 11 2;
+#X connect 22 0 11 1;
#X connect 23 0 13 0;
#X connect 24 0 11 0;
#X connect 25 0 14 1;
@@ -348,4 +350,5 @@
#X connect 30 0 13 0;
#X connect 31 0 12 0;
#X connect 32 0 12 0;
+#X connect 34 0 11 0;
#X coords 0 -1 1 1 156 83 1 10 10;
2,572 gen.xbass~.pd
View
@@ -0,0 +1,2572 @@
+#N canvas 668 133 782 709 10;
+#X text 364 345 A WAVEGUIDE GUITAR;
+#X text 365 372 example chord messages:;
+#X text 364 397 -the numbers are MIDI notes;
+#X text 362 422 -positions are different strings \, from low E to high
+E;
+#X text 364 437 -p means sustain the last note that was played on that
+string \; x means mute it;
+#N canvas 798 482 450 300 dsp 0;
+#X obj 34 257 outlet~;
+#X obj 33 133 clip~ -1 1;
+#X obj 34 96 *~;
+#N canvas 44 97 1550 744 delay-writer 0;
+#X obj 680 538 outlet~;
+#X obj 764 -49 sin;
+#X obj 856 -49 cos;
+#X text 770 -78 get components of vector;
+#N canvas 24 423 925 397 body-resonance 0;
+#X obj 429 1 inlet~;
+#X obj 423 299 outlet~;
+#X obj 429 56 hip~ 5;
+#X obj 424 269 *~ 1.5;
+#X obj 20 138 bp~ 100 10;
+#X obj 87 138 bp~ 169 10;
+#X obj 552 139 bp~ 980 48;
+#X obj 620 139 bp~ 1010 80;
+#X obj 693 139 bp~ 1174 58;
+#X obj 766 139 bp~ 1194 39;
+#X obj 152 139 bp~ 205 40;
+#X obj 218 139 bp~ 377 50;
+#X obj 284 139 bp~ 436 55;
+#X obj 417 139 bp~ 731 72;
+#X obj 485 139 bp~ 873 75;
+#X obj 350 139 bp~ 650 70;
+#X obj 109 161 *~ 0.65;
+#X obj 663 167 *~ 0.4;
+#X obj 733 168 *~ 0.4;
+#X obj 245 165 *~ 0.4;
+#X text 37 254 I got these numbers from The Physics of Musical Instruments
+\, by Fletcher and Rossing \, pp. 252-254. Some artistic license was
+taken \, as I kludged this filter bank together from the resonant frequencies
+(with Q values!) that they give for folk and classical guitar bodies.
+I had to guess the lower Q values \, and also I replaced two resonances
+in the 600-700 Hz range with one at 650 Hz to make the response more
+even among notes. Then I reduced the volume of a few (as you can see)
+to improve the sound.;
+#X connect 0 0 2 0;
+#X connect 2 0 4 0;
+#X connect 2 0 5 0;
+#X connect 2 0 6 0;
+#X connect 2 0 7 0;
+#X connect 2 0 8 0;
+#X connect 2 0 9 0;
+#X connect 2 0 10 0;
+#X connect 2 0 11 0;
+#X connect 2 0 12 0;
+#X connect 2 0 13 0;
+#X connect 2 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 0;
+#X connect 5 0 16 0;
+#X connect 6 0 3 0;
+#X connect 7 0 3 0;
+#X connect 8 0 17 0;
+#X connect 9 0 18 0;
+#X connect 10 0 3 0;
+#X connect 11 0 19 0;
+#X connect 12 0 3 0;
+#X connect 13 0 3 0;
+#X connect 14 0 3 0;
+#X connect 15 0 3 0;
+#X connect 16 0 3 0;
+#X connect 17 0 3 0;
+#X connect 18 0 3 0;
+#X connect 19 0 3 0;
+#X restore 747 514 pd body-resonance;
+#N canvas 6 48 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 143 87 delwrite~ \$0-low-e-pick-position 100;
+#X obj 141 116 delread~ \$0-low-e-pick-position 3;
+#X connect 0 0 3 0;
+#X connect 0 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 15 0 3 1;
+#X restore 289 280 pd pick-position;
+#X floatatom 404 254 5 0 0 0 - - -;
+#X text 435 252 in ms;
+#X obj 856 -24 abs;
+#X obj 764 -23 abs;
+#X text 880 -46 absolute value to preserve magnitude of components
+but avoid cancellation;
+#N canvas 36 163 997 656 low-e-string 0;
+#X text 245 266 vertical plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 250 309 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 87 307 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X text 857 320 horizontal plane;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 191 284 delread~ \$0-low-e-string-del-xz 12.1349;
+#X obj 586 266 delread~ \$0-low-e-string-del-xy 12.1349;
+#X obj 140 452 delwrite~ \$0-low-e-string-del-xz 50;
+#X obj 665 460 delwrite~ \$0-low-e-string-del-xy 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 4 332 r \$0-mute-low-e;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 423 101 r \$0-off;
+#X obj 469 184 r \$0-mute;
+#X connect 1 0 7 0;
+#X connect 1 0 5 0;
+#X connect 2 0 4 0;
+#X connect 2 0 6 0;
+#X connect 3 0 52 0;
+#X connect 4 0 14 0;
+#X connect 5 0 15 0;
+#X connect 5 0 36 0;
+#X connect 6 0 25 0;
+#X connect 7 0 16 0;
+#X connect 12 0 27 0;
+#X connect 13 0 30 0;
+#X connect 14 0 20 0;
+#X connect 15 0 18 0;
+#X connect 16 0 17 0;
+#X connect 17 0 23 0;
+#X connect 17 0 36 0;
+#X connect 18 0 22 0;
+#X connect 19 0 21 0;
+#X connect 20 0 3 0;
+#X connect 21 0 34 0;
+#X connect 21 0 53 0;
+#X connect 22 0 53 0;
+#X connect 23 0 12 0;
+#X connect 23 0 52 0;
+#X connect 24 0 22 0;
+#X connect 24 0 26 0;
+#X connect 25 0 19 0;
+#X connect 26 0 40 0;
+#X connect 27 0 40 0;
+#X connect 28 0 6 1;
+#X connect 29 0 7 1;
+#X connect 30 0 40 0;
+#X connect 31 0 1 0;
+#X connect 31 0 2 0;
+#X connect 32 0 5 1;
+#X connect 33 0 4 1;
+#X connect 34 0 35 0;
+#X connect 35 0 40 0;
+#X connect 36 0 45 0;
+#X connect 37 0 13 0;
+#X connect 37 0 31 0;
+#X connect 38 0 44 0;
+#X connect 38 0 54 0;
+#X connect 38 0 55 0;
+#X connect 39 0 24 0;
+#X connect 46 0 62 0;
+#X connect 48 0 1 1;
+#X connect 48 0 42 0;
+#X connect 49 0 2 1;
+#X connect 49 0 43 0;
+#X connect 50 0 5 0;
+#X connect 50 0 7 0;
+#X connect 51 0 4 0;
+#X connect 51 0 6 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 65 0;
+#X connect 62 1 57 0;
+#X connect 63 0 67 0;
+#X connect 64 0 59 0;
+#X connect 65 0 64 0;
+#X connect 66 0 64 0;
+#X connect 67 0 66 0;
+#X connect 67 1 68 0;
+#X connect 68 0 64 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 29 0;
+#X connect 70 0 32 0;
+#X connect 70 0 33 0;
+#X connect 70 0 28 0;
+#X connect 70 0 41 0;
+#X restore 288 349 pd low-e-string;
+#N canvas 18 94 997 656 a-string 0;
+#X text 245 266 vertical plane;
+#X text 857 320 horizontal plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 190 306 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 29 303 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 191 284 delread~ \$0-a-string-del-xz 9.09091;
+#X obj 586 266 delread~ \$0-a-string-del-xy 9.09091;
+#X obj 665 460 delwrite~ \$0-a-string-del-xy 50;
+#X obj 140 452 delwrite~ \$0-a-string-del-xz 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 4 332 r \$0-mute-a;
+#X obj 423 101 r \$0-off;
+#X obj 469 184 r \$0-mute;
+#X connect 2 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 53 0;
+#X connect 5 0 15 0;
+#X connect 6 0 16 0;
+#X connect 6 0 37 0;
+#X connect 7 0 26 0;
+#X connect 8 0 17 0;
+#X connect 13 0 28 0;
+#X connect 14 0 31 0;
+#X connect 15 0 21 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 24 0;
+#X connect 18 0 37 0;
+#X connect 19 0 23 0;
+#X connect 20 0 22 0;
+#X connect 21 0 4 0;
+#X connect 22 0 35 0;
+#X connect 22 0 52 0;
+#X connect 23 0 52 0;
+#X connect 24 0 13 0;
+#X connect 24 0 53 0;
+#X connect 25 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 20 0;
+#X connect 27 0 41 0;
+#X connect 28 0 41 0;
+#X connect 29 0 7 1;
+#X connect 30 0 8 1;
+#X connect 31 0 41 0;
+#X connect 32 0 2 0;
+#X connect 32 0 3 0;
+#X connect 33 0 6 1;
+#X connect 34 0 5 1;
+#X connect 35 0 36 0;
+#X connect 36 0 41 0;
+#X connect 37 0 46 0;
+#X connect 38 0 14 0;
+#X connect 38 0 32 0;
+#X connect 39 0 45 0;
+#X connect 39 0 54 0;
+#X connect 39 0 55 0;
+#X connect 40 0 25 0;
+#X connect 47 0 62 0;
+#X connect 48 0 2 1;
+#X connect 48 0 43 0;
+#X connect 49 0 3 1;
+#X connect 49 0 44 0;
+#X connect 50 0 6 0;
+#X connect 50 0 8 0;
+#X connect 51 0 5 0;
+#X connect 51 0 7 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 64 0;
+#X connect 62 1 57 0;
+#X connect 63 0 59 0;
+#X connect 64 0 63 0;
+#X connect 65 0 63 0;
+#X connect 66 0 65 0;
+#X connect 66 1 67 0;
+#X connect 67 0 63 0;
+#X connect 68 0 66 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 30 0;
+#X connect 70 0 33 0;
+#X connect 70 0 34 0;
+#X connect 70 0 29 0;
+#X connect 70 0 42 0;
+#X restore 447 348 pd a-string;
+#N canvas 18 94 997 656 d-string 0;
+#X text 245 266 vertical plane;
+#X text 857 320 horizontal plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 190 306 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 29 303 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 191 284 delread~ \$0-d-string-del-xz 6.81049;
+#X obj 586 266 delread~ \$0-d-string-del-xy 6.81049;
+#X obj 665 460 delwrite~ \$0-d-string-del-xy 50;
+#X obj 140 452 delwrite~ \$0-d-string-del-xz 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 4 332 r \$0-mute-d;
+#X obj 423 101 r \$0-off;
+#X obj 468 184 r \$0-mute;
+#X connect 2 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 53 0;
+#X connect 5 0 15 0;
+#X connect 6 0 16 0;
+#X connect 6 0 37 0;
+#X connect 7 0 26 0;
+#X connect 8 0 17 0;
+#X connect 13 0 28 0;
+#X connect 14 0 31 0;
+#X connect 15 0 21 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 24 0;
+#X connect 18 0 37 0;
+#X connect 19 0 23 0;
+#X connect 20 0 22 0;
+#X connect 21 0 4 0;
+#X connect 22 0 35 0;
+#X connect 22 0 52 0;
+#X connect 23 0 52 0;
+#X connect 24 0 13 0;
+#X connect 24 0 53 0;
+#X connect 25 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 20 0;
+#X connect 27 0 41 0;
+#X connect 28 0 41 0;
+#X connect 29 0 7 1;
+#X connect 30 0 8 1;
+#X connect 31 0 41 0;
+#X connect 32 0 2 0;
+#X connect 32 0 3 0;
+#X connect 33 0 6 1;
+#X connect 34 0 5 1;
+#X connect 35 0 36 0;
+#X connect 36 0 41 0;
+#X connect 37 0 46 0;
+#X connect 38 0 14 0;
+#X connect 38 0 32 0;
+#X connect 39 0 45 0;
+#X connect 39 0 54 0;
+#X connect 39 0 55 0;
+#X connect 40 0 25 0;
+#X connect 47 0 62 0;
+#X connect 48 0 2 1;
+#X connect 48 0 43 0;
+#X connect 49 0 3 1;
+#X connect 49 0 44 0;
+#X connect 50 0 6 0;
+#X connect 50 0 8 0;
+#X connect 51 0 5 0;
+#X connect 51 0 7 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 64 0;
+#X connect 62 1 57 0;
+#X connect 63 0 59 0;
+#X connect 64 0 63 0;
+#X connect 65 0 63 0;
+#X connect 66 0 65 0;
+#X connect 66 1 67 0;
+#X connect 67 0 63 0;
+#X connect 68 0 66 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 30 0;
+#X connect 70 0 33 0;
+#X connect 70 0 34 0;
+#X connect 70 0 29 0;
+#X connect 70 0 42 0;
+#X restore 664 348 pd d-string;
+#N canvas 18 94 997 656 g-string 0;
+#X text 245 266 vertical plane;
+#X text 857 320 horizontal plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 190 306 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 29 303 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 190 284 delread~ \$0-g-string-del-xz 5.1021;
+#X obj 586 266 delread~ \$0-g-string-del-xy 5.1021;
+#X obj 665 460 delwrite~ \$0-g-string-del-xy 50;
+#X obj 140 452 delwrite~ \$0-g-string-del-xz 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 4 332 r \$0-mute-g;
+#X obj 423 101 r \$0-off;
+#X obj 469 184 r \$0-mute;
+#X connect 2 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 53 0;
+#X connect 5 0 15 0;
+#X connect 6 0 16 0;
+#X connect 6 0 37 0;
+#X connect 7 0 26 0;
+#X connect 8 0 17 0;
+#X connect 13 0 28 0;
+#X connect 14 0 31 0;
+#X connect 15 0 21 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 24 0;
+#X connect 18 0 37 0;
+#X connect 19 0 23 0;
+#X connect 20 0 22 0;
+#X connect 21 0 4 0;
+#X connect 22 0 35 0;
+#X connect 22 0 52 0;
+#X connect 23 0 52 0;
+#X connect 24 0 13 0;
+#X connect 24 0 53 0;
+#X connect 25 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 20 0;
+#X connect 27 0 41 0;
+#X connect 28 0 41 0;
+#X connect 29 0 7 1;
+#X connect 30 0 8 1;
+#X connect 31 0 41 0;
+#X connect 32 0 2 0;
+#X connect 32 0 3 0;
+#X connect 33 0 6 1;
+#X connect 34 0 5 1;
+#X connect 35 0 36 0;
+#X connect 36 0 41 0;
+#X connect 37 0 46 0;
+#X connect 38 0 14 0;
+#X connect 38 0 32 0;
+#X connect 39 0 45 0;
+#X connect 39 0 54 0;
+#X connect 39 0 55 0;
+#X connect 40 0 25 0;
+#X connect 47 0 62 0;
+#X connect 48 0 2 1;
+#X connect 48 0 43 0;
+#X connect 49 0 3 1;
+#X connect 49 0 44 0;
+#X connect 50 0 6 0;
+#X connect 50 0 8 0;
+#X connect 51 0 5 0;
+#X connect 51 0 7 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 64 0;
+#X connect 62 1 57 0;
+#X connect 63 0 59 0;
+#X connect 64 0 63 0;
+#X connect 65 0 63 0;
+#X connect 66 0 65 0;
+#X connect 66 1 67 0;
+#X connect 67 0 63 0;
+#X connect 68 0 66 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 30 0;
+#X connect 70 0 33 0;
+#X connect 70 0 34 0;
+#X connect 70 0 29 0;
+#X connect 70 0 42 0;
+#X restore 836 348 pd g-string;
+#N canvas 18 94 997 656 b-string 0;
+#X text 245 266 vertical plane;
+#X text 857 320 horizontal plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 190 306 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 29 303 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 191 284 delread~ \$0-b-string-del-xz 4.04954;
+#X obj 586 266 delread~ \$0-b-string-del-xy 4.04954;
+#X obj 665 460 delwrite~ \$0-b-string-del-xy 50;
+#X obj 140 452 delwrite~ \$0-b-string-del-xz 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 4 332 r \$0-mute-b;
+#X obj 423 101 r \$0-off;
+#X obj 475 175 r \$0-mute;
+#X connect 2 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 53 0;
+#X connect 5 0 15 0;
+#X connect 6 0 16 0;
+#X connect 6 0 37 0;
+#X connect 7 0 26 0;
+#X connect 8 0 17 0;
+#X connect 13 0 28 0;
+#X connect 14 0 31 0;
+#X connect 15 0 21 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 24 0;
+#X connect 18 0 37 0;
+#X connect 19 0 23 0;
+#X connect 20 0 22 0;
+#X connect 21 0 4 0;
+#X connect 22 0 35 0;
+#X connect 22 0 52 0;
+#X connect 23 0 52 0;
+#X connect 24 0 13 0;
+#X connect 24 0 53 0;
+#X connect 25 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 20 0;
+#X connect 27 0 41 0;
+#X connect 28 0 41 0;
+#X connect 29 0 7 1;
+#X connect 30 0 8 1;
+#X connect 31 0 41 0;
+#X connect 32 0 2 0;
+#X connect 32 0 3 0;
+#X connect 33 0 6 1;
+#X connect 34 0 5 1;
+#X connect 35 0 36 0;
+#X connect 36 0 41 0;
+#X connect 37 0 46 0;
+#X connect 38 0 14 0;
+#X connect 38 0 32 0;
+#X connect 39 0 45 0;
+#X connect 39 0 54 0;
+#X connect 39 0 55 0;
+#X connect 40 0 25 0;
+#X connect 47 0 62 0;
+#X connect 48 0 2 1;
+#X connect 48 0 43 0;
+#X connect 49 0 3 1;
+#X connect 49 0 44 0;
+#X connect 50 0 6 0;
+#X connect 50 0 8 0;
+#X connect 51 0 5 0;
+#X connect 51 0 7 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 64 0;
+#X connect 62 1 57 0;
+#X connect 63 0 59 0;
+#X connect 64 0 63 0;
+#X connect 65 0 63 0;
+#X connect 66 0 65 0;
+#X connect 66 1 67 0;
+#X connect 67 0 63 0;
+#X connect 68 0 66 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 30 0;
+#X connect 70 0 33 0;
+#X connect 70 0 34 0;
+#X connect 70 0 29 0;
+#X connect 70 0 42 0;
+#X restore 1016 348 pd b-string;
+#N canvas 12 71 997 656 high-e-string 0;
+#X text 245 266 vertical plane;
+#X text 857 320 horizontal plane;
+#X obj 367 319 *~;
+#X obj 459 321 *~;
+#X obj 587 409 clip~ -1 1;
+#X obj 587 352 *~;
+#X obj 227 345 *~;
+#X obj 614 321 *~;
+#X obj 190 306 *~;
+#X text 642 318 horizontal-horizontal transfer;
+#X text 29 303 vertical-vertical transfer;
+#X text 467 349 horizontal-vertical;
+#X text 249 347 vertical-horizontal;
+#X obj 237 595 lop~ 3000;
+#X obj 167 595 *~ 0.1;
+#X obj 587 371 lop~ 3500;
+#X obj 265 402 lop~ 4000;
+#X obj 140 388 lop~ 4500;
+#X obj 140 408 hip~ 10;
+#X obj 378 583 hip~ 10;
+#X obj 666 417 hip~ 10;
+#X obj 587 390 hip~ 10;
+#X obj 665 438 clip~ -1 1;
+#X obj 429 607 clip~ -1 1;
+#X obj 140 427 clip~ -1 1;
+#X obj 429 583 hip~ 20;
+#X obj 666 397 lop~ 5000;
+#X obj 366 620 *~ 100;
+#X obj 236 618 *~ 0.3;
+#X obj 672 237 * 0.6;
+#X obj 226 251 * 0.59;
+#X obj 167 617 lop~ 4000;
+#X obj 229 211 lop~ 2000;
+#X obj 311 243 * 0.42;
+#X obj 580 231 * 0.393;
+#X obj 298 595 lop~ 3000;
+#X obj 297 618 *~ 0.3;
+#X obj 424 452 *~ 0.01425;
+#X obj 103 181 inlet~ pluck;
+#X obj 242 185 inlet delaylength;
+#X obj 870 202 inlet~ bodyres;
+#X obj 361 716 outlet~;
+#X floatatom 473 205 5 0 0 0 - - -;
+#X floatatom 680 221 5 0 0 0 - - -;
+#X floatatom 754 225 5 0 0 0 - - -;
+#X floatatom 361 204 8 0 0 0 - - -;
+#X obj 427 716 outlet~ body-res;
+#X obj 35 181 inlet bang;
+#X obj 638 201 r \$0-sin-magnitude;
+#X obj 755 202 r \$0-cos-magnitude;
+#X obj 191 284 delread~ \$0-high-e-string-del-xz 3.03373;
+#X obj 586 266 delread~ \$0-high-e-string-del-xy 3.03373;
+#X obj 665 461 delwrite~ \$0-high-e-string-del-xy 50;
+#X obj 140 452 delwrite~ \$0-high-e-string-del-xz 50;
+#X obj 422 235 / 1;
+#X obj 374 235 * 1;
+#X obj 14 521 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 9 476 1;
+#X msg 40 476 0;
+#X floatatom 40 439 5 0 0 0 - - -;
+#X obj 40 457 sel 0;
+#X obj 14 547 switch~ 1;
+#X obj 38 223 t b b;
+#X obj 40 419 line 1 5;
+#X msg 40 397 1 0 \, 0 60000;
+#X msg 0 375 0 5;
+#X obj 0 354 sel 0 1;
+#X msg 29 375 1;
+#X obj 4 332 r \$0-mute-high-e;
+#X obj 423 101 r \$0-off;
+#X obj 469 184 r \$0-mute;
+#X connect 2 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 53 0;
+#X connect 5 0 15 0;
+#X connect 6 0 16 0;
+#X connect 6 0 37 0;
+#X connect 7 0 26 0;
+#X connect 8 0 17 0;
+#X connect 13 0 28 0;
+#X connect 14 0 31 0;
+#X connect 15 0 21 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 24 0;
+#X connect 18 0 37 0;
+#X connect 19 0 23 0;
+#X connect 20 0 22 0;
+#X connect 21 0 4 0;
+#X connect 22 0 35 0;
+#X connect 22 0 52 0;
+#X connect 23 0 52 0;
+#X connect 24 0 13 0;
+#X connect 24 0 53 0;
+#X connect 25 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 20 0;
+#X connect 27 0 41 0;
+#X connect 28 0 41 0;
+#X connect 29 0 7 1;
+#X connect 30 0 8 1;
+#X connect 31 0 41 0;
+#X connect 32 0 2 0;
+#X connect 32 0 3 0;
+#X connect 33 0 6 1;
+#X connect 34 0 5 1;
+#X connect 35 0 36 0;
+#X connect 36 0 41 0;
+#X connect 37 0 46 0;
+#X connect 38 0 14 0;
+#X connect 38 0 32 0;
+#X connect 39 0 45 0;
+#X connect 39 0 54 0;
+#X connect 39 0 55 0;
+#X connect 40 0 25 0;
+#X connect 47 0 62 0;
+#X connect 48 0 2 1;
+#X connect 48 0 43 0;
+#X connect 49 0 3 1;
+#X connect 49 0 44 0;
+#X connect 50 0 6 0;
+#X connect 50 0 8 0;
+#X connect 51 0 5 0;
+#X connect 51 0 7 0;
+#X connect 54 0 51 0;
+#X connect 55 0 50 0;
+#X connect 56 0 61 0;
+#X connect 57 0 56 0;
+#X connect 58 0 56 0;
+#X connect 59 0 60 0;
+#X connect 60 0 58 0;
+#X connect 62 0 64 0;
+#X connect 62 1 57 0;
+#X connect 63 0 59 0;
+#X connect 64 0 63 0;
+#X connect 65 0 63 0;
+#X connect 66 0 65 0;
+#X connect 66 1 67 0;
+#X connect 67 0 63 0;
+#X connect 68 0 66 0;
+#X connect 69 0 55 1;
+#X connect 69 0 54 1;
+#X connect 70 0 30 0;
+#X connect 70 0 33 0;
+#X connect 70 0 34 0;
+#X connect 70 0 29 0;
+#X connect 70 0 42 0;
+#X restore 1201 348 pd high-e-string;
+#N canvas 475 48 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X obj 160 172 +~ 1606;
+#X obj 159 148 *~ 1000;
+#X obj 116 229 vcf~ 15;
+#X obj 148 264 *~ 6;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 14 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 17 0;
+#X connect 11 0 15 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 9 0;
+#X connect 15 0 10 0;
+#X connect 17 0 2 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 289 253 pd gopluckyourself;
+#X obj 48 162 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 43 117 1;
+#X msg 74 117 0;
+#X floatatom 74 80 5 0 0 0 - - -;
+#X obj 74 98 sel 0;
+#X obj 75 60 line 1 60000;
+#X msg 75 41 1 0 \, 0 60000;
+#X obj 48 188 switch~ 1;
+#N canvas 0 25 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 143 87 delwrite~ \$0-a-pick-position 100;
+#X obj 141 116 delread~ \$0-a-pick-position 3;
+#X connect 0 0 3 0;
+#X connect 0 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 15 0 3 1;
+#X restore 473 280 pd pick-position;
+#X floatatom 588 254 5 0 0 0 - - -;
+#X text 619 252 in ms;
+#N canvas 475 48 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X obj 160 172 +~ 1928;
+#X obj 159 148 *~ 1800;
+#X obj 117 229 vcf~ 20;
+#X obj 148 264 *~ 5.21739;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 14 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 17 0;
+#X connect 11 0 15 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 9 0;
+#X connect 15 0 10 0;
+#X connect 17 0 2 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 473 253 pd gopluckyourself;
+#N canvas 0 25 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 143 87 delwrite~ \$0-d-pick-position 100;
+#X obj 141 116 delread~ \$0-d-pick-position 3;
+#X connect 0 0 3 0;
+#X connect 0 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 15 0 3 1;
+#X restore 654 280 pd pick-position;
+#X floatatom 769 254 5 0 0 0 - - -;
+#X text 800 252 in ms;
+#N canvas 481 71 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X obj 160 172 +~ 2314;
+#X obj 159 148 *~ 3240;
+#X obj 117 229 vcf~ 25;
+#X obj 148 264 *~ 4.53686;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 14 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 17 0;
+#X connect 11 0 15 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 9 0;
+#X connect 15 0 10 0;
+#X connect 17 0 2 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 654 253 pd gopluckyourself;
+#N canvas 0 25 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 143 87 delwrite~ \$0-g-pick-position 100;
+#X obj 141 116 delread~ \$0-g-pick-position 3;
+#X connect 0 0 3 0;
+#X connect 0 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 15 0 3 1;
+#X restore 836 283 pd pick-position;
+#X floatatom 951 257 5 0 0 0 - - -;
+#X text 982 255 in ms;
+#N canvas 469 25 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X obj 160 172 +~ 2777;
+#X obj 159 148 *~ 5832;
+#X obj 117 229 vcf~ 30;
+#X obj 148 264 *~ 3.9451;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 14 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 17 0;
+#X connect 11 0 15 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 9 0;
+#X connect 15 0 10 0;
+#X connect 17 0 2 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 835 256 pd gopluckyourself;
+#N canvas 6 48 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 143 87 delwrite~ \$0-b-pick-position 100;
+#X obj 141 116 delread~ \$0-b-pick-position 3;
+#X connect 0 0 3 0;
+#X connect 0 0 14 0;
+#X connect 2 0 15 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 15 0 3 1;
+#X restore 1016 285 pd pick-position;
+#X floatatom 1131 259 5 0 0 0 - - -;
+#X text 1162 257 in ms;
+#N canvas 475 48 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 1
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X obj 160 172 +~ 3333;
+#X obj 159 148 *~ 10498;
+#X obj 117 229 vcf~ 35;
+#X obj 147 265 *~ 3.43052;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 14 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 17 0;
+#X connect 11 0 15 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 9 0;
+#X connect 15 0 10 0;
+#X connect 17 0 2 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 1016 258 pd gopluckyourself;
+#N canvas 0 25 1016 656 pick-position 0;
+#X obj 81 21 inlet~;
+#X obj 80 267 outlet~;
+#X obj 171 20 inlet position;
+#X obj 81 216 -~;
+#X obj 15 21 inlet bang;
+#X obj -4 226 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg -9 181 1;
+#X msg 22 181 0;
+#X floatatom 31 135 5 0 0 0 - - -;
+#X obj 31 153 sel 0;
+#X obj 1 64 t b b;
+#X msg 31 97 1 0 \, 0 40;
+#X obj 31 116 line 1 40;
+#X obj -4 247 switch~ 16;
+#X obj 141 116 delread~ \$0-high-e-pick-position 3;
+#X obj 143 87 delwrite~ \$0-high-e-pick-position 100;
+#X connect 0 0 3 0;
+#X connect 0 0 15 0;
+#X connect 2 0 14 0;
+#X connect 3 0 1 0;
+#X connect 4 0 10 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 10 0 11 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 14 0 3 1;
+#X restore 1199 287 pd pick-position;
+#X floatatom 1313 261 5 0 0 0 - - -;
+#X text 1344 259 in ms;
+#N canvas 469 25 445 656 gopluckyourself 0;
+#X obj 62 57 noise~;
+#X obj 104 -43 inlet bang;
+#X obj 129 412 outlet~;
+#X obj 241 148 tgl 15 0 empty empty empty 0 -6 0 10 -262144 -1 -1 0
+1;
+#X msg 236 103 1;
+#X msg 267 103 0;
+#X floatatom 326 81 5 0 0 0 - - -;
+#X obj 326 99 sel 0;
+#X obj 214 -7 t b b b;
+#X obj 143 57 vline~;
+#X obj 128 312 *~;
+#X obj 15 126 clip~ -1 1;
+#X obj 143 88 *~;
+#X obj 14 83 *~ 5;
+#X obj 50 248 *~ 0.1;
+#X obj 241 168 switch~ 64;
+#X obj 129 350 *~ 0.2;
+#X msg 142 37 1 1 0 \, 0 9 1;
+#X obj 160 172 +~ 4000;
+#X obj 159 148 *~ 18896;
+#X obj 116 229 vcf~ 40;
+#X obj 147 264 *~ 2.98306;
+#X msg 326 43 1 0 \, 0 15;
+#X obj 326 62 line 1 15;
+#X connect 0 0 13 0;
+#X connect 1 0 8 0;
+#X connect 3 0 15 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 22 0;
+#X connect 8 1 17 0;
+#X connect 8 2 4 0;
+#X connect 9 0 12 0;
+#X connect 9 0 12 1;
+#X connect 10 0 16 0;
+#X connect 11 0 14 0;
+#X connect 11 0 20 0;
+#X connect 12 0 19 0;
+#X connect 12 0 21 0;
+#X connect 13 0 11 0;
+#X connect 14 0 10 0;
+#X connect 16 0 2 0;
+#X connect 17 0 9 0;
+#X connect 18 0 20 1;
+#X connect 19 0 18 0;
+#X connect 20 0 10 0;
+#X connect 21 0 10 1;
+#X connect 22 0 23 0;
+#X connect 23 0 6 0;
+#X restore 1198 260 pd gopluckyourself;
+#N canvas 0 0 450 300 convert-and-trigger 0;
+#N canvas 0 0 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 422 102 pd convert-and-trigger;
+#N canvas 0 0 450 300 convert-and-trigger 0;
+#N canvas 0 0 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 644 100 pd convert-and-trigger;
+#N canvas 0 0 450 300 convert-and-trigger 0;
+#N canvas 0 0 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 854 99 pd convert-and-trigger;
+#N canvas 0 0 450 300 convert-and-trigger 0;
+#N canvas 0 0 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 1006 99 pd convert-and-trigger;
+#N canvas 0 0 450 300 convert-and-trigger 0;
+#N canvas 0 0 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 1188 99 pd convert-and-trigger;
+#N canvas 6 47 450 300 convert-and-trigger 0;
+#N canvas 6 47 450 300 midi-to-delay-length 0;
+#X obj 33 51 mtof;
+#X obj 33 71 expr 1000/$f1;
+#X obj 33 31 inlet;
+#X obj 33 92 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X restore 89 126 pd midi-to-delay-length;
+#X obj 45 16 inlet;
+#X obj -1 261 outlet bang;
+#X obj 45 66 t b b f;
+#X obj 71 261 outlet pluck-bang;
+#X obj 179 261 outlet delay-length;
+#X connect 0 0 5 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 1 2 0;
+#X connect 3 2 0 0;
+#X restore 160 99 pd convert-and-trigger;
+#X obj 423 -88 t b l b;
+#X obj 748 483 *~ 0.75;
+#X obj 407 405 line~;
+#X obj 392 428 *~;
+#X msg 407 385 \$1 5;
+#N canvas 362 177 1003 663 ----------pipe-assignment---------- 0;
+#X obj 115 -484 packel 1;
+#X obj 212 -484 packel 2;
+#X obj 288 -484 packel 3;
+#X obj 380 -484 packel 4;
+#X obj 475 -484 packel 5;
+#X obj 589 -484 packel 6;
+#X symbolatom 127 -464 10 0 0 0 - - -;
+#X floatatom 79 -466 5 0 0 0 - - -;
+#X obj 79 -450 moses 1;
+#X floatatom 85 -282 5 0 0 0 - - -;
+#X symbolatom 224 -448 10 0 0 0 - - -;
+#X floatatom 175 -448 5 0 0 0 - - -;
+#X obj 175 -432 moses 1;
+#X floatatom 214 -283 5 0 0 0 - - -;
+#X symbolatom 318 -431 10 0 0 0 - - -;
+#X floatatom 271 -430 5 0 0 0 - - -;
+#X obj 271 -414 moses 1;
+#X floatatom 268 -281 5 0 0 0 - - -;
+#X symbolatom 415 -410 10 0 0 0 - - -;
+#X floatatom 367 -412 5 0 0 0 - - -;
+#X obj 367 -396 moses 1;
+#X floatatom 347 -280 5 0 0 0 - - -;
+#X symbolatom 511 -392 10 0 0 0 - - -;
+#X floatatom 463 -394 5 0 0 0 - - -;
+#X obj 463 -378 moses 1;
+#X floatatom 426 -279 5 0 0 0 - - -;
+#X symbolatom 609 -374 10 0 0 0 - - -;
+#X floatatom 561 -376 5 0 0 0 - - -;
+#X obj 561 -360 moses 1;
+#X floatatom 509 -277 5 0 0 0 - - -;
+#X obj 599 -192 int;
+#X obj 627 -192 + 1;
+#X floatatom 596 -168 5 0 0 0 - - -;
+#X msg 599 -212 0;
+#X obj 32 -217 spigot;
+#X msg 42 -261 1;
+#X msg 70 -261 0;
+#X msg 596 -148 set \$1;
+#X msg 594 -118 0 37 p p p 55 p;
+#X msg 678 -219 add2 \$1;
+#X msg 669 -293 symbol x;
+#X obj 611 -331 t b b b;
+#X obj 502 -346 t b b b;
+#X obj 400 -366 t b b b;
+#X obj 301 -384 t b b b;
+#X obj 216 -406 t b b b;
+#X obj 93 -423 t b b b;
+#X obj 293 -522 t b a a a a a a;
+#X obj 594 -96 route 0 1 2 3 4 5;
+#X obj 58 -541 inlet bang;
+#X obj 316 -546 inlet list;
+#N canvas 0 0 450 300 assign0 0;
+#X obj 95 -113 packel 1;
+#X obj 149 -113 packel 2;
+#X obj 203 -113 packel 3;
+#X obj 257 -113 packel 4;
+#X obj 311 -113 packel 5;
+#X obj 365 -113 packel 6;
+#X floatatom 2 -95 5 0 0 0 - - -;
+#X obj 2 -79 moses 1;
+#X floatatom 90 -77 5 0 0 0 - - -;
+#X obj 90 -61 moses 1;
+#X floatatom 175 -59 5 0 0 0 - - -;
+#X obj 175 -43 moses 1;
+#X floatatom 259 -41 5 0 0 0 - - -;
+#X obj 259 -25 moses 1;
+#X floatatom 343 -23 5 0 0 0 - - -;
+#X obj 343 -7 moses 1;
+#X floatatom 427 -5 5 0 0 0 - - -;
+#X obj 427 11 moses 1;
+#X obj 241 -155 inlet list;
+#X obj 71 40 outlet;
+#X obj 113 40 outlet;
+#X obj 155 40 outlet;
+#X obj 197 40 outlet;
+#X obj 239 40 outlet;
+#X obj 281 40 outlet;
+#X connect 0 0 6 0;
+#X connect 1 0 8 0;
+#X connect 2 0 10 0;
+#X connect 3 0 12 0;
+#X connect 4 0 14 0;
+#X connect 5 0 16 0;
+#X connect 6 0 7 0;
+#X connect 7 1 19 0;
+#X connect 8 0 9 0;
+#X connect 9 1 20 0;
+#X connect 10 0 11 0;
+#X connect 11 1 21 0;
+#X connect 12 0 13 0;
+#X connect 13 1 22 0;
+#X connect 14 0 15 0;
+#X connect 15 1 23 0;
+#X connect 16 0 17 0;
+#X connect 17 1 24 0;
+#X connect 18 0 0 0;
+#X connect 18 0 1 0;
+#X connect 18 0 2 0;
+#X connect 18 0 3 0;
+#X connect 18 0 4 0;
+#X connect 18 0 5 0;
+#X restore 434 -64 pd assign0;
+#N canvas 0 25 1016 656 assign1 0;
+#X obj 95 -113 packel 1;
+#X obj 149 -113 packel 2;
+#X obj 203 -113 packel 3;
+#X obj 257 -113 packel 4;
+#X obj 311 -113 packel 5;
+#X floatatom 2 -95 5 0 0 0 - - -;
+#X obj 2 -79 moses 1;
+#X floatatom 90 -77 5 0 0 0 - - -;
+#X obj 90 -61 moses 1;
+#X floatatom 175 -59 5 0 0 0 - - -;
+#X obj 175 -43 moses 1;
+#X floatatom 259 -41 5 0 0 0 - - -;
+#X obj 259 -25 moses 1;
+#X floatatom 343 -23 5 0 0 0 - - -;
+#X obj 343 -7 moses 1;