doohoyi/sound-from-earth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
sound-from-earth/sound-from-earth-workshop/radio_spell_start_sensor.pd
Dooho Yi 9b4efabe24 init
2024-12-03 17:57:14 +01:00

968 lines
25 KiB
Text
Raw Permalink Blame History

#N canvas 584 44 919 953 10;
#N canvas 54 581 692 351 radio 1;
#X obj 333 282 spigot;
#X obj 382 267 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#N canvas 676 408 512 395 buildOSC 0;
#X obj 319 66 t a b;
#X msg 456 84 [;
#X msg 34 327 ];
#X obj 68 236 r X1;
#X obj 98 236 r X2;
#X obj 128 236 r X3;
#X obj 158 236 r X4;
#X obj 53 266 f;
#X obj 34 126 t b b a;
#X obj 254 345 outlet;
#X obj 140 17 inlet;
#X obj 188 236 r PS;
#X obj 88 284 pack f f f f f;
#X msg 319 112 sendtyped /note/onoff f \$1;
#X msg 254 141 sendtyped /note/velocity f \$1;
#X msg 88 307 sendtyped /note/x fffff \$1 \$2 \$3 \$4 \$5;
#X msg 73 199 sendtyped /note/id i \$1;
#X msg 167 170 sendtyped /note/pitch f \$1;
#X obj 140 39 unpack f f f f;
#X connect 0 0 13 0;
#X connect 0 1 1 0;
#X connect 1 0 9 0;
#X connect 2 0 9 0;
#X connect 3 0 7 1;
#X connect 4 0 12 1;
#X connect 5 0 12 2;
#X connect 6 0 12 3;
#X connect 7 0 12 0;
#X connect 8 0 2 0;
#X connect 8 1 7 0;
#X connect 8 2 16 0;
#X connect 10 0 18 0;
#X connect 11 0 12 4;
#X connect 12 0 15 0;
#X connect 13 0 9 0;
#X connect 14 0 9 0;
#X connect 15 0 9 0;
#X connect 16 0 9 0;
#X connect 17 0 9 0;
#X connect 18 0 8 0;
#X connect 18 1 17 0;
#X connect 18 2 14 0;
#X connect 18 3 0 0;
#X restore 413 286 pd buildOSC for all;
#X obj 112 210 o.io.slipserial;
#X msg 138 98 devices;
#X msg 209 98 close;
#X obj 112 189 packOSC;
#X obj 112 144 r OSC;
#X obj 112 231 unpackOSC;
#X obj 112 286 routeOSC /hello;
#X obj 112 309 s HELLO;
#X obj 19 171 print OSC;
#X obj 19 144 spigot;
#X obj 68 129 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 413 309 s OSC;
#X obj 413 255 r NOTE;
#X obj 333 309 print NOTE;
#X text 414 234 /id /pitch /velocity /onoff;
#X floatatom 636 254 5 0 0 0 - - - 0;
#X obj 636 276 s PS;
#X obj 629 169 tgl 16 0 empty empty hello 20 8 0 10 #9c00fc #f8fc00 #9c00fc 0 1;
#X obj 629 121 loadbang;
#X msg 629 142 1;
#X obj 629 196 sel 1;
#X obj 19 282 spigot;
#X obj 68 267 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 19 309 print HELLO;
#X text 14 12 * a wireless "field synth" - based on 'esp now' protocol, f 14;
#X msg 629 217 2000;
#X obj 215 262 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 258 98 devicename /dev/tty.SLAB_USBtoUART \, baud 57600 \, pollintervall 1 \, verbose 1;
#X floatatom 299 144 3 0 0 1 device\ id - - 0;
#X msg 299 164 open \$1 \, baud 57600 \, pollintervall 1 \, verbose 1;
#X obj 216 226 print info(\$0), f 8;
#X obj 226 303 outlet;
#X obj 209 15 inlet;
#X obj 209 36 tgl 16 0 empty empty empty 0 -8 0 10 #c6feff #000000 #000000 0 1;
#X obj 209 57 sel 0 1;
#X connect 0 0 16 0;
#X connect 1 0 0 1;
#X connect 2 0 14 0;
#X connect 3 0 8 0;
#X connect 3 1 29 0;
#X connect 3 2 33 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 3 0;
#X connect 7 0 6 0;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 24 0;
#X connect 12 0 11 0;
#X connect 13 0 12 1;
#X connect 15 0 0 0;
#X connect 15 0 2 0;
#X connect 18 0 19 0;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 22 0 20 0;
#X connect 23 0 28 0;
#X connect 23 1 18 0;
#X connect 24 0 26 0;
#X connect 25 0 24 1;
#X connect 28 0 18 0;
#X connect 29 0 34 0;
#X connect 30 0 3 1;
#X connect 31 0 32 0;
#X connect 32 0 3 1;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 5 0;
#X connect 37 1 30 0;
#X restore 11 52 pd radio;
#X obj 11 73 tgl 15 0 empty empty connected? 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 11 31 tgl 16 0 empty empty connect/disconnect 0 -8 0 10 #c6feff #000000 #000000 0 1;
#X obj 409 7 world universe;
#X obj 86 238 r HELLO;
#X obj 132 331 unpack f f f f;
#X floatatom 132 364 5 0 0 0 - - - 0;
#X obj 132 384 / 1024;
#X obj 160 405 - 0.5;
#X obj 160 426 * 2;
#X floatatom 132 447 5 0 0 0 - - - 0;
#X obj 133 500 vsl 16 136 0 1 0 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 179 464 * 1000;
#X obj 179 485 + 300;
#X floatatom 179 506 5 0 0 0 - - - 0;
#X obj 301 454 osc~;
#X obj 306 499 *~;
#X floatatom 345 476 5 0 0 0 - - - 0;
#X obj 345 441 loadbang;
#X obj 306 540 dac~;
#X obj 502 466 s NOTE;
#X obj 516 389 bng 16 250 50 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000;
#X obj 506 427 6666 1 100 100;
#X obj 51 352 print;
#X floatatom 212 371 5 0 0 0 - - - 0;
#X text 528 410 /id /pitch /velocity /onoff;
#X obj 387 200 radio_chant_taak;
#A saved resonant1 universe 0 0 0 0;
#X obj 475 669 s NOTE;
#X text 501 613 /id /pitch /velocity /onoff;
#X obj 567 675 print;
#X obj 479 630 pack f 12 100 0;
#X obj 87 286 route;
#X obj 137 58 select_wind;
#X obj 185 565 noise~;
#X obj 206 841 dac~;
#X obj 187 595 lop~ 200;
#X obj 169 655 *~ f;
#X obj 83 598 pow 2;
#X floatatom 256 593 5 0 0 0 - - - 0;
#X obj 322 586 hsl 128 15 0 1 0 1 empty empty 'roomsize' 20 8 0 10 #fcfcfc #fc8000 #000000 2758 0;
#X obj 337 629 hsl 128 15 0 2 0 1 empty empty damp 20 8 0 10 #fcfcfc #fc8000 #000000 2247 0;
#X floatatom 328 607 5 0 0 0 - - - 0;
#X floatatom 343 649 5 0 0 0 - - - 0;
#X obj 364 722 hsl 128 15 0 1 0 1 empty empty wet 20 8 0 10 #fcfcfc #fc8000 #000000 2700 0;
#X obj 352 672 hsl 128 15 0 1 0 1 empty empty dry 20 8 0 10 #fcfcfc #fc8000 #000000 2900 0;
#X floatatom 378 745 5 0 0 0 - - - 0;
#X floatatom 357 696 5 0 0 0 - - - 0;
#N canvas 92 310 634 321 vfreeverb~ 0;
#N canvas 261 41 778 367 combfilters-left1 0;
#X obj 46 244 +~;
#X obj 61 219 *~ 0.3;
#X obj 61 194 lop~ 1000;
#X obj 231 244 +~;
#X obj 246 219 *~ 0.3;
#X obj 246 194 lop~ 1000;
#X obj 429 218 *~ 0.3;
#X obj 429 193 lop~ 1000;
#X obj 414 241 +~;
#X obj 610 218 *~ 0.3;
#X obj 610 193 lop~ 1000;
#X obj 595 241 +~;
#X obj 61 141 delread~ \$0-comb1left;
#X obj 246 142 delread~ \$0-comb2left;
#X obj 429 141 delread~ \$0-comb3left;
#X obj 610 141 delread~ \$0-comb4left;
#X obj 46 268 delwrite~ \$0-comb1left 100;
#X obj 231 268 delwrite~ \$0-comb2left 100;
#X obj 414 267 delwrite~ \$0-comb3left 100;
#X obj 595 267 delwrite~ \$0-comb4left 100;
#X obj 61 97 r \$0-comb1left;
#X obj 246 97 r \$0-comb2left;
#X obj 429 95 r \$0-comb3left;
#X obj 610 96 r \$0-comb4left;
#X obj 112 170 r \$0-frequency;
#X obj 297 170 r \$0-frequency;
#X obj 480 167 r \$0-frequency;
#X obj 661 167 r \$0-frequency;
#X obj 46 28 inlet~;
#X obj 338 326 outlet~;
#X floatatom 70 119 5 0 0 0 - - - 0;
#X floatatom 255 121 5 0 0 0 - - - 0;
#X floatatom 439 119 5 0 0 0 - - - 0;
#X floatatom 622 121 5 0 0 0 - - - 0;
#X obj 279 58 clip 0 0.99;
#X obj 279 29 r \$0-room;
#X connect 0 0 16 0;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 3 0 17 0;
#X connect 4 0 3 1;
#X connect 5 0 4 0;
#X connect 6 0 8 1;
#X connect 7 0 6 0;
#X connect 8 0 18 0;
#X connect 9 0 11 1;
#X connect 10 0 9 0;
#X connect 11 0 19 0;
#X connect 12 0 2 0;
#X connect 12 0 29 0;
#X connect 13 0 5 0;
#X connect 13 0 29 0;
#X connect 14 0 7 0;
#X connect 14 0 29 0;
#X connect 15 0 10 0;
#X connect 15 0 29 0;
#X connect 20 0 12 0;
#X connect 20 0 30 0;
#X connect 21 0 13 0;
#X connect 21 0 31 0;
#X connect 22 0 14 0;
#X connect 22 0 32 0;
#X connect 23 0 15 0;
#X connect 23 0 33 0;
#X connect 24 0 2 1;
#X connect 25 0 5 1;
#X connect 26 0 7 1;
#X connect 27 0 10 1;
#X connect 28 0 0 0;
#X connect 28 0 3 0;
#X connect 28 0 8 0;
#X connect 28 0 11 0;
#X connect 34 0 1 1;
#X connect 34 0 4 1;
#X connect 34 0 6 1;
#X connect 34 0 9 1;
#X connect 35 0 34 0;
#X restore 15 100 pd combfilters-left1;
#N canvas 27 56 358 650 diffusor-left 0;
#X obj 51 107 *~ 0.5;
#X obj 36 132 +~;
#X obj 66 132 -~;
#X obj 36 26 inlet~;
#X obj 81 238 *~ 0.5;
#X obj 66 263 +~;
#X obj 96 263 -~;
#X obj 111 368 *~ 0.5;
#X obj 96 393 +~;
#X obj 126 393 -~;
#X obj 141 498 *~ 0.5;
#X obj 126 523 +~;
#X obj 156 523 -~;
#X obj 156 605 outlet~;
#X text 95 28 freeverb's diffusor;
#X obj 156 576 hip~ 5;
#X floatatom 214 70 5 0 0 0 - - - 0;
#X floatatom 246 203 5 0 0 0 - - - 0;
#X floatatom 280 334 5 0 0 0 - - - 0;
#X floatatom 304 464 5 0 0 0 - - - 0;
#X obj 51 53 r \$0-allpass1left;
#X obj 51 80 delread~ \$0-allpass1left;
#X obj 36 158 delwrite~ \$0-allpass1left 40;
#X obj 81 186 r \$0-allpass2left;
#X obj 81 211 delread~ \$0-allpass2left;
#X obj 66 290 delwrite~ \$0-allpass2left 40;
#X obj 111 317 r \$0-allpass3left;
#X obj 111 341 delread~ \$0-allpass3left;
#X obj 96 420 delwrite~ \$0-allpass3left 40;
#X obj 141 447 r \$0-allpass4left;
#X obj 141 471 delread~ \$0-allpass4left;
#X obj 126 550 delwrite~ \$0-allpass4left 40;
#X connect 0 0 1 1;
#X connect 1 0 22 0;
#X connect 2 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 5 1;
#X connect 5 0 25 0;
#X connect 6 0 8 0;
#X connect 6 0 9 1;
#X connect 7 0 8 1;
#X connect 8 0 28 0;
#X connect 9 0 11 0;
#X connect 9 0 12 1;
#X connect 10 0 11 1;
#X connect 11 0 31 0;
#X connect 12 0 15 0;
#X connect 15 0 13 0;
#X connect 20 0 16 0;
#X connect 20 0 21 0;
#X connect 21 0 0 0;
#X connect 21 0 2 0;
#X connect 23 0 17 0;
#X connect 23 0 24 0;
#X connect 24 0 4 0;
#X connect 24 0 6 0;
#X connect 26 0 18 0;
#X connect 26 0 27 0;
#X connect 27 0 7 0;
#X connect 27 0 9 0;
#X connect 29 0 19 0;
#X connect 29 0 30 0;
#X connect 30 0 10 0;
#X connect 30 0 12 0;
#X restore 15 168 pd diffusor-left;
#N canvas 312 366 778 367 combfilters-left2 0;
#X obj 46 244 +~;
#X obj 61 219 *~ 0.3;
#X obj 61 194 lop~ 1000;
#X obj 231 244 +~;
#X obj 246 219 *~ 0.3;
#X obj 246 194 lop~ 1000;
#X obj 429 218 *~ 0.3;
#X obj 429 193 lop~ 1000;
#X obj 414 241 +~;
#X obj 610 218 *~ 0.3;
#X obj 610 193 lop~ 1000;
#X obj 595 241 +~;
#X obj 112 170 r \$0-frequency;
#X obj 297 170 r \$0-frequency;
#X obj 480 167 r \$0-frequency;
#X obj 661 167 r \$0-frequency;
#X obj 46 28 inlet~;
#X obj 338 326 outlet~;
#X obj 61 90 r \$0-comb5left;
#X obj 61 141 delread~ \$0-comb5left;
#X obj 46 268 delwrite~ \$0-comb5left 100;
#X obj 246 90 r \$0-comb6left;
#X obj 246 142 delread~ \$0-comb6left;
#X obj 231 268 delwrite~ \$0-comb6left 100;
#X obj 429 88 r \$0-comb7left;
#X obj 429 141 delread~ \$0-comb7left;
#X obj 414 267 delwrite~ \$0-comb7left 100;
#X obj 610 89 r \$0-comb8left;
#X obj 610 141 delread~ \$0-comb8left;
#X obj 595 267 delwrite~ \$0-comb8left 100;
#X floatatom 70 116 5 0 0 0 - - - 0;
#X floatatom 261 118 5 0 0 0 - - - 0;
#X floatatom 440 117 5 0 0 0 - - - 0;
#X floatatom 620 116 5 0 0 0 - - - 0;
#X obj 279 58 clip 0 0.99;
#X obj 279 28 r \$0-room;
#X connect 0 0 20 0;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 3 0 23 0;
#X connect 4 0 3 1;
#X connect 5 0 4 0;
#X connect 6 0 8 1;
#X connect 7 0 6 0;
#X connect 8 0 26 0;
#X connect 9 0 11 1;
#X connect 10 0 9 0;
#X connect 11 0 29 0;
#X connect 12 0 2 1;
#X connect 13 0 5 1;
#X connect 14 0 7 1;
#X connect 15 0 10 1;
#X connect 16 0 0 0;
#X connect 16 0 3 0;
#X connect 16 0 8 0;
#X connect 16 0 11 0;
#X connect 18 0 19 0;
#X connect 18 0 30 0;
#X connect 19 0 2 0;
#X connect 19 0 17 0;
#X connect 21 0 22 0;
#X connect 21 0 31 0;
#X connect 22 0 5 0;
#X connect 22 0 17 0;
#X connect 24 0 25 0;
#X connect 24 0 32 0;
#X connect 25 0 7 0;
#X connect 25 0 17 0;
#X connect 27 0 28 0;
#X connect 27 0 33 0;
#X connect 28 0 10 0;
#X connect 28 0 17 0;
#X connect 34 0 1 1;
#X connect 34 0 4 1;
#X connect 34 0 6 1;
#X connect 34 0 9 1;
#X connect 35 0 34 0;
#X restore 36 134 pd combfilters-left2;
#N canvas 261 41 778 367 combfilters-right1 0;
#X obj 46 244 +~;
#X obj 61 219 *~ 0.3;
#X obj 61 194 lop~ 1000;
#X obj 231 244 +~;
#X obj 246 219 *~ 0.3;
#X obj 246 194 lop~ 1000;
#X obj 429 218 *~ 0.3;
#X obj 429 193 lop~ 1000;
#X obj 414 241 +~;
#X obj 610 218 *~ 0.3;
#X obj 610 193 lop~ 1000;
#X obj 595 241 +~;
#X obj 112 170 r \$0-frequency;
#X obj 297 170 r \$0-frequency;
#X obj 480 167 r \$0-frequency;
#X obj 661 167 r \$0-frequency;
#X obj 46 28 inlet~;
#X obj 338 326 outlet~;
#X floatatom 70 119 5 0 0 0 - - - 0;
#X floatatom 255 121 5 0 0 0 - - - 0;
#X floatatom 439 119 5 0 0 0 - - - 0;
#X floatatom 622 121 5 0 0 0 - - - 0;
#X obj 61 141 delread~ \$0-comb1right;
#X obj 246 142 delread~ \$0-comb2right;
#X obj 429 141 delread~ \$0-comb3right;
#X obj 610 141 delread~ \$0-comb4right;
#X obj 61 97 r \$0-comb1right;
#X obj 246 97 r \$0-comb2right;
#X obj 429 95 r \$0-comb3right;
#X obj 610 97 r \$0-comb4right;
#X obj 46 268 delwrite~ \$0-comb1right 100;
#X obj 231 268 delwrite~ \$0-comb2right 100;
#X obj 414 267 delwrite~ \$0-comb3right 100;
#X obj 595 267 delwrite~ \$0-comb4right 100;
#X obj 279 58 clip 0 0.99;
#X obj 279 28 r \$0-room;
#X connect 0 0 30 0;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 3 0 31 0;
#X connect 4 0 3 1;
#X connect 5 0 4 0;
#X connect 6 0 8 1;
#X connect 7 0 6 0;
#X connect 8 0 32 0;
#X connect 9 0 11 1;
#X connect 10 0 9 0;
#X connect 11 0 33 0;
#X connect 12 0 2 1;
#X connect 13 0 5 1;
#X connect 14 0 7 1;
#X connect 15 0 10 1;
#X connect 16 0 0 0;
#X connect 16 0 3 0;
#X connect 16 0 8 0;
#X connect 16 0 11 0;
#X connect 22 0 2 0;
#X connect 22 0 17 0;
#X connect 23 0 5 0;
#X connect 23 0 17 0;
#X connect 24 0 7 0;
#X connect 24 0 17 0;
#X connect 25 0 10 0;
#X connect 25 0 17 0;
#X connect 26 0 18 0;
#X connect 26 0 22 0;
#X connect 27 0 19 0;
#X connect 27 0 23 0;
#X connect 28 0 20 0;
#X connect 28 0 24 0;
#X connect 29 0 21 0;
#X connect 29 0 25 0;
#X connect 34 0 1 1;
#X connect 34 0 4 1;
#X connect 34 0 6 1;
#X connect 34 0 9 1;
#X connect 35 0 34 0;
#X restore 208 99 pd combfilters-right1;
#N canvas 312 366 778 367 combfilters-right2 0;
#X obj 46 244 +~;
#X obj 61 219 *~ 0.3;
#X obj 61 194 lop~ 1000;
#X obj 231 244 +~;
#X obj 246 219 *~ 0.3;
#X obj 246 194 lop~ 1000;
#X obj 429 218 *~ 0.3;
#X obj 429 193 lop~ 1000;
#X obj 414 241 +~;
#X obj 610 218 *~ 0.3;
#X obj 610 193 lop~ 1000;
#X obj 595 241 +~;
#X obj 112 170 r \$0-frequency;
#X obj 297 170 r \$0-frequency;
#X obj 480 167 r \$0-frequency;
#X obj 661 167 r \$0-frequency;
#X obj 46 28 inlet~;
#X obj 338 326 outlet~;
#X floatatom 70 116 5 0 0 0 - - - 0;
#X floatatom 261 118 5 0 0 0 - - - 0;
#X floatatom 440 117 5 0 0 0 - - - 0;
#X floatatom 620 116 5 0 0 0 - - - 0;
#X obj 279 58 clip 0 0.99;
#X obj 61 90 r \$0-comb5right;
#X obj 246 90 r \$0-comb6right;
#X obj 429 88 r \$0-comb7right;
#X obj 610 89 r \$0-comb8right;
#X obj 61 141 delread~ \$0-comb5right;
#X obj 246 142 delread~ \$0-comb6right;
#X obj 429 141 delread~ \$0-comb7right;
#X obj 610 141 delread~ \$0-comb8right;
#X obj 46 268 delwrite~ \$0-comb5right 100;
#X obj 231 268 delwrite~ \$0-comb6right 100;
#X obj 414 267 delwrite~ \$0-comb7right 100;
#X obj 595 267 delwrite~ \$0-comb8right 100;
#X obj 279 28 r \$0-room;
#X connect 0 0 31 0;
#X connect 1 0 0 1;
#X connect 2 0 1 0;
#X connect 3 0 32 0;
#X connect 4 0 3 1;
#X connect 5 0 4 0;
#X connect 6 0 8 1;
#X connect 7 0 6 0;
#X connect 8 0 33 0;
#X connect 9 0 11 1;
#X connect 10 0 9 0;
#X connect 11 0 34 0;
#X connect 12 0 2 1;
#X connect 13 0 5 1;
#X connect 14 0 7 1;
#X connect 15 0 10 1;
#X connect 16 0 0 0;
#X connect 16 0 3 0;
#X connect 16 0 8 0;
#X connect 16 0 11 0;
#X connect 22 0 1 1;
#X connect 22 0 4 1;
#X connect 22 0 6 1;
#X connect 22 0 9 1;
#X connect 23 0 18 0;
#X connect 23 0 27 0;
#X connect 24 0 19 0;
#X connect 24 0 28 0;
#X connect 25 0 20 0;
#X connect 25 0 29 0;
#X connect 26 0 21 0;
#X connect 26 0 30 0;
#X connect 27 0 2 0;
#X connect 27 0 17 0;
#X connect 28 0 5 0;
#X connect 28 0 17 0;
#X connect 29 0 7 0;
#X connect 29 0 17 0;
#X connect 30 0 10 0;
#X connect 30 0 17 0;
#X connect 35 0 22 0;
#X restore 225 133 pd combfilters-right2;
#N canvas 27 56 358 650 diffusor-right 0;
#X obj 51 107 *~ 0.5;
#X obj 36 132 +~;
#X obj 66 132 -~;
#X obj 36 26 inlet~;
#X obj 81 238 *~ 0.5;
#X obj 66 263 +~;
#X obj 96 263 -~;
#X obj 111 368 *~ 0.5;
#X obj 96 393 +~;
#X obj 126 393 -~;
#X obj 141 498 *~ 0.5;
#X obj 126 523 +~;
#X obj 156 523 -~;
#X obj 156 605 outlet~;
#X text 95 28 freeverb's diffusor;
#X obj 156 576 hip~ 5;
#X floatatom 214 70 5 0 0 0 - - - 0;
#X floatatom 244 203 5 0 0 0 - - - 0;
#X floatatom 280 334 5 0 0 0 - - - 0;
#X floatatom 304 464 5 0 0 0 - - - 0;
#X obj 51 53 r \$0-allpass1right;
#X obj 51 80 delread~ \$0-allpass1right;
#X obj 36 158 delwrite~ \$0-allpass1right 40;
#X obj 81 186 r \$0-allpass2right;
#X obj 81 211 delread~ \$0-allpass2right;
#X obj 66 290 delwrite~ \$0-allpass2right 40;
#X obj 111 317 r \$0-allpass3right;
#X obj 111 341 delread~ \$0-allpass3right;
#X obj 96 420 delwrite~ \$0-allpass3right 40;
#X obj 141 447 r \$0-allpass4right;
#X obj 141 471 delread~ \$0-allpass4right;
#X obj 126 550 delwrite~ \$0-allpass4right 40;
#X connect 0 0 1 1;
#X connect 1 0 22 0;
#X connect 2 0 5 0;
#X connect 2 0 6 1;
#X connect 3 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 5 1;
#X connect 5 0 25 0;
#X connect 6 0 8 0;
#X connect 6 0 9 1;
#X connect 7 0 8 1;
#X connect 8 0 28 0;
#X connect 9 0 11 0;
#X connect 9 0 12 1;
#X connect 10 0 11 1;
#X connect 11 0 31 0;
#X connect 12 0 15 0;
#X connect 15 0 13 0;
#X connect 20 0 16 0;
#X connect 20 0 21 0;
#X connect 21 0 0 0;
#X connect 21 0 2 0;
#X connect 23 0 17 0;
#X connect 23 0 24 0;
#X connect 24 0 4 0;
#X connect 24 0 6 0;
#X connect 26 0 18 0;
#X connect 26 0 27 0;
#X connect 27 0 7 0;
#X connect 27 0 9 0;
#X connect 29 0 19 0;
#X connect 29 0 30 0;
#X connect 30 0 10 0;
#X connect 30 0 12 0;
#X restore 208 169 pd diffusor-right;
#X obj 208 61 *~ 0.015;
#X obj 15 226 *~ 1;
#X obj 208 228 *~ 1;
#X obj 94 228 *~ 1;
#X obj 169 228 *~ 1;
#X obj 115 202 r \$0-dry;
#X obj 229 203 r \$0-wet;
#X obj 36 201 r \$0-wet;
#X obj 94 14 inlet~;
#X obj 208 14 inlet~;
#X obj 15 268 outlet~;
#X obj 169 269 outlet~;
#X obj 312 14 inlet;
#X obj 374 14 inlet;
#X obj 462 14 inlet;
#X obj 544 16 inlet;
#N canvas 0 22 207 207 room 0;
#X obj 32 35 inlet;
#X obj 32 63 * 0.28;
#X obj 32 94 + 0.7;
#X obj 32 160 outlet;
#X text 80 65 scaleroom;
#X text 76 94 offsetroom;
#X obj 47 126 s \$0-room;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X restore 312 45 pd room;
#N canvas 684 169 244 376 frequency 0;
#X obj 60 222 samplerate~;
#X obj 33 8 inlet;
#X obj 33 194 t f b;
#X obj 33 249 *;
#X obj 53 303 s \$0-frequency;
#X obj 33 327 outlet;
#X obj 33 64 * 0.4;
#X text 76 66 scaledamp;
#X obj 33 38 clip 0 2;
#X obj 33 90 t b f;
#X obj 33 141 -;
#X msg 33 116 1;
#X obj 33 168 abs;
#X obj 33 275 * 0.5;
#X text 153 303 for [lop~];
#X connect 0 0 3 1;
#X connect 1 0 8 0;
#X connect 2 0 3 0;
#X connect 2 1 0 0;
#X connect 3 0 13 0;
#X connect 6 0 9 0;
#X connect 8 0 6 0;
#X connect 9 0 11 0;
#X connect 9 1 10 1;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 2 0;
#X connect 13 0 5 0;
#X connect 13 0 4 0;
#X restore 374 45 pd frequency;
#N canvas 0 22 170 187 scalewet 0;
#X obj 22 42 inlet;
#X obj 22 143 outlet;
#X obj 22 73 * 3;
#X text 49 74 scalewet;
#X obj 40 112 s \$0-wet;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 2 0 4 0;
#X restore 544 45 pd scalewet;
#N canvas 0 22 220 198 scaledry 0;
#X obj 32 74 * 2;
#X obj 32 40 inlet;
#X obj 32 141 outlet;
#X text 58 75 scaledry;
#X obj 41 105 s \$0-dry;
#X connect 0 0 2 0;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X restore 462 45 pd scaledry;
#X floatatom 312 70 5 0 0 0 - - - 0;
#X floatatom 374 70 10 0 0 0 - - - 0;
#X floatatom 462 69 5 0 0 0 - - - 0;
#X floatatom 544 69 5 0 0 0 - - - 0;
#N canvas 405 27 635 684 tuning 0;
#X msg 332 81 1139 \, 1211 \, 1300 \, 1379 \, 1445 \, 1514 \, 1580 \, 1640;
#X text 72 57 combfilter tunings left;
#X text 377 56 combfilter tunings right;
#X text 71 360 allpass tunings left;
#X text 383 355 allpass tunings right;
#N canvas 243 170 195 233 sampstoms 0;
#X obj 27 21 inlet;
#X obj 54 86 samplerate~;
#X obj 27 111 /;
#X obj 27 57 t f b;
#X obj 27 136 * 1000;
#X obj 27 162 outlet;
#X connect 0 0 3 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X restore 30 107 pd sampstoms;
#X msg 30 82 1116 \, 1188 \, 1277 \, 1356 \, 1422 \, 1491 \, 1557 \, 1617;
#X obj 57 188 +;
#X msg 57 159 1;
#X obj 30 135 t f b;
#X obj 87 188 f;
#X obj 30 56 t b b;
#X msg 87 159 0;
#X obj 57 212 pack f \$0;
#X msg 57 238 \$2-comb\$1left;
#X obj 30 282 s;
#X obj 57 265 symbol;
#N canvas 0 22 195 233 sampstoms 0;
#X obj 27 21 inlet;
#X obj 54 86 samplerate~;
#X obj 27 111 /;
#X obj 27 57 t f b;
#X obj 27 136 * 1000;
#X obj 27 162 outlet;
#X connect 0 0 3 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X restore 332 107 pd sampstoms;
#X obj 359 188 +;
#X msg 359 159 1;
#X obj 332 135 t f b;
#X obj 389 188 f;
#X msg 389 159 0;
#X obj 359 212 pack f \$0;
#X obj 332 282 s;
#X obj 359 265 symbol;
#X obj 332 56 t b b;
#X msg 359 238 \$2-comb\$1right;
#X obj 30 360 t b b;
#N canvas 0 22 195 233 sampstoms 0;
#X obj 27 21 inlet;
#X obj 54 86 samplerate~;
#X obj 27 111 /;
#X obj 27 57 t f b;
#X obj 27 136 * 1000;
#X obj 27 162 outlet;
#X connect 0 0 3 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X restore 30 411 pd sampstoms;
#X obj 57 492 +;
#X msg 57 463 1;
#X obj 30 439 t f b;
#X obj 87 492 f;
#X msg 87 463 0;
#X obj 57 516 pack f \$0;
#X obj 30 586 s;
#X obj 57 569 symbol;
#X obj 334 356 t b b;
#N canvas 0 22 195 233 sampstoms 0;
#X obj 27 21 inlet;
#X obj 54 86 samplerate~;
#X obj 27 111 /;
#X obj 27 57 t f b;
#X obj 27 136 * 1000;
#X obj 27 162 outlet;
#X connect 0 0 3 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X restore 334 407 pd sampstoms;
#X obj 361 488 +;
#X msg 361 459 1;
#X obj 334 435 t f b;
#X obj 391 488 f;
#X msg 391 459 0;
#X obj 361 512 pack f \$0;
#X obj 334 582 s;
#X obj 361 565 symbol;
#X obj 30 22 loadbang;
#X obj 332 27 loadbang;
#X obj 30 334 loadbang;
#X obj 334 331 loadbang;
#X obj 268 41 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X msg 30 386 225 \, 556 \, 441 \, 341;
#X msg 334 380 248 \, 579 \, 464 \, 364;
#X msg 57 542 \$2-allpass\$1left;
#X msg 361 539 \$2-allpass\$1right;
#X text 27 624 Original Freeverb delay line lengths are converted to milliseconds \, based on samplerate.;
#X connect 0 0 17 0;
#X connect 5 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 10 0;
#X connect 7 0 13 0;
#X connect 8 0 7 0;
#X connect 9 0 15 0;
#X connect 9 1 8 0;
#X connect 10 0 7 1;
#X connect 11 0 6 0;
#X connect 11 1 12 0;
#X connect 12 0 10 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 16 0 15 1;
#X connect 17 0 20 0;
#X connect 18 0 21 0;
#X connect 18 0 23 0;
#X connect 19 0 18 0;
#X connect 20 0 24 0;
#X connect 20 1 19 0;
#X connect 21 0 18 1;
#X connect 22 0 21 0;
#X connect 23 0 27 0;
#X connect 25 0 24 1;
#X connect 26 0 0 0;
#X connect 26 1 22 0;
#X connect 27 0 25 0;
#X connect 28 0 53 0;
#X connect 28 1 34 0;
#X connect 29 0 32 0;
#X connect 30 0 33 0;
#X connect 30 0 35 0;
#X connect 31 0 30 0;
#X connect 32 0 36 0;
#X connect 32 1 31 0;
#X connect 33 0 30 1;
#X connect 34 0 33 0;
#X connect 35 0 55 0;
#X connect 37 0 36 1;
#X connect 38 0 54 0;
#X connect 38 1 44 0;
#X connect 39 0 42 0;
#X connect 40 0 43 0;
#X connect 40 0 45 0;
#X connect 41 0 40 0;
#X connect 42 0 46 0;
#X connect 42 1 41 0;
#X connect 43 0 40 1;
#X connect 44 0 43 0;
#X connect 45 0 56 0;
#X connect 47 0 46 1;
#X connect 48 0 11 0;
#X connect 49 0 26 0;
#X connect 50 0 28 0;
#X connect 51 0 38 0;
#X connect 52 0 11 0;
#X connect 52 0 28 0;
#X connect 52 0 26 0;
#X connect 52 0 38 0;
#X connect 53 0 29 0;
#X connect 54 0 39 0;
#X connect 55 0 37 0;
#X connect 56 0 47 0;
#X restore 410 141 pd tuning;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 6 0 3 0;
#X connect 6 0 0 0;
#X connect 6 0 4 0;
#X connect 6 0 2 0;
#X connect 7 0 16 0;
#X connect 8 0 17 0;
#X connect 9 0 16 0;
#X connect 10 0 17 0;
#X connect 11 0 10 1;
#X connect 11 0 9 1;
#X connect 12 0 8 1;
#X connect 13 0 7 1;
#X connect 14 0 6 0;
#X connect 14 0 9 0;
#X connect 15 0 6 0;
#X connect 15 0 10 0;
#X connect 18 0 22 0;
#X connect 19 0 23 0;
#X connect 20 0 25 0;
#X connect 21 0 24 0;
#X connect 22 0 26 0;
#X connect 23 0 27 0;
#X connect 24 0 29 0;
#X connect 25 0 28 0;
#X restore 234 758 pd vfreeverb~;
#X text 393 808 Katja Vetter May 2012;
#X text 394 777 Freeverb implemented with Pd vanilla objects;
#X obj 638 198 radio_chant_roller;
#A saved rollo universe 1 1 0.1 0.5;
#X obj 744 488 lfo, f 15;
#X floatatom 758 401 5 0 0 0 - - - 0;
#X floatatom 755 545 5 0 0 0 - - - 0;
#X floatatom 762 722 5 0 0 0 - - - 0;
#X obj 697 734 vsl 16 136 100 300 0 0 empty empty empty 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 758 637 rescale 100 300;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 4 0 31 0;
#X connect 5 1 6 0;
#X connect 5 2 24 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 10 0 11 0;
#X connect 10 0 12 0;
#X connect 10 0 37 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 15 0 16 0;
#X connect 16 0 19 0;
#X connect 16 0 19 1;
#X connect 17 0 16 1;
#X connect 18 0 17 0;
#X connect 21 0 22 0;
#X connect 22 0 20 0;
#X connect 30 0 27 0;
#X connect 30 0 29 0;
#X connect 31 0 5 0;
#X connect 31 0 23 0;
#X connect 32 0 31 1;
#X connect 33 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 47 1;
#X connect 36 0 47 0;
#X connect 37 0 36 1;
#X connect 38 0 35 1;
#X connect 39 0 41 0;
#X connect 39 0 47 2;
#X connect 40 0 42 0;
#X connect 40 0 47 3;
#X connect 43 0 45 0;
#X connect 43 0 47 5;
#X connect 44 0 46 0;
#X connect 44 0 47 4;
#X connect 47 0 34 0;
#X connect 47 1 34 1;
#X connect 51 0 53 0;
#X connect 52 0 51 0;
#X connect 53 0 56 0;
#X connect 54 0 55 0;
#X connect 56 0 54 0;
Reference in a new issue View git blame Copy permalink