267 lines
7.3 KiB
Text
267 lines
7.3 KiB
Text
#N canvas 91 156 456 518 12;
|
|
#X obj 361 21 loadbang;
|
|
#X msg 361 51 \; pd dsp 1;
|
|
#X obj 21 22 r fromGodot\$0;
|
|
#X obj 21 46 list trim;
|
|
#X obj 199 467 dac~ 1 2;
|
|
#X obj 199 407 *~;
|
|
#X obj 217 120 unpack f f;
|
|
#X obj 58 301 *~;
|
|
#X obj 217 257 line~;
|
|
#X msg 217 233 \$1 100;
|
|
#X floatatom 217 170 5 0 0 0 - - - 0;
|
|
#X obj 160 303 switch~;
|
|
#X obj 160 279 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
|
|
#X obj 160 255 change;
|
|
#X text 117 148 switch on/off before 0 to stop startup pops, f 12;
|
|
#X obj 217 209 max 0;
|
|
#X obj 160 231 > -0.3;
|
|
#X obj 331 246 hsl 100 20 -1 1 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
|
|
#X obj 328 342 line~;
|
|
#X msg 328 318 \$1 100;
|
|
#X obj 328 271 expr ($f1 + 1)/8;
|
|
#X floatatom 328 295 5 0 0 0 - - - 0;
|
|
#N canvas 68 97 450 300 pan2~ 0;
|
|
#X obj 51 98 cos~;
|
|
#X obj 111 98 cos~;
|
|
#X obj 33 128 *~;
|
|
#X obj 93 128 *~;
|
|
#X obj 33 158 outlet~;
|
|
#X obj 93 158 outlet~;
|
|
#X obj 33 24 inlet~;
|
|
#X obj 111 24 inlet~;
|
|
#X obj 111 74 +~ 0.75;
|
|
#X connect 0 0 2 1;
|
|
#X connect 1 0 3 1;
|
|
#X connect 2 0 4 0;
|
|
#X connect 3 0 5 0;
|
|
#X connect 6 0 2 0;
|
|
#X connect 6 0 3 0;
|
|
#X connect 7 0 8 0;
|
|
#X connect 7 0 0 0;
|
|
#X connect 8 0 1 0;
|
|
#X restore 199 437 pd pan2~;
|
|
#X floatatom 328 152 5 0 0 0 - - - 0;
|
|
#X obj 328 175 sin;
|
|
#X floatatom 328 199 5 0 0 0 - - - 0;
|
|
#X obj 21 70 route preset gain panvol;
|
|
#N canvas 613 355 561 460 wave 0;
|
|
#X obj 24 16 inlet;
|
|
#X obj 24 340 outlet~;
|
|
#N canvas 68 97 766 684 wav2 0;
|
|
#X obj 265 300 table \$0-sound 8820;
|
|
#X obj 29 402 soundfiler;
|
|
#X obj 152 182 f \$0;
|
|
#X obj 152 160 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
|
|
#X obj 29 182 list append;
|
|
#X msg 29 160 read -resize;
|
|
#X msg 29 270 read -resize sound/01.wav;
|
|
#X obj 29 204 list prepend set;
|
|
#X obj 29 226 list trim;
|
|
#X obj 29 138 t b a;
|
|
#X obj 29 292 list append;
|
|
#X msg 29 380 read -resize sound/01.wav 1003-sound;
|
|
#X obj 29 314 list prepend set;
|
|
#X obj 29 336 list trim;
|
|
#X obj 29 248 t b a;
|
|
#X obj 29 358 t b a;
|
|
#X obj 152 138 loadbang;
|
|
#X text 624 625 dianaband;
|
|
#X obj 42 52 inlet;
|
|
#X msg 152 204 \$1-sound;
|
|
#X text 27 24 (1) filename;
|
|
#X obj 29 424 sel 0;
|
|
#X obj 29 106 t a a;
|
|
#X obj 278 626 print [wav~];
|
|
#X msg 52 496 error: cannot load the file!;
|
|
#X obj 358 472 samplerate~;
|
|
#X obj 339 494 /;
|
|
#X msg 339 516 length: \$1 seconds;
|
|
#X msg 321 538 samples: \$1 ea;
|
|
#X text 267 270 sound loads to ...;
|
|
#X text 315 601 messages to post ...;
|
|
#X obj 470 102 inlet;
|
|
#X obj 422 182 sel 0;
|
|
#X msg 180 74 error: file should be loaded first!!;
|
|
#X text 559 401 [1] audio;
|
|
#X text 624 645 2016;
|
|
#X msg 96 106 error: file name should be a string!!;
|
|
#X obj 42 74 route float bang;
|
|
#X obj 238 196 list prepend;
|
|
#X msg 319 174 loading:;
|
|
#X obj 319 152 loadbang;
|
|
#X obj 238 218 list trim;
|
|
#X obj 75 518 f \$0;
|
|
#X msg 75 540 \; \$1-sound resize 1 \; \$1-sound 0 0 \;;
|
|
#X obj 565 474 loadbang;
|
|
#X msg 565 496 0;
|
|
#X msg 29 608 0;
|
|
#X msg 61 608 1;
|
|
#X obj 61 446 t b a;
|
|
#X obj 29 474 t b b b;
|
|
#X text 568 448 loaded? check.;
|
|
#X floatatom 114 421 5 0 0 1 s:0-samples - \$0-samples 0;
|
|
#X obj 565 518 v \$0-is-loaded;
|
|
#X obj 502 146 v \$0-is-loaded;
|
|
#X obj 29 636 v \$0-is-loaded;
|
|
#X floatatom 502 168 5 0 0 0 - - - 0;
|
|
#X obj 560 308 phasor~;
|
|
#X obj 560 330 *~;
|
|
#X floatatom 560 287 5 0 0 0 - - - 0;
|
|
#X obj 592 248 v \$0-playspeed_x1;
|
|
#X obj 560 265 *;
|
|
#X obj 560 226 t a b;
|
|
#X text 328 354 info. msg. / playback speed;
|
|
#X obj 321 383 t a a b b a;
|
|
#X obj 376 406 samplerate~;
|
|
#X obj 376 428 /;
|
|
#X obj 560 374 outlet~;
|
|
#X floatatom 630 316 5 0 0 2 r:0-samples \$0-samples - 0;
|
|
#X obj 376 450 v \$0-playspeed_x1;
|
|
#X obj 565 544 loadbang;
|
|
#X msg 565 566 0;
|
|
#X obj 565 588 v \$0-playspeed_x1;
|
|
#X text 469 74 (2) play speed : 1 for x1;
|
|
#X obj 470 124 t a b;
|
|
#X obj 470 207 spigot;
|
|
#X obj 509 187 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
|
|
#X obj 560 352 tabread~ \$0-sound;
|
|
#X text 637 123 (3) rewind!;
|
|
#X obj 640 148 inlet;
|
|
#X msg 640 190 0;
|
|
#X obj 640 170 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
|
|
#X text 306 14 NOTE!! filename will be searched relative to THIS patch's location. so copy and keep it nearby to the main patch. e.g. the very same folder or ./lib/ and use ../data/*.wav etc.;
|
|
#X connect 1 0 21 0;
|
|
#X connect 1 0 51 0;
|
|
#X connect 2 0 19 0;
|
|
#X connect 3 0 2 0;
|
|
#X connect 4 0 7 0;
|
|
#X connect 5 0 4 0;
|
|
#X connect 6 0 10 0;
|
|
#X connect 7 0 8 0;
|
|
#X connect 8 0 14 0;
|
|
#X connect 9 0 5 0;
|
|
#X connect 9 1 4 1;
|
|
#X connect 10 0 12 0;
|
|
#X connect 11 0 1 0;
|
|
#X connect 12 0 13 0;
|
|
#X connect 13 0 15 0;
|
|
#X connect 14 0 6 0;
|
|
#X connect 14 1 6 0;
|
|
#X connect 15 0 11 0;
|
|
#X connect 15 1 11 0;
|
|
#X connect 16 0 3 0;
|
|
#X connect 18 0 37 0;
|
|
#X connect 19 0 10 1;
|
|
#X connect 21 0 49 0;
|
|
#X connect 21 1 48 0;
|
|
#X connect 22 0 9 0;
|
|
#X connect 22 1 38 0;
|
|
#X connect 24 0 23 0;
|
|
#X connect 25 0 26 1;
|
|
#X connect 26 0 27 0;
|
|
#X connect 27 0 23 0;
|
|
#X connect 28 0 23 0;
|
|
#X connect 31 0 73 0;
|
|
#X connect 32 0 33 0;
|
|
#X connect 33 0 23 0;
|
|
#X connect 36 0 23 0;
|
|
#X connect 37 0 36 0;
|
|
#X connect 37 1 36 0;
|
|
#X connect 37 2 22 0;
|
|
#X connect 38 0 41 0;
|
|
#X connect 39 0 38 1;
|
|
#X connect 40 0 39 0;
|
|
#X connect 41 0 23 0;
|
|
#X connect 42 0 43 0;
|
|
#X connect 44 0 45 0;
|
|
#X connect 45 0 52 0;
|
|
#X connect 46 0 54 0;
|
|
#X connect 47 0 54 0;
|
|
#X connect 48 0 47 0;
|
|
#X connect 48 1 63 0;
|
|
#X connect 49 0 46 0;
|
|
#X connect 49 1 24 0;
|
|
#X connect 49 2 42 0;
|
|
#X connect 53 0 55 0;
|
|
#X connect 55 0 32 0;
|
|
#X connect 55 0 75 0;
|
|
#X connect 56 0 57 0;
|
|
#X connect 57 0 76 0;
|
|
#X connect 58 0 56 0;
|
|
#X connect 59 0 60 1;
|
|
#X connect 60 0 58 0;
|
|
#X connect 61 0 60 0;
|
|
#X connect 61 1 59 0;
|
|
#X connect 63 0 28 0;
|
|
#X connect 63 1 26 0;
|
|
#X connect 63 2 25 0;
|
|
#X connect 63 3 64 0;
|
|
#X connect 63 4 65 1;
|
|
#X connect 64 0 65 0;
|
|
#X connect 65 0 68 0;
|
|
#X connect 67 0 57 1;
|
|
#X connect 69 0 70 0;
|
|
#X connect 70 0 71 0;
|
|
#X connect 73 0 74 0;
|
|
#X connect 73 1 53 0;
|
|
#X connect 74 0 61 0;
|
|
#X connect 75 0 74 1;
|
|
#X connect 76 0 66 0;
|
|
#X connect 78 0 80 0;
|
|
#X connect 79 0 56 1;
|
|
#X connect 80 0 79 0;
|
|
#X restore 24 300 pd wav2;
|
|
#X obj 203 76 text define -k wavefiles\$0;
|
|
#A set sound/01.wav \; sound/02.wav \; sound/03.wav \; sound/04.wav \; sound/05.wav \; sound/06.wav \; sound/07.wav \; sound/08.wav \; sound/09.wav \; sound/10.wav \; sound/11.wav \;;
|
|
#X obj 24 100 text get wavefiles\$0;
|
|
#X floatatom 24 71 5 0 0 0 - - - 0;
|
|
#X text 87 280 (1) filename;
|
|
#X text 87 300 (2) play speed : 1 for x1;
|
|
#X text 87 320 (3) rewind!;
|
|
#X text 234 49 list of filenames;
|
|
#X text 357 237 or generate filenames;
|
|
#X obj 24 140 t b b a;
|
|
#X msg 47 166 1;
|
|
#X text 395 35 sound/01.wav \; sound/02.wav \; sound/03.wav \; sound/04.wav \; sound/05.wav \; sound/06.wav \; sound/07.wav \; sound/08.wav \; sound/09.wav \; sound/10.wav \; sound/11.wav \;;
|
|
#X obj 349 265 makefilename sound/%2d.wav;
|
|
#X connect 0 0 5 0;
|
|
#X connect 2 0 1 0;
|
|
#X connect 4 0 11 0;
|
|
#X connect 5 0 4 0;
|
|
#X connect 11 0 2 2;
|
|
#X connect 11 1 12 0;
|
|
#X connect 11 2 2 0;
|
|
#X connect 12 0 2 1;
|
|
#X restore 21 230 pd wave;
|
|
#X floatatom 76 100 5 0 0 0 - - - 0;
|
|
#X connect 2 0 3 0;
|
|
#X connect 3 0 26 0;
|
|
#X connect 5 0 22 0;
|
|
#X connect 6 0 10 0;
|
|
#X connect 6 1 23 0;
|
|
#X connect 7 0 5 0;
|
|
#X connect 8 0 5 1;
|
|
#X connect 9 0 8 0;
|
|
#X connect 10 0 15 0;
|
|
#X connect 10 0 16 0;
|
|
#X connect 12 0 11 0;
|
|
#X connect 13 0 12 0;
|
|
#X connect 15 0 9 0;
|
|
#X connect 16 0 13 0;
|
|
#X connect 17 0 20 0;
|
|
#X connect 18 0 22 1;
|
|
#X connect 19 0 18 0;
|
|
#X connect 20 0 21 0;
|
|
#X connect 21 0 19 0;
|
|
#X connect 22 0 4 0;
|
|
#X connect 22 1 4 1;
|
|
#X connect 23 0 24 0;
|
|
#X connect 24 0 25 0;
|
|
#X connect 25 0 17 0;
|
|
#X connect 26 0 27 0;
|
|
#X connect 26 1 28 0;
|
|
#X connect 26 2 6 0;
|
|
#X connect 27 0 7 0;
|
|
#X connect 28 0 7 1;
|