iamyou-radio/iamyou/wav~.pd
2022-07-15 00:48:34 +09:00

137 lines
3.5 KiB
Text

#N canvas 506 89 771 708 10;
#X obj 317 310 table \$0-sound 8820;
#X obj 41 402 soundfiler;
#X obj 164 182 f \$0;
#X obj 164 160 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 514 327 outlet~;
#X obj 41 182 list append;
#X msg 41 160 read -resize;
#X msg 41 270 read -resize somesound.wav;
#X obj 41 204 list prepend set;
#X obj 41 226 list trim;
#X obj 41 138 t b a;
#X obj 41 292 list append;
#X msg 41 380 read -resize somesound.wav 1005-sound;
#X obj 41 314 list prepend set;
#X obj 41 336 list trim;
#X obj 41 248 t b a;
#X obj 41 358 t b a;
#X obj 164 138 loadbang;
#X text 636 581 dianaband;
#X obj 54 52 inlet;
#X obj 630 327 outlet;
#X msg 164 204 \$1-sound;
#X text 39 24 (1) filename;
#X obj 41 424 sel 0;
#X obj 41 106 t a a;
#X obj 280 636 print [wav~];
#X msg 64 496 error: cannot load the file!;
#X obj 369 485 samplerate~;
#X obj 346 507 /;
#X text 3 -26 .anchor.;
#X msg 346 529 length: \$1 seconds;
#X msg 323 551 samples: \$1 ea;
#X obj 482 166 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 319 280 sound loads to ...;
#X text 317 611 messages to post ...;
#X obj 482 122 inlet;
#X text 481 94 (2) play start!;
#X obj 482 245 sel 0;
#X msg 192 74 error: file should be loaded first!!;
#X obj 514 267 t b;
#X text 510 351 [1] audio;
#X text 630 351 [2] play-done;
#X text 636 601 2016;
#X text 692 681 .anchor.;
#X msg 108 106 error: file name should be a string!!;
#X obj 54 74 route float bang;
#X obj 250 196 list prepend;
#X msg 331 174 loading:;
#X obj 331 152 loadbang;
#X obj 250 218 list trim;
#X obj 514 289 tabplay~ \$0-sound;
#X obj 323 463 t a a b;
#X text 382 447 info. msg.;
#X obj 87 518 f \$0;
#X msg 87 540 \; \$1-sound resize 1 \; \$1-sound 0 0 \;;
#X obj 577 430 loadbang;
#X msg 577 452 0;
#X msg 41 608 0;
#X msg 73 608 1;
#X obj 73 446 t b a;
#X obj 41 474 t b b b;
#X text 580 404 loaded? check.;
#X floatatom 126 419 5 0 0 1 samples - -, f 5;
#X obj 577 474 v \$0-is-loaded;
#X obj 482 192 v \$0-is-loaded;
#X obj 41 636 v \$0-is-loaded;
#X floatatom 482 220 5 0 0 0 - - -, f 5;
#X text 318 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 23 0;
#X connect 1 0 62 0;
#X connect 2 0 21 0;
#X connect 3 0 2 0;
#X connect 5 0 8 0;
#X connect 6 0 5 0;
#X connect 7 0 11 0;
#X connect 8 0 9 0;
#X connect 9 0 15 0;
#X connect 10 0 6 0;
#X connect 10 1 5 1;
#X connect 11 0 13 0;
#X connect 12 0 1 0;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 7 0;
#X connect 15 1 7 0;
#X connect 16 0 12 0;
#X connect 16 1 12 0;
#X connect 17 0 3 0;
#X connect 19 0 45 0;
#X connect 21 0 11 1;
#X connect 23 0 60 0;
#X connect 23 1 59 0;
#X connect 24 0 10 0;
#X connect 24 1 46 0;
#X connect 26 0 25 0;
#X connect 27 0 28 1;
#X connect 28 0 30 0;
#X connect 30 0 25 0;
#X connect 31 0 25 0;
#X connect 32 0 64 0;
#X connect 35 0 32 0;
#X connect 37 0 38 0;
#X connect 37 1 39 0;
#X connect 38 0 25 0;
#X connect 39 0 50 0;
#X connect 44 0 25 0;
#X connect 45 0 44 0;
#X connect 45 1 44 0;
#X connect 45 2 24 0;
#X connect 46 0 49 0;
#X connect 47 0 46 1;
#X connect 48 0 47 0;
#X connect 49 0 25 0;
#X connect 50 0 4 0;
#X connect 50 1 20 0;
#X connect 51 0 31 0;
#X connect 51 1 28 0;
#X connect 51 2 27 0;
#X connect 53 0 54 0;
#X connect 55 0 56 0;
#X connect 56 0 63 0;
#X connect 57 0 65 0;
#X connect 58 0 65 0;
#X connect 59 0 58 0;
#X connect 59 1 51 0;
#X connect 60 0 57 0;
#X connect 60 1 26 0;
#X connect 60 2 53 0;
#X connect 64 0 66 0;
#X connect 66 0 37 0;
#X coords 0 708 1 707 170 60 0;