Commit 0269d47f authored by J Reso's avatar J Reso
Browse files

update audio-sampler pitch mode + fade, update synth-wobble + synth-bass, new video-rec to improve

parent fe7a46d2
#N canvas 252 84 945 605 10;
#N canvas 248 86 945 605 10;
#X declare -path ../../abstractions/in -path ../../abstractions/out
-path ../../abstractions/numbers -path ../../abstractions/video -path
../../abstractions/audio -path ../../abstractions/core -path ../../abstractions/brutbox
-path ../../abstractions/seq;
#X declare -path ../core;
#X declare -path ../core;
#X msg 370 24 \; pd dsp 1;
#X text 368 2 Audio on;
#X obj 178 94 tgl 15 0 empty empty rec 17 7 0 10 -262144 -1 -1 0 1
......@@ -13,8 +14,8 @@
#X obj 486 352 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X msg 198 189 size 2000;
#X obj 197 248 r \$0-to-rec;
#X floatatom 532 496 5 0 0 3 length(ms) - -;
#X obj 197 247 r \$0-to-rec;
#X floatatom 419 506 5 0 0 3 length(ms) - -;
#X obj 453 33 ../include;
#X obj 359 148 s \$0-to-rec;
#X obj 359 288 s \$0-to-rec;
......@@ -29,7 +30,7 @@
1;
#X text 351 350 #3 - PLAY SOUNDS;
#X floatatom 45 303 8 0 0 3 length(ms) - -;
#X obj 177 301 bng 15 250 50 0 empty empty end 0 20 0 10 -262144 -1
#X obj 178 302 bng 15 250 50 0 empty empty end 0 20 0 10 -262144 -1
-1;
#X floatatom 359 245 5 0 0 0 - - -;
#X msg 710 277 stop;
......@@ -48,9 +49,9 @@
#X obj 195 127 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X obj 353 413 audio-sampler \$0-SMP;
#X obj 419 507 count 4;
#X obj 419 482 flow;
#X obj 532 473 route length;
#X obj 533 449 count 4;
#X obj 533 424 flow;
#X obj 419 483 route length;
#N canvas 285 94 1029 492 _ALL_MESSAGES_ 0;
#X msg -788 228 auto-stop \$1;
#X obj -788 210 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
......@@ -136,10 +137,6 @@ the correct size which is unknown before recording) \; Default : 0
#X text 57 17 audio-rec????? \; -------------- \; 5O mono sounds \;
Fade in/out \, save \, normalize \; Argument \; \$1 :;
#X obj 45 264 audio-rec \$0-SMP 1000;
#X msg 516 432 smooth \$1;
#X obj 624 384 hsl 128 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 620 403 5 0 0 0 - - -;
#X obj 46 201 audio-in;
#X obj 359 199 seq-count 5 1000;
#X connect 2 0 45 1;
......@@ -148,7 +145,7 @@ Fade in/out \, save \, normalize \; Argument \; \$1 :;
#X connect 6 0 45 1;
#X connect 7 0 45 1;
#X connect 12 0 11 0;
#X connect 13 0 50 0;
#X connect 13 0 47 0;
#X connect 17 0 16 0;
#X connect 18 0 31 0;
#X connect 22 0 12 0;
......@@ -166,15 +163,12 @@ Fade in/out \, save \, normalize \; Argument \; \$1 :;
#X connect 35 0 45 1;
#X connect 36 0 35 0;
#X connect 37 0 3 0;
#X connect 37 1 39 0;
#X connect 37 2 40 0;
#X connect 37 1 40 0;
#X connect 37 2 39 0;
#X connect 38 0 5 0;
#X connect 39 0 38 0;
#X connect 40 0 8 0;
#X connect 45 0 20 0;
#X connect 45 1 21 0;
#X connect 46 0 37 1;
#X connect 47 0 48 0;
#X connect 48 0 46 0;
#X connect 49 0 45 0;
#X connect 50 0 22 0;
#X connect 46 0 45 0;
#X connect 47 0 22 0;
#N canvas 235 114 576 390 10;
#N canvas 225 119 576 390 10;
#X declare -path ../core;
#X obj 50 87 cnv 15 139 21 empty empty empty 20 12 1 9 -187776 -33289
0;
#X obj 180 87 tgl 10 0 \$0-on \$0-on-in empty 17 7 1 9 -187776 -33289
-33289 1 1;
-33289 0 1;
#X obj 160 87 bng 10 250 50 0 \$0-open \$0-open-in o 3 5 1 9 -187776
-33289 -33289;
#X obj 170 87 bng 10 250 50 0 \$0-save \$0-save-in s 3 5 1 9 -187776
......@@ -115,7 +115,7 @@
#X restore 50 223 pd \$0-TABLES;
#X text 48 145 AUDIO \; ---------------------;
#X text 231 47 COMMANDS \; ---------------------;
#N canvas 126 153 1083 589 \$0-COMMANDS 0;
#N canvas 120 156 1083 589 \$0-COMMANDS 0;
#X obj 22 -12 inlet;
#X obj 256 209 s \$0-loop-in;
#X obj 288 161 symbol;
......@@ -138,7 +138,7 @@
#X obj 387 388 s \$0-auto-pause;
#X obj 249 338 s \$0-reset;
#X obj 333 160 s \$0-save-file;
#N canvas 740 437 450 300 pitch 0;
#N canvas 736 439 450 300 pitch 0;
#X obj 51 120 expr $f1 \; if ($f1 < 0 \, ($f1*.5*.083333333)+1 \, ($f1*0.083333333)+1)
;
#X obj 51 79 expr $f1 \; if ($f1 < -12 \, $f1-(($f1+12)*.5) \, $f1)
......@@ -146,7 +146,7 @@
#X text 58 53 pitch command : changes speed by semitones;
#X obj 50 18 inlet;
#X obj 51 177 outlet;
#X connect 0 0 4 0;
#X connect 0 1 4 0;
#X connect 1 1 0 0;
#X connect 3 0 1 0;
#X restore 201 195 pd pitch;
......@@ -289,7 +289,7 @@ fade;
#X connect 73 7 74 0;
#X restore 234 108 pd \$0-COMMANDS;
#X obj 234 80 inlet;
#N canvas 94 480 330 287 \$0-PLAY 0;
#N canvas 92 480 330 287 \$0-PLAY 0;
#X obj 98 216 outlet~;
#X obj 97 194 hip~ 5;
#X obj 97 129 tabread4~;
......@@ -368,7 +368,7 @@ fade;
#X obj 337 453 sig~;
#X obj 436 453 sig~;
#X obj 337 381 tgl 15 0 empty empty empty 17 7 1 9 -187776 -33289 -33289
1 1;
0 1;
#X obj 337 359 r \$0-mode-scratch;
#X obj 322 558 outlet~;
#X obj 485 419 s \$0-phase;
......@@ -586,7 +586,7 @@ fade;
#X connect 66 0 8 0;
#X connect 67 0 37 0;
#X restore 117 90 pd \$0-PHASOR;
#N canvas 466 295 351 472 \$0-FADE 0;
#N canvas 464 295 351 472 \$0-FADE 0;
#X obj 98 121 -~ 0.5;
#X obj 97 200 clip~ -0.5 0.5;
#X obj 97 181 *~ 1;
......@@ -606,17 +606,14 @@ fade;
#X obj 98 100 inlet~;
#X obj 53 97 inlet~;
#X obj 53 419 *~;
#X obj 163 62 initbang;
#X obj 153 300 tgl 15 0 empty empty empty 17 7 1 9 -187776 -33289 -33289
1 1;
0 1;
#X obj 153 278 r \$0-mode-scratch;
#X obj 98 363 *~;
#X obj 114 340 sig~;
#X obj 114 319 == 0;
#X obj 153 363 sig~;
#X msg 205 80 20;
#X msg 163 82 50;
#X obj 252 85 r \$0-fade;
#X obj 163 81 r \$0-fade;
#X connect 0 0 4 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
......@@ -629,21 +626,18 @@ fade;
#X connect 9 0 11 0;
#X connect 10 0 9 0;
#X connect 11 0 8 0;
#X connect 12 0 22 0;
#X connect 12 0 21 0;
#X connect 16 0 0 0;
#X connect 17 0 18 0;
#X connect 18 0 13 0;
#X connect 19 0 27 0;
#X connect 20 0 24 0;
#X connect 20 0 25 0;
#X connect 21 0 20 0;
#X connect 22 0 18 1;
#X connect 23 0 22 1;
#X connect 24 0 23 0;
#X connect 25 0 18 1;
#X connect 26 0 10 0;
#X connect 27 0 10 0;
#X connect 28 0 10 0;
#X connect 19 0 23 0;
#X connect 19 0 24 0;
#X connect 20 0 19 0;
#X connect 21 0 18 1;
#X connect 22 0 21 1;
#X connect 23 0 22 0;
#X connect 24 0 18 1;
#X connect 25 0 10 0;
#X restore 97 152 pd \$0-FADE;
#N canvas 1 100 401 334 \$0-ONOFF 0;
#X obj 123 167 line~;
......@@ -691,11 +685,11 @@ fade;
#X connect 8 0 1 0;
#X restore 51 286 pd \$0-PLAY;
#X obj 114 87 nbx 4 10 -100 100 0 0 \$0-speed \$0-speed-in speed -28
5 1 9 -187776 -33289 -33289 1 256;
5 1 9 -187776 -33289 -33289 0 256;
#X obj 53 117 hsl 135 10 0 1 0 0 \$0-pos \$0-pos-in pos 1 6 1 9 -187776
-33289 -33289 0 1;
#X obj 150 87 tgl 10 0 \$0-loop \$0-loop-in L 3 6 1 9 -187776 -33289
-33289 1 1;
-33289 0 1;
#X obj 50 87 hradio 10 1 0 3 \$0-mode \$0-mode-in empty 0 -8 0 10 -187776
-1 -1 0;
#X obj 61 88 cnv 8 1 3 empty \$0-cnv-play  0 3 0 13 -187776 -1 0;
......@@ -841,8 +835,8 @@ fade;
#X connect 60 1 18 0;
#X connect 61 0 35 0;
#X restore 234 129 pd \$0-GUI-SAMPLER;
#N canvas 299 147 643 429 \$0-ARGS 0;
#X obj 20 13 initbang;
#N canvas 295 149 643 429 \$0-ARGS 0;
#X obj 220 114 initbang;
#X obj 289 171 samplerate~;
#X obj 289 195 s \$0-samplerate;
#X obj 254 219 s \$0-id-table;
......@@ -852,29 +846,29 @@ fade;
#X text 261 262 ms;
#X obj 220 139 t b b b b;
#X obj 237 241 s \$0-init-phasor;
#X msg 220 286 auto-play 0 \, auto-pause 0 \, auto-length 0 \, auto-update
1 \, loop 1 \, start 0 \, end 1 \, speed 1 \, rec-time \$1 \, size
\$1 \, mode 0 \, on 1 \, resize;
#X obj 141 213 symbol;
#X obj 66 236 select symbol;
#X obj 66 185 t b b;
#X obj 66 210 symbol \$1;
#X msg 44 291 snd-outside 1 \, snd-bank \$1;
#X obj 104 228 symbol;
#X obj 29 251 select symbol;
#X obj 29 200 t b b;
#X obj 29 225 symbol \$1;
#X msg 30 278 snd-outside 1 \, snd-bank \$1;
#X msg 220 286 fade 10 \, auto-play 0 \, auto-pause 0 \, auto-length
0 \, auto-update 1 \, loop 1 \, start 0 \, end 1 \, speed 1 \, rec-time
\$1 \, size \$1 \, mode 0 \, on 1 \, resize;
#X connect 0 0 8 0;
#X connect 1 0 2 0;
#X connect 4 0 3 0;
#X connect 6 0 10 0;
#X connect 6 0 15 0;
#X connect 8 0 6 0;
#X connect 8 0 13 0;
#X connect 8 0 12 0;
#X connect 8 1 9 0;
#X connect 8 2 4 0;
#X connect 8 3 1 0;
#X connect 10 0 5 0;
#X connect 11 0 12 1;
#X connect 12 1 15 0;
#X connect 13 0 14 0;
#X connect 13 1 11 0;
#X connect 14 0 12 0;
#X connect 10 0 11 1;
#X connect 11 1 14 0;
#X connect 12 0 13 0;
#X connect 12 1 10 0;
#X connect 13 0 11 0;
#X connect 14 0 5 0;
#X connect 15 0 5 0;
#X restore 278 83 pd \$0-ARGS;
#X obj 245 346 outlet;
......@@ -999,11 +993,11 @@ fade;
#X obj 180 97 tgl 10 0 \$0-auto-length \$0-auto-length-in C 2 6 1 9
-187776 -33289 -33289 0 1;
#X obj 180 107 tgl 10 0 \$0-auto-update \$0-auto-update-in U 2 6 1
9 -187776 -33289 -33289 1 1;
9 -187776 -33289 -33289 0 1;
#X obj 53 97 hsl 125 10 0 1 0 0 \$0-start \$0-start-in start 1 6 1
9 -187776 -33289 -33289 0 1;
#X obj 53 107 hsl 125 10 0 1 0 0 \$0-end \$0-end-in end 1 6 1 9 -187776
-33289 -33289 12400 1;
-33289 -33289 0 1;
#N canvas 44 99 1279 546 \$0-MODES-AUTO 0;
#X text 232 488 speed;
#X obj 357 305 r \$0-speed;
......
#N canvas 1 87 697 644 10;
#X declare -path ../numbers;
#N canvas 1 89 697 644 10;
#X declare -path ../core;
#X declare -path ../numbers;
#X declare -path ../../abstractions/in -path ../../abstractions/out
-path ../../abstractions/numbers -path ../../abstractions/video -path
../../abstractions/audio -path ../../abstractions/core -path ../../abstractions/brutbox
-path ../../abstractions/seq;
#X msg 559 109 \; pd dsp 1;
#X text 560 86 Audio on;
#X obj 129 151 audio-sampler;
......@@ -8,16 +12,14 @@
#X obj 85 590 dac~;
#X obj 292 321 mtof;
#X obj 295 302 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
-1 -1 7700 1;
#X text 135 612 // from Miller Puckette vocoder;
#X obj 128 519 vsl 15 40 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 0 1;
-1 -1 3900 1;
#X obj 85 458 audio-vocoder;
#X obj 83 103 adc~ 1;
#X obj 292 232 * 127;
#X obj 292 341 sig~;
#X obj 472 24 declare -path ../numbers;
#X obj 292 119 seq-machine;
#X text 141 62 Play a sound to test;
#X obj 292 257 notescale;
#X obj 402 130 mem vocoder.txt;
......@@ -26,21 +28,23 @@
#X text 75 11 audio-vocoder \; ------------ \; Vocoder effect \;;
#X msg 144 82 file ../../medias/sounds/voice.wav \, play;
#X obj 292 363 synth 4;
#X connect 2 0 18 1;
#X obj 292 119 seq-nb;
#X obj 472 24 ../include;
#X connect 2 0 16 1;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 5 0 12 0;
#X connect 6 0 5 0;
#X connect 8 0 3 1;
#X connect 9 0 19 0;
#X connect 9 0 17 0;
#X connect 9 0 3 0;
#X connect 10 0 18 0;
#X connect 11 0 16 0;
#X connect 12 0 22 0;
#X connect 14 0 11 0;
#X connect 14 2 17 0;
#X connect 16 0 6 0;
#X connect 17 0 14 1;
#X connect 18 0 9 0;
#X connect 21 0 2 1;
#X connect 22 0 9 1;
#X connect 10 0 16 0;
#X connect 11 0 14 0;
#X connect 12 0 20 0;
#X connect 14 0 6 0;
#X connect 15 0 21 1;
#X connect 16 0 9 0;
#X connect 19 0 2 1;
#X connect 20 0 9 1;
#X connect 21 0 11 0;
#X connect 21 2 15 0;
#N canvas 312 79 617 389 10;
#N canvas 417 155 617 389 10;
#X declare -path ../numbers;
#X obj 24 297 outlet~;
#X text 113 42 outlet audio~;
#X obj 431 127 inlet controls;
#X text 112 26 inlets trigger \, control \, add \, multiply;
#N canvas 336 79 892 688 bassdrum 0;
#X obj 635 324 vline~;
#X obj 351 411 *~;
#X obj 636 275 f;
#X obj 351 275 *~;
#X obj 351 128 f;
#X msg 351 160 1.4 \, 0 \$1;
#X obj 351 300 +~;
#X obj 400 70 delay 5;
#X msg 636 299 0 5 \, 1 3 5 \, 0 \$1 8;
#X obj 636 183 switch~;
#X msg 389 300 0.25;
#X msg 600 147 1;
#X obj 636 121 delay;
#X msg 636 147 0;
#X obj 206 426 *~;
#X obj 221 398 vline~;
#X obj 176 350 f;
#X obj 157 288 t b b b;
#X obj 336 494 +~;
#X obj 336 521 hip~ 10;
#X text 647 -29 decay;
#X text 192 203 noiz;
#X obj 381 655 outlet~;
#X obj 336 563 lop~ 1000;
#X obj 351 182 vline~;
#N canvas 474 79 891 688 bassdrum 0;
#X obj 625 454 vline~;
#X obj 231 541 *~;
#X obj 625 405 f;
#X obj 231 405 *~;
#X obj 231 258 f;
#X msg 231 290 1.4 \, 0 \$1;
#X obj 231 430 +~;
#X obj 288 199 delay 5;
#X msg 625 429 0 5 \, 1 3 5 \, 0 \$1 8;
#X obj 625 313 switch~;
#X msg 269 430 0.25;
#X obj 625 251 delay;
#X msg 625 277 0;
#X obj 86 556 *~;
#X obj 101 528 vline~;
#X obj 56 480 f;
#X obj 37 418 t b b b;
#X obj 216 624 +~;
#X obj 216 651 hip~ 10;
#X text 572 101 decay;
#X text 72 333 noiz;
#X obj 261 785 outlet~;
#X obj 216 693 lop~ 1000;
#X obj 231 312 vline~;
#N canvas 0 22 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
......@@ -53,9 +53,9 @@
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 387 484 pd rh_scalelog;
#X msg 434 460 100;
#X msg 480 460 10000;
#X restore 267 651 pd rh_scalelog;
#X msg 307 627 100;
#X msg 348 627 10000;
#N canvas 0 22 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
......@@ -80,7 +80,7 @@
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 651 69 pd rh_scalelog;
#X restore 640 199 pd rh_scalelog;
#N canvas 0 22 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
......@@ -105,11 +105,11 @@
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 246 28 pd rh_scalelog;
#X obj 651 -12 r \$0-decay;
#X msg 695 45 10;
#X obj 663 94 + 10;
#X msg 636 45 stop;
#X restore 126 158 pd rh_scalelog;
#X obj 640 120 r \$0-decay;
#X msg 680 175 10;
#X obj 652 224 + 10;
#X msg 625 175 stop;
#N canvas 1 79 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
......@@ -134,9 +134,9 @@
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 202 169 pd rh_scalelog;
#X msg 310 -2 1;
#X obj 387 413 r \$0-lowpass;
#X restore 82 299 pd rh_scalelog;
#X msg 166 128 1;
#X obj 267 580 r \$0-lowpass;
#N canvas 484 279 474 426 bd-makenoise 0;
#X obj 30 300 t b f;
#X obj 30 329 f;
......@@ -173,19 +173,19 @@
#X connect 6 0 1 1;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X restore 60 598 pd bd-makenoise;
#X obj 206 321 tabplay~ \$0-bassnoise;
#X msg 741 44 2000;
#X obj 400 94 t b b b;
#X obj 191 254 pow 4;
#X msg 221 367 0 1;
#X obj 451 -20 inlet;
#X obj 381 633 tanh~;
#X obj 351 206 expr~ pow($v1 \, 5);
#X obj 351 325 osc~;
#X obj 351 350 *~ 1;
#X obj 351 376 tanh~;
#X obj 430 230 r \$0-square;
#X restore 60 728 pd bd-makenoise;
#X obj 86 451 tabplay~ \$0-bassnoise;
#X msg 721 174 2000;
#X obj 288 223 t b b b;
#X obj 71 384 pow 4;
#X msg 101 497 0 1;
#X obj 364 12 inlet;
#X obj 261 763 tanh~;
#X obj 231 336 expr~ pow($v1 \, 5);
#X obj 231 455 osc~;
#X obj 231 480 *~ 1;
#X obj 231 506 tanh~;
#X obj 310 360 r \$0-square;
#N canvas 0 22 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
......@@ -210,179 +210,144 @@
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 430 300 pd rh_scalelog;
#X msg 520 274 1000;
#X msg 474 276 0.01;
#X obj 430 322 + 1;
#X obj 190 -18 r \$0-curvetime;
#X obj 202 82 r \$0-freq2;
#X msg 344 0 100;
#X msg 293 144 1000;
#X msg 246 146 1;
#X obj 245 118 r \$0-loadbang;
#X obj 310 -29 r \$0-loadbang;
#X obj 695 17 r \$0-loadbang;
#X obj 474 250 r \$0-loadbang;
#X obj 434 433 r \$0-loadbang;
#X obj 366 240 sig~;
#X obj 381 273 sig~;
#X obj 381 611 *~ 10;
#X obj 408 542 r \$0-gain;
#X obj 191 218 r \$0-noiselvl;
#X obj 374 21 r \$0-freq1;
#X obj 408 574 * 10;
#N canvas 0 22 462 312 rh_scalelog 0;
#X obj 20 155 exp;
#X obj 20 107 *;
#X obj 20 130 +;
#X obj 98 87 log;
#X obj 194 84 log;
#X obj 123 123 t b f;
#X obj 123 145 -;
#X obj 20 183 outlet;
#X obj 20 19 inlet;
#X obj 98 23 inlet;
#X obj 194 24 inlet;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 1 1;
#X connect 8 0 1 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X restore 595 603 pd rh_scalelog;
#X msg 639 579 0.01;
#X obj 639 553 r \$0-loadbang;
#X msg 685 577 10;
#X obj 595 572 * 1;
#X text 614 528 log pour volume? …peut etre pas utile…;
#X obj 359 82 f;
#X obj 451 1 t b b b b;
#X obj 536 -17 inlet float;
#X obj 536 4 t b f;
#X obj 168 138 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 1 256;
#X obj 206 472 env~;
#X obj 206 506 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
#X restore 310 430 pd rh_scalelog;
#X msg 391 405 1000;
#X msg 350 406 0.01;
#X obj 310 452 + 1;
#X obj 126 72 r \$0-curvetime;
#X obj 82 212 r \$0-freq2;
#X msg 200 130 100;
#X msg 173 274 1000;
#X msg 126 276 1;
#X obj 125 248 r \$0-loadbang;
#X obj 166 101 r \$0-loadbang;
#X obj 680 147 r \$0-loadbang;
#X obj 350 380 r \$0-loadbang;
#X obj 307 603 r \$0-loadbang;
#X obj 246 370 sig~;
#X obj 261 403 sig~;
#X obj 261 741 *~ 10;
#X obj 288 672 r \$0-gain;
#X obj 71 348 r \$0-noiselvl;
#X obj 276 127 r \$0-freq1;
#X obj 288 704 * 10;
#X obj 261 208 f;
#X obj 416 12 inlet float;
#X obj 416 33 t b f;
#X obj 48 268 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 86 602 env~;
#X obj 86 636 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 189 52 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 100 256;
#X obj 343 56 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 2 256;
#X obj 499 163 f;
#X obj 499 189 s \$0-freq1;
#X obj 487 99 r \$0-preset-name;
#X obj 491 134 b;
#X obj 83 191 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 443 70 s \$0-freq1;
#X obj 364 69 s \$0-trig;
#X obj 261 152 r \$0-trig;
#X obj 574 120 r \$0-trig;
#X obj 306 47 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 574 145 t b b b b;
#X msg 591 277 1;
#X obj 261 175 t b b;
#X connect 0 0 1 1;
#X connect 1 0 18 1;
#X connect 1 0 17 1;
#X connect 2 0 8 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 24 0;
#X connect 6 0 46 0;
#X connect 7 0 40 0;
#X connect 5 0 23 0;
#X connect 6 0 45 0;
#X connect 7 0 39 0;
#X connect 8 0 0 0;
#X connect 10 0 46 1;
#X connect 11 0 9 0;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 14 0 18 0;
#X connect 14 0 82 0;
#X connect 15 0 14 1;
#X connect 16 0 15 0;
#X connect 17 0 42 0;
#X connect 17 1 16 0;
#X connect 17 2 38 0;
#X connect 18 0 19 0;
#X connect 19 0 23 0;
#X connect 23 0 66 0;
#X connect 24 0 45 0;
#X connect 25 0 23 1;
#X connect 26 0 25 1;
#X connect 27 0 25 2;
#X connect 28 0 2 1;
#X connect 28 0 32 0;
#X connect 29 0 4 1;
#X connect 29 0 84 0;
#X connect 30 0 28 0;
#X connect 31 0 28 1;
#X connect 32 0 12 1;
#X connect 33 0 12 0;
#X connect 34 0 64 0;
#X connect 35 0 29 1;
#X connect 36 0 25 0;
#X connect 38 0 14 0;
#X connect 39 0 28 2;
#X connect 40 0 17 0;
#X connect 40 1 4 0;
#X connect 40 2 10 0;
#X connect 41 0 16 1;