sound-parade/puredata/floating-world-sub.pd
2022-12-01 14:43:46 +09:00

335 lines
8.8 KiB
Text

#N canvas 0 33 939 603 12;
#X text 18 16 walker sound-parade/20220116-195752-26b5bfd0-76bb-11ec-a028-edb46eb87eb5/audio.wav
;
#X msg 17 491 \; pd-data3 clear;
#N canvas 800 447 638 300 storage 1;
#X restore 19 82 pd storage;
#N canvas 196 114 615 428 noise 0;
#X obj 84 300 else/f2s~ 50;
#X obj 134 331 else/f2s~ 50;
#X msg 84 219 1 \$1;
#X obj 84 244 unpack f f;
#X obj 147 170 expr ($f1/180) * pi;
#X floatatom 147 140 5 0 0 1 deg - - 0;
#X obj 147 99 line;
#X floatatom 185 292 5 0 0 1 spread - - 0;
#X msg 185 267 -0.7;
#X obj 185 242 loadbang;
#X obj 34 26 noise~;
#X obj 34 51 hip~ 50;
#X obj 34 76 lop~ 250;
#X obj 34 101 lop~ 250;
#X obj 34 393 dac~ 1 2 3 4 5 6 7 8;
#X obj 147 18 inlet;
#X obj 84 269 else/pol2car;
#X obj 34 362 else/pan8~, f 22;
#X obj 34 242 *~;
#X obj 52 161 line~;
#X msg 52 136 \$1 5000;
#X obj 345 49 else/pi 1;
#X obj 345 75 v pi;
#X msg 147 68 -45 \, 315 10000;
#X obj 147 43 metro 180000;
#X obj 273 18 inlet;
#X connect 0 0 17 1;
#X connect 1 0 17 2;
#X connect 2 0 3 0;
#X connect 3 0 16 0;
#X connect 3 1 16 1;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 7 0 17 3;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 18 0;
#X connect 15 0 20 0;
#X connect 15 0 24 0;
#X connect 16 0 0 0;
#X connect 16 1 1 0;
#X connect 17 0 14 0;
#X connect 17 1 14 1;
#X connect 17 2 14 2;
#X connect 17 3 14 3;
#X connect 17 4 14 4;
#X connect 17 5 14 5;
#X connect 17 6 14 6;
#X connect 17 7 14 7;
#X connect 18 0 17 0;
#X connect 19 0 18 1;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 23 0 6 0;
#X connect 24 0 23 0;
#X connect 25 0 23 0;
#X restore 678 356 pd noise panning;
#X obj 678 330 tgl 15 0 empty empty KEEP\\\ SPKRS\\\ AWAKE 17 7 0 10
#fcfcfc #000000 #000000 0 1;
#X obj 805 341 bng 15 250 50 0 empty empty ! 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 27 319 loadbang;
#X msg 27 344 \; pd dsp 1;
#N canvas 608 33 760 670 archive 0;
#X obj 20 70 vu 20 80 empty empty -1 -8 0 10 #404040 #000000 1 0;
#X obj 19 20 env~;
#X obj 19 44 - 100;
#X obj 70 70 vu 20 80 empty empty -1 -8 0 10 #404040 #000000 1 0;
#X obj 69 20 env~;
#X obj 69 44 - 100;
#X obj 120 70 vu 20 80 empty empty -1 -8 0 10 #404040 #000000 1 0;
#X obj 119 20 env~;
#X obj 119 44 - 100;
#X obj 170 70 vu 20 80 empty empty -1 -8 0 10 #404040 #000000 1 0;
#X obj 169 20 env~;
#X obj 169 44 - 100;
#N canvas 812 185 513 527 stuff 0;
#X obj 182 285 pointer;
#X obj 175 456 append template3 x y w h q;
#X obj 168 48 loadbang;
#X obj 159 106 t b b b;
#X msg 182 237 traverse pd-data3;
#X msg 205 140 \; pd-data3 clear;
#X msg 138 154 0;
#X obj 85 180 f;
#X obj 124 181 + 1;
#X obj 87 156 until;
#X obj 144 236 t b;
#X msg 159 78 bang;
#X obj 382 382 random 1000;
#X obj 159 22 inlet;
#X obj 182 314 trigger bang bang pointer;
#X obj 239 406 + 20;
#X obj 311 406 + 20;
#X obj 158 408 + 10;
#X obj 311 382 random 30;
#X obj 239 382 random 30;
#X obj 77 382 random 590;
#X text 360 342 canvas size 640x350;
#X obj 158 382 random 290;
#X obj 95 416 640;
#X obj 105 210 sel 1;
#X connect 0 0 14 0;
#X connect 2 0 11 0;
#X connect 3 0 9 0;
#X connect 3 1 4 0;
#X connect 3 1 6 0;
#X connect 3 2 5 0;
#X connect 4 0 0 0;
#X connect 6 0 7 1;
#X connect 7 0 8 0;
#X connect 7 0 24 0;
#X connect 8 0 7 1;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 3 0;
#X connect 12 0 1 4;
#X connect 13 0 11 0;
#X connect 14 0 20 0;
#X connect 14 0 23 0;
#X connect 14 1 12 0;
#X connect 14 1 18 0;
#X connect 14 1 19 0;
#X connect 14 1 22 0;
#X connect 14 2 1 5;
#X connect 15 0 1 2;
#X connect 16 0 1 3;
#X connect 17 0 1 1;
#X connect 18 0 16 0;
#X connect 19 0 15 0;
#X connect 22 0 17 0;
#X connect 23 0 1 0;
#X connect 24 0 9 1;
#X connect 24 1 10 0;
#X restore 254 82 pd stuff;
#X msg 254 31 remake;
#X text 278 56 <= click to randomize;
#X floatatom 558 380 5 0 0 0 - - - 0;
#X obj 558 355 + 5000;
#X obj 558 160 hradio 15 1 0 5 empty empty empty 0 -8 0 10 #fcfcfc
#000000 #000000 0;
#X obj 558 180 sel 0 1 2 3 4;
#X msg 575 233 10000;
#X msg 558 132 set \$1;
#X msg 593 259 20000;
#X msg 610 286 30000;
#X msg 628 313 60000;
#X msg 558 208 0;
#X obj 558 91 random 5;
#X obj 558 30 retro 5000 25000;
#X obj 54 285 v n;
#X obj 22 240 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000;
#X obj 22 260 t b b;
#X obj 22 434 s ask;
#X obj 100 220 r post;
#X msg 22 409 get \$1;
#X obj 100 251 makefilename sound-parade/%s/audio.wav;
#X obj 22 335 f;
#X obj 58 335 + 1;
#X obj 22 360 mod;
#X floatatom 54 310 5 0 0 0 - - - 0;
#X floatatom 22 385 5 0 0 0 - - - 0;
#X obj 116 175 retro 5000 25000;
#X obj 137 443 else/dir;
#X obj 137 590 list store;
#X obj 107 575 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 137 504 list prepend append;
#X obj 137 529 list trim;
#X obj 137 351 bng 15 250 50 0 empty empty update\\\ list 17 7 0 10
#fcfcfc #000000 #000000;
#X obj 137 371 t b b;
#X obj 221 449 v n;
#X floatatom 172 474 5 0 0 1 n - - 0;
#X obj 137 615 s post;
#X obj 234 553 r ask;
#X obj 137 320 loadbang;
#X msg 137 412 open /home/doohoyi/Downloads/sound-parade \, dump \,
n;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X connect 13 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 24 0;
#X connect 18 1 19 0;
#X connect 18 2 21 0;
#X connect 18 3 22 0;
#X connect 18 4 23 0;
#X connect 19 0 16 0;
#X connect 20 0 17 0;
#X connect 21 0 16 0;
#X connect 22 0 16 0;
#X connect 23 0 16 0;
#X connect 24 0 16 0;
#X connect 25 0 20 0;
#X connect 26 0 25 0;
#X connect 27 0 37 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 1 27 0;
#X connect 31 0 33 0;
#X connect 32 0 30 0;
#X connect 34 0 35 0;
#X connect 34 0 36 0;
#X connect 35 0 34 1;
#X connect 36 0 38 0;
#X connect 37 0 36 1;
#X connect 38 0 32 0;
#X connect 39 0 28 0;
#X connect 40 0 43 0;
#X connect 40 2 48 0;
#X connect 41 0 49 0;
#X connect 42 0 41 0;
#X connect 43 0 44 0;
#X connect 44 0 41 0;
#X connect 45 0 46 0;
#X connect 46 0 52 0;
#X connect 46 1 41 1;
#X connect 48 0 47 0;
#X connect 50 0 41 0;
#X connect 51 0 45 0;
#X connect 52 0 40 0;
#X restore 16 568 pd archive;
#N canvas 798 33 640 350 data3 1;
#X restore 39 434 pd data3;
#N canvas 861 486 512 300 template3 0;
#X obj 48 98 filledpolygon q 0 1 0 0 w 0 w h 0 h;
#X text 44 53 five numeric ("float") fields;
#X text 48 118 drawing a rectangle \, interior color q \, border black
and one unit thick \, through the points (0 \, 0) \, (w \, 0) \, (w
\, h) \, and (0 \, h). Note that the three points containing variables
become hot spots for mouse dragging.;
#X obj 46 33 struct template3 float x float y float w float h float
q;
#X restore 39 459 pd template3;
#X obj 18 122 netreceive 3000;
#X msg 542 55 connect 192.168.43.3 3000;
#X obj 542 80 netsend;
#X floatatom 615 23 5 0 0 0 - - - 0;
#X msg 136 92 listen 10000;
#X msg 750 30 disconnect \, connect localhost 10001, f 18;
#X obj 18 206 v keep_spkrs_alive;
#X obj 639 226 v keep_spkrs_alive;
#X obj 639 171 metro 1000;
#X obj 639 126 loadbang;
#X obj 639 151 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
#000000 0 1;
#X msg 639 251 send alive_ack \$1;
#X obj 166 325 unpack s f;
#X msg 233 375 add2 \$1;
#X obj 166 406 list prepend add2;
#X obj 166 431 list trim;
#X obj 166 456 t b a;
#X msg 198 507 \; pd-storage obj 100 100 walker 0 20000 sound-parade/20221118-125020-1f36eca0-66f4-11ed-ba7e-b56ea38413bb/audio.wav
;
#X msg 279 431 set \, addsemi \, add2 pd-storage obj 100 100 walker
;
#X obj 233 350 t f b b;
#X msg 256 481 add2 \$1;
#X floatatom 256 457 5 0 0 0 - - - 0;
#X msg 371 374 set \$1;
#X obj 371 324 loadbang;
#X msg 371 349 0.45;
#X obj 73 180 v gain_adjust;
#X obj 789 226 v gain_adjust;
#X floatatom 863 195 5 0 0 0 - - - 0;
#X msg 789 251 send gain_ack \$1;
#X obj 267 115 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 18 155 route alive gain newconn;
#X obj 678 298 change;
#X obj 440 108 list;
#X connect 4 0 3 0;
#X connect 5 0 3 1;
#X connect 6 0 7 0;
#X connect 11 0 41 0;
#X connect 12 0 13 0;
#X connect 14 0 13 0;
#X connect 15 0 11 0;
#X connect 16 0 13 0;
#X connect 18 0 22 0;
#X connect 18 0 42 0;
#X connect 19 0 18 0;
#X connect 19 0 37 0;
#X connect 20 0 21 0;
#X connect 21 0 19 0;
#X connect 22 0 13 0;
#X connect 23 0 25 0;
#X connect 23 1 30 0;
#X connect 24 0 28 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 27 1 28 0;
#X connect 29 0 28 0;
#X connect 30 0 24 0;
#X connect 30 1 32 0;
#X connect 30 2 29 0;
#X connect 31 0 28 0;
#X connect 32 0 31 0;
#X connect 33 0 32 0;
#X connect 34 0 35 0;
#X connect 35 0 33 0;
#X connect 37 0 33 0;
#X connect 37 0 38 0;
#X connect 37 0 39 0;
#X connect 39 0 13 0;
#X connect 40 0 12 0;
#X connect 41 0 17 0;
#X connect 41 1 36 0;
#X connect 41 2 40 0;
#X connect 41 3 23 0;
#X connect 41 3 43 0;
#X connect 42 0 4 0;
#X connect 43 0 13 0;