#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;