Re: [PD] reverse & variable speed soundplayback?

13 Dec 2006 · *~; #X msg 107 175 0 10; #X msg 37 175 0 , 1 5; #X obj 21 22 inlet~; #X obj 158 22 inlet~; #X obj 30 103 r $0-rec; #X obj 158 258 *


      i guess my questions were too vague--or just not challenging enough ;)
with my soundfile playback & recording abs (which uses lots of the rtc
[play-samp~]) (see below), i got stuck with reverse transposition (which i
separated in the controls): when i play a sample in reverse, the
transposition has no effect. the 'loop' function is time based (a delay
which is set to the duration of the loaded / recorded sound), the
'repeatbang' in loop mode does wait the complete 'transposed' time, iow the
sample-in-reverse plays back at normal speed but the time between bangs is
the time the transposed sample would take.
i'm afraid i don't really understand how to talk to [vline~] and / or
[tabread4~] and the maths involved in creating the messages. am i right that
in [0, 0 $1( the $1 sets the time for [vline~]? i've been trying things with
the length in milliseconds and the size of the array (for the starting
point), but no joy so far. could anyone point me to a way to better
understand these things?
...
i'm back.
...
...
no worries,
i'll be back...!   ;)
...
ok. small update. sorry for spamming and hijacking the thread robert
van hulzen.
--
#N canvas 48 22 975 695 10;
#X obj 311 193 cnv 15 408 28 empty empty $1 360 22 1 14 -2112 -262081
0;
#X obj 312 194 cnv 15 40 26 empty $0-reccv empty 250 22 1 14 -241291
-33289 0;
#X obj 476 616 outlet~;
#X obj 548 616 outlet~;
#X obj 358 195 bng 15 250 50 0 $0-load $0-load load -3 20 1 9 -262144
-1 -1;
#X obj 528 195 tgl 15 0 $0-loop $0-loop loop -1 20 1 9 -262144 -1
-1 1 1;
#X obj 380 195 nbx 3 15 0 100 0 0 $0-gain $0-gain gain 0 20 1 9 -262144
-1 -1 1 256;
#X obj 591 195 tgl 15 0 $0-rev $0-rev rev 2 20 1 9 -262144 -1 -1
0 1;
#X obj 414 86 loadbang;
#X obj 613 196 cnv 13 104 13 empty $0-splName AMENST.wav 2 7 1 9 -262081
-258112 0;
#X obj 540 22 inlet;
#X obj 580 22 inlet;
#X obj 620 22 inlet;
#X obj 414 195 tgl 15 0 $0-sens $0-sens sens -6 20 1 9 -262144 -1
-1 1 1;
#X obj 506 195 tgl 15 0 $0-pause $0-pause pse 0 20 1 9 -262144 -1
-1 0 1;
#X obj 550 195 nbx 4 15 1 1e+37 0 0 $0-transp $0-transp transp 4
20 1 9 -262144 -1 -1 77 256;
#X obj 660 22 inlet;
#X obj 700 22 inlet;
#X obj 382 22 inlet;
#X obj 436 195 hradio 15 1 0 3 $0-mode $0-mode tgl-1-poly -2 20 1
9 -262144 -1 -1 0;
#X obj 488 195 bng 15 250 50 0 $0-play $0-play play -4 20 1 9 -241291
-33289 -33289;
#X obj 425 22 inlet vel;
#X obj 315 195 bng 15 250 50 0 $0-rec $0-rec rec -1 20 1 9 -262144
-33289 -33289;
#X obj 333 195 bng 15 250 50 0 $0-recstop $0-recstop stop -2 20 1
9 -262144 -1 -1;
#N canvas 0 22 592 233 tables 0;
#N canvas 0 22 458 308 graph33 0;
#X array $1-lpl 307716 float 0;
#X coords 0 1 307715 -1 250 150 1;
#X restore 18 29 graph;
#N canvas 0 22 450 300 graph34 0;
#X array $1-lpr 307716 float 0;
#X coords 0 1 307715 -1 250 150 1;
#X restore 288 29 graph;
#X restore 70 176 pd tables;
#X obj 300 22 inlet load;
#X obj 300 48 s $0-loadinlet;
#X obj 206 22 inlet;
#X obj 253 22 inlet;
#X obj 70 22 inlet~;
#X obj 142 22 inlet~;
#N canvas 0 22 381 331 load 0;
#X obj 156 154 soundfiler;
#X obj 156 50 openpanel;
#X obj 136 180 makefilename %s;
#X msg 156 128 read -resize $1 $2 $3;
#X msg 136 232 label $1;
#X obj 156 102 list append $1-lpl $1-lpr;
#X obj 209 206 loadbang;
#X msg 209 232 label ---;
#X obj 136 206 stripdir;
#X obj 156 24 r $0-load;
#X obj 136 258 s $0-splName;
#X obj 21 154 unpack s s s s s;
#X msg 21 206 label rec...;
#X msg 21 258 label here&now;
#X obj 21 180 r $0-rec;
#X obj 21 232 r $0-recstop;
#X obj 46 76 r $0-loadinlet;
#X obj 166 76 s $0-loadlength;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 1 0 17 0;
#X connect 2 0 8 0;
#X connect 3 0 0 0;
#X connect 4 0 10 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 8 0 4 0;
#X connect 9 0 1 0;
#X connect 11 2 2 0;
#X connect 12 0 10 0;
#X connect 13 0 10 0;
#X connect 14 0 12 0;
#X connect 15 0 13 0;
#X connect 16 0 0 0;
#X connect 16 0 11 0;
#X restore 70 150 pd load;
#N canvas 0 22 310 444 recorder 0;
#X obj 37 202 line~;
#X obj 21 258 *~;
#X msg 107 175 0 10;
#X msg 37 175 0 , 1 5;
#X obj 21 22 inlet~;
#X obj 158 22 inlet~;
#X obj 30 103 r $0-rec;
#X obj 158 258 *~;
#X obj 98 103 r $0-recstop;
#X msg 54 258 bang;
#X msg 98 258 stop;
#X obj 158 294 tabwrite~ $1-lpr;
#X obj 21 294 tabwrite~ $1-lpl;
#X obj 30 129 t b b;
#X obj 98 129 t b b;
#X obj 54 346 timer;
#X obj 54 398 s $0-reclength;
#X obj 54 320 t b;
#X obj 97 320 t b;
#X obj 54 372 * 44.1;
#X connect 0 0 1 1;
#X connect 0 0 7 1;
#X connect 1 0 12 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 7 0;
#X connect 6 0 13 0;
#X connect 7 0 11 0;
#X connect 8 0 14 0;
#X connect 9 0 11 0;
#X connect 9 0 12 0;
#X connect 9 0 17 0;
#X connect 10 0 11 0;
#X connect 10 0 12 0;
#X connect 10 0 18 0;
#X connect 13 0 3 0;
#X connect 13 1 9 0;
#X connect 14 0 10 0;
#X connect 14 1 2 0;
#X connect 15 0 19 0;
#X connect 17 0 15 0;
#X connect 18 0 15 1;
#X connect 19 0 16 0;
#X restore 70 88 pd recorder;
#X obj 425 48 s $0-velinlet;
#X text 425 7 range=100;
#N canvas 7 22 213 285 loop 0;
#X obj 48 209 spigot 0;
#X obj 48 183 delay;
#X obj 15 183 t b;
#X obj 99 57 r $0-loop;
#X obj 48 21 inlet;
#X obj 48 235 outlet;
#X obj 58 105 select 0;
#X msg 58 131 stop;
#X obj 99 79 t f f;
#X obj 78 157 r $0-length-sec;
#X obj 48 57 t b;
#X connect 0 0 5 0;
#X connect 1 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 8 0;
#X connect 4 0 10 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
#X connect 8 0 0 1;
#X connect 8 1 6 0;
#X connect 9 0 1 1;
#X connect 10 0 1 0;
#X restore 415 332 pd loop;
#X obj 405 410 vline~;
#X obj 335 446 tabread4~ $1-lpl;
#X obj 372 472 tabread4~ $1-lpr;
#N canvas 439 304 274 276 pause 0;
#X obj 134 138 timer;
#X obj 134 164 * 44.1;
#X obj 164 60 sel 1;
#X obj 164 34 r $0-pause;
#X obj 164 112 t b;
#X obj 194 112 t b;
#X obj 61 34 inlet trigger;
#X obj 38 216 outlet pause;
#X obj 134 190 f;
#X floatatom 185 192 8 0 0 0 - - -;
#X floatatom 192 178 8 0 0 0 - - -;
#X floatatom 200 148 8 0 0 0 - - -;
#X obj 134 216 s $0-ct;
#X connect 0 0 1 0;
#X connect 0 0 11 0;
#X connect 1 0 8 1;
#X connect 1 0 10 0;
#X connect 2 0 4 0;
#X connect 2 0 7 0;
#X connect 2 1 5 0;
#X connect 3 0 2 0;
#X connect 4 0 0 1;
#X connect 5 0 8 0;
#X connect 6 0 0 0;
#X connect 8 0 9 0;
#X connect 8 0 12 0;
#X restore 347 358 pd pause;
#N canvas 36 122 480 566 trigger 0;
#X obj 83 91 s $0-cutoff;
#X obj 53 39 t b b;
#X obj 188 210 t a a;
#X obj 172 257 f;
#X obj 218 257 pow -1;
#X msg 83 65 0 2;
#X obj 53 117 delay 2;
#X obj 188 19 r $0-transp;
#X msg 277 71 1;
#X obj 277 45 sel 0;
#X msg 308 71 -1;
#X obj 277 19 r $0-rev;
#X obj 188 158 * 1;
#X obj 172 365 f 1;
#X obj 345 416 r $0-arraysize;
#X obj 218 283 moses 0;
#X obj 294 391 * 1e+07;
#X obj 294 365 f 1;
#X obj 294 443 pack 0 0;
#X msg 294 469 $2 , -4.41e+08 $1;
#X obj 310 339 abs;
#X obj 172 283 < 0;
#X obj 172 319 select 0 1;
#X obj 188 184 / 100;
#X obj 213 531 outlet phase;
#X obj 69 173 r $0- gain;
#X obj 53 199 f 1;
#X obj 188 133 f;
#X obj 271 97 t b a;
#X obj 318 97 t b a;
#X obj 172 391 * 1e+07;
#X obj 172 443 pack 0 1;
#X msg 172 469 $2 , 4.41e+08 $1;
#X msg 223 417 1;
#X obj 172 417 f;
#X obj 53 13 inlet;
#X obj 53 225 s $0-cutoff;
#X obj 53 391 t b b;
#X obj 75 339 s $0-cutoff;
#X msg 75 313 0 2;
#X obj 53 365 delay 2;
#X obj 69 421 r $0- gain;
#X obj 53 447 f 1;
#X obj 53 473 s $0-cutoff;
#X obj 53 143 t b b b;
#X obj 53 287 t b b a;
#X obj 90 261 r $0-start;
#X obj 29 261 r $0-ct;
#X connect 1 0 6 0;
#X connect 1 1 5 0;
#X connect 2 0 3 1;
#X connect 2 1 4 0;
#X connect 3 0 21 0;
#X connect 4 0 15 0;
#X connect 5 0 0 0;
#X connect 6 0 44 0;
#X connect 7 0 27 0;
#X connect 8 0 28 0;
#X connect 9 0 8 0;
#X connect 9 1 10 0;
#X connect 10 0 29 0;
#X connect 11 0 9 0;
#X connect 12 0 23 0;
#X connect 13 0 30 0;
#X connect 14 0 18 1;
#X connect 15 0 20 0;
#X connect 15 1 13 1;
#X connect 16 0 18 0;
#X connect 17 0 16 0;
#X connect 18 0 19 0;
#X connect 19 0 24 0;
#X connect 20 0 17 1;
#X connect 21 0 22 0;
#X connect 22 0 13 0;
#X connect 22 1 17 0;
#X connect 23 0 2 0;
#X connect 25 0 26 1;
#X connect 26 0 36 0;
#X connect 27 0 12 0;
#X connect 28 0 27 0;
#X connect 28 1 12 1;
#X connect 29 0 27 0;
#X connect 29 1 12 1;
#X connect 30 0 34 0;
#X connect 31 0 32 0;
#X connect 32 0 24 0;
#X connect 33 0 31 1;
#X connect 34 0 31 0;
#X connect 35 0 1 0;
#X connect 37 0 42 0;
#X connect 37 1 34 0;
#X connect 39 0 38 0;
#X connect 40 0 37 0;
#X connect 41 0 42 1;
#X connect 42 0 43 0;
#X connect 44 0 26 0;
#X connect 44 1 3 0;
#X connect 44 2 33 0;
#X connect 45 0 40 0;
#X connect 45 1 39 0;
#X connect 45 2 31 1;
#X connect 46 0 45 0;
#X connect 47 0 45 0;
#X restore 405 384 pd trigger;
#N canvas 726 139 365 441 length 0;
#X obj 26 196 s $0-arraysize;
#X obj 200 112 list prepend $1-lpl;
#X obj 210 48 list prepend $1-lpr;
#X msg 210 74 ; $1 resize $2;
#X msg 200 138 ; $1 resize $2;
#X obj 190 22 r $0-reclength;
#X obj 26 22 r $0-loadlength;
#X obj 190 196 s $0-arraysize;
#X obj 26 48 t b;
#X obj 26 150 arraysize $1-lpl;
#X obj 136 196 t a a;
#X obj 136 387 outlet;
#X obj 166 283 / 44.1;
#X obj 220 361 *;
#X obj 220 283 r $0-transp;
#X obj 220 335 f;
#X obj 166 309 t b a;
#X obj 220 309 expr 100/$f1;
#X obj 220 387 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 0;
#X connect 5 0 1 0;
#X connect 5 0 7 0;
#X connect 5 0 10 0;
#X connect 6 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 12 0;
#X connect 12 0 16 0;
#X connect 13 0 18 0;
#X connect 14 0 17 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 16 1 13 1;
#X connect 17 0 15 0;
#X restore 609 541 pd length;
#X obj 335 550 *~;
#X obj 372 550 *~;
#X obj 388 498 r $0-cutoff;
#X obj 420 244 demux 1 2 3;
#X text 548 230 based partly on rtc's [play-samp~];
#N canvas 0 22 199 224 stop 0;
#X obj 57 97 s $0-cutoff;
#X obj 27 45 t b b;
#X msg 57 71 0 2;
#X obj 27 123 delay 2;
#X obj 27 19 inlet;
#X msg 27 149 0 , 0 0;
#X obj 27 175 outlet;
#X connect 1 0 3 0;
#X connect 1 1 2 0;
#X connect 2 0 0 0;
#X connect 3 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X restore 325 384 pd stop;
#X obj 283 585 dac~;
#X obj 609 616 outlet length;
#X obj 747 22 inlet;
#X obj 747 48 s $0-cutoff;
#N canvas 36 366 301 209 vel 0;
#X obj 37 164 outlet~;
#X obj 98 164 outlet~;
#X obj 37 138 *~ 1;
#X obj 98 138 *~ 1;
#X obj 213 60 r $0-sens;
#X obj 138 34 r $0-velinlet;
#X obj 37 8 inlet~;
#X obj 98 8 inlet~;
#X obj 138 86 spigot 1;
#X obj 138 60 moses 101;
#X obj 138 112 / 100;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
#X connect 4 0 8 1;
#X connect 5 0 9 0;
#X connect 6 0 2 0;
#X connect 7 0 3 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 10 0 3 1;
#X connect 10 0 2 1;
#X restore 335 570 pd vel;
#N canvas 68 193 220 490 playtgl 0;
#X obj 13 434 s $0-playtgl;
#X msg 13 382 0;
#X obj 64 356 r $0-loop;
#X obj 64 382 == 0;
#X obj 13 408 spigot 1;
#X obj 23 70 r $0-length-sec;
#X obj 13 18 inlet;
#X obj 64 200 == 0;
#X obj 13 226 spigot 1;
#X obj 113 96 r $0-pause;
#X obj 113 122 t b f f;
#X obj 78 252 timer;
#X floatatom 161 281 5 0 0 0 - - -;
#X obj 13 356 delay;
#X obj 108 200 sel 1;
#X obj 62 330 -;
#X obj 13 122 delay;
#X obj 23 96 t a a;
#X obj 13 44 t b b b b b;
#X msg 24 330 0;
#X floatatom 167 343 5 0 0 0 - - -;
#X obj 78 278 t b a;
#X obj 62 304 int;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 0 0;
#X connect 5 0 17 0;
#X connect 6 0 18 0;
#X connect 7 0 8 1;
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 10 1 7 0;
#X connect 10 2 14 0;
#X connect 11 0 12 0;
#X connect 11 0 21 0;
#X connect 13 0 1 0;
#X connect 14 0 11 1;
#X connect 15 0 13 1;
#X connect 15 0 20 0;
#X connect 16 0 8 0;
#X connect 17 0 22 0;
#X connect 17 1 16 1;
#X connect 18 0 16 0;
#X connect 18 3 19 0;
#X connect 18 4 11 0;
#X connect 19 0 13 1;
#X connect 21 0 22 0;
#X connect 21 1 15 1;
#X connect 22 0 15 0;
#X restore 333 332 pd playtgl;
#X obj 347 296 t b b b b;
#X msg 424 112 1;
#X obj 424 138 t b a;
#X obj 388 524 vline~;
#X obj 550 164 * 100;
#X msg 506 164 0;
#X floatatom 619 567 8 0 0 0 - - -;
#X obj 325 245 tgl 15 0 $0-playtgl $0-playtgl empty -6 20 1 9 -262144
-1 -1 1 1;
#N canvas 0 22 340 382 poly 0;
#N canvas 0 22 488 758 trig1 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 41 123 s $0-co1;
#X obj 194 572 r $0-co1;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 96 21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 71 477 print;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 50 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 35 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 16 0 52 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 39 0;
#X connect 33 0 40 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 36 0 34 0;
#X connect 39 0 37 0;
#X connect 40 0 38 0;
#X connect 41 0 42 1;
#X connect 42 0 44 0;
#X connect 43 0 42 0;
#X connect 44 0 40 1;
#X connect 44 0 39 1;
#X connect 45 0 46 0;
#X connect 46 0 49 0;
#X connect 47 0 46 1;
#X connect 48 0 46 1;
#X connect 49 0 43 0;
#X connect 49 1 48 0;
#X connect 50 0 7 0;
#X connect 50 1 6 0;
#X connect 50 25 47 0;
#X connect 51 0 50 0;
#X restore 80 277 pd trig1;
#N canvas 0 22 484 754 trig2 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co2;
#X obj 194 572 r $0-co2;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 96 258 pd trig2;
#N canvas 0 22 484 754 trig3 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co3;
#X obj 194 572 r $0-co3;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 112 239 pd trig3;
#N canvas 0 22 484 754 trig4 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co4;
#X obj 194 572 r $0-co4;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 128 220 pd trig4;
#N canvas 0 22 484 754 trig5 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co5;
#X obj 194 572 r $0-co5;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 144 201 pd trig5;
#N canvas 0 22 484 754 trig6 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co6;
#X obj 194 572 r $0-co6;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 160 182 pd trig6;
#N canvas 0 22 484 754 trig7 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co7;
#X obj 194 572 r $0-co7;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 176 163 pd trig7;
#N canvas 0 22 484 754 trig8 0;
#X obj 27 175 t b b;
#X obj 27 257 s $0-cutoff;
#X obj 27 19 inlet;
#X obj 138 236 t a a;
#X obj 122 272 f;
#X obj 168 272 pow -1;
#X msg 41 97 0 2;
#X obj 27 149 delay 2;
#X obj 138 71 r $0-transp;
#X msg 154 159 1;
#X obj 154 133 sel 0;
#X msg 185 159 -1;
#X obj 154 107 r $0-rev;
#X obj 138 184 * 1;
#X obj 122 396 * 1e+07;
#X obj 122 370 f 1;
#X msg 122 448 1 , 4.41e+08 $1;
#X obj 294 395 r $0-arraysize;
#X obj 168 298 moses 0;
#X obj 237 396 * 1e+07;
#X obj 237 370 f 1;
#X obj 237 422 pack 0 0;
#X msg 237 448 $2 , -4.41e+08 $1;
#X obj 253 344 abs;
#X obj 122 298 < 0;
#X obj 122 324 select 0 1;
#X obj 138 210 / 100;
#X obj 43 205 r $0- gain;
#X obj 27 231 f 1;
#X obj 211 484 vline~;
#X obj 141 520 tabread4~ $1-lpl;
#X obj 178 546 tabread4~ $1-lpr;
#X obj 141 624 *~;
#X obj 178 624 *~;
#X obj 194 598 vline~;
#X obj 181 712 outlet~;
#X obj 242 712 outlet~;
#X obj 181 686 *~ 1;
#X obj 242 686 *~ 1;
#X obj 377 598 r $0-sens;
#X obj 302 624 spigot 1;
#X obj 302 598 moses 101;
#X obj 302 650 / 100;
#X obj 302 494 r $0-velinlet;
#X obj 302 546 spigot;
#X msg 393 520 1;
#X msg 431 520 0;
#X obj 302 572 t a b;
#X obj 27 45 t b b b b b b b b b b b b b b b b b b b b b b b b b b
;
#X obj 41 123 s $0-co8;
#X obj 194 572 r $0-co8;
#X connect 0 0 28 0;
#X connect 0 1 4 0;
#X connect 2 0 48 0;
#X connect 3 0 4 1;
#X connect 3 1 5 0;
#X connect 4 0 24 0;
#X connect 5 0 18 0;
#X connect 6 0 49 0;
#X connect 7 0 0 0;
#X connect 8 0 13 0;
#X connect 9 0 13 1;
#X connect 10 0 9 0;
#X connect 10 1 11 0;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 13 0 26 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 29 0;
#X connect 17 0 21 1;
#X connect 18 0 23 0;
#X connect 18 1 15 1;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 29 0;
#X connect 23 0 20 1;
#X connect 24 0 25 0;
#X connect 25 0 15 0;
#X connect 25 1 20 0;
#X connect 26 0 3 0;
#X connect 27 0 28 1;
#X connect 28 0 1 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 34 0 32 1;
#X connect 37 0 35 0;
#X connect 38 0 36 0;
#X connect 39 0 40 1;
#X connect 40 0 42 0;
#X connect 41 0 40 0;
#X connect 42 0 38 1;
#X connect 42 0 37 1;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 44 1;
#X connect 46 0 44 1;
#X connect 47 0 41 0;
#X connect 47 1 46 0;
#X connect 48 0 7 0;
#X connect 48 1 6 0;
#X connect 48 25 45 0;
#X connect 50 0 34 0;
#X restore 192 144 pd trig8;
#X obj 170 313 outlet~;
#X obj 231 313 outlet~;
#X obj 80 109 sel 1 2 3 4 5 6 7 8;
#X obj 107 31 inlet;
#X obj 107 57 f;
#X obj 140 57 + 1;
#X msg 144 83 0;
#X obj 50 83 sel 0;
#X obj 50 313 outlet;
#X obj 97 83 sel 8;
#X connect 0 0 8 0;
#X connect 0 1 9 0;
#X connect 1 0 8 0;
#X connect 1 1 9 0;
#X connect 2 0 8 0;
#X connect 2 1 9 0;
#X connect 3 0 8 0;
#X connect 3 1 9 0;
#X connect 4 0 8 0;
#X connect 4 1 9 0;
#X connect 5 0 8 0;
#X connect 5 1 9 0;
#X connect 6 0 8 0;
#X connect 6 1 9 0;
#X connect 7 0 8 0;
#X connect 7 1 9 0;
#X connect 10 0 0 0;
#X connect 10 1 1 0;
#X connect 10 2 2 0;
#X connect 10 3 3 0;
#X connect 10 4 4 0;
#X connect 10 5 5 0;
#X connect 10 6 6 0;
#X connect 10 7 7 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 0 15 0;
#X connect 12 0 17 0;
#X connect 13 0 12 1;
#X connect 14 0 12 1;
#X connect 15 0 16 0;
#X connect 15 1 10 0;
#X connect 17 0 14 0;
#X restore 492 270 pd poly;
#X obj 325 270 sel 0 1;
#X text 689 319 PAUSE CT;
#X floatatom 712 567 8 0 0 0 - - -;
#X obj 712 616 outlet length-sec;
#X text 688 304 POLY TRIGG;
#X obj 712 590 s $0-length-sec;
#N canvas 55 202 454 295 colour 0;
#X obj 44 117 $0;
#X obj 74 169 list;
#X msg 54 195 ; $1-rec color $2 12 12;
#X obj 22 13 r $0-rec;
#X obj 22 39 once;
#X obj 90 39 once;
#X obj 90 65 t b b b;
#X obj 22 65 t b b b;
#X obj 90 13 r $0-recstop;
#X msg 115 117 15;
#X msg 191 117 0;
#X msg 44 233 ; $1-reccv color $2 12 12;
#X obj 34 169 list;
#X msg 153 117 15;
#X msg 77 117 19;
#X obj 247 117 $0;
#X obj 247 169 list;
#X obj 247 65 t b b b;
#X obj 308 65 t b b b;
#X msg 315 117 0;
#X msg 280 117 75;
#X obj 247 13 r $0-playtgl;
#X obj 247 39 sel 1;
#X msg 247 195 ; $1-play color $2 12 12;
#X connect 0 0 1 0;
#X connect 0 0 12 0;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 7 0;
#X connect 5 0 6 0;
#X connect 6 0 4 1;
#X connect 6 1 0 0;
#X connect 6 2 10 0;
#X connect 6 2 13 0;
#X connect 7 0 5 1;
#X connect 7 1 0 0;
#X connect 7 2 9 0;
#X connect 7 2 14 0;
#X connect 8 0 5 0;
#X connect 9 0 1 1;
#X connect 10 0 1 1;
#X connect 12 0 11 0;
#X connect 13 0 12 1;
#X connect 14 0 12 1;
#X connect 15 0 16 0;
#X connect 16 0 23 0;
#X connect 17 0 15 0;
#X connect 17 1 20 0;
#X connect 18 1 15 0;
#X connect 18 2 19 0;
#X connect 19 0 16 1;
#X connect 20 0 16 1;
#X connect 21 0 22 0;
#X connect 22 0 17 0;
#X connect 22 1 18 0;
#X restore 70 212 pd colour;
#X text 688 331 SAVE ARRAYS;
#X text 175 116 ??;
#X text 51 113 ??;
#N canvas 0 22 458 308 savearrays 0;
#X msg 217 248 start;
#X msg 262 248 stop;
#X obj 207 67 r $0-write;
#X text 222 52 write: imp;
#X obj 158 248 *~;
#X obj 184 248 *~;
#X obj 158 284 writesf~ 2;
#X connect 0 0 6 0;
#X connect 1 0 6 0;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X restore 70 114 pd savearrays;
#X text 690 292 PLAYTGL AFTER LOOP/TGLOFF & PAUSE;
#X obj 500 22 inlet;
#X obj 471 112 f;
#X obj 504 112 + 1;
#X obj 471 138 sel 2;
#X msg 518 138 0;
#X connect 8 0 13 0;
#X connect 8 0 55 0;
#X connect 8 0 76 0;
#X connect 10 0 20 0;
#X connect 11 0 14 0;
#X connect 12 0 5 0;
#X connect 16 0 15 0;
#X connect 17 0 7 0;
#X connect 18 0 13 0;
#X connect 19 0 45 1;
#X connect 20 0 45 0;
#X connect 20 0 59 0;
#X connect 21 0 33 0;
#X connect 25 0 26 0;
#X connect 27 0 22 0;
#X connect 28 0 23 0;
#X connect 29 0 32 0;
#X connect 30 0 32 1;
#X connect 35 0 40 0;
#X connect 36 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 42 0;
#X connect 38 0 43 0;
#X connect 39 0 47 0;
#X connect 40 0 36 0;
#X connect 41 0 49 0;
#X connect 41 0 60 0;
#X connect 41 1 66 0;
#X connect 41 1 65 0;
#X connect 41 1 68 0;
#X connect 42 0 52 0;
#X connect 43 0 52 1;
#X connect 44 0 57 0;
#X connect 45 0 61 0;
#X connect 45 1 54 0;
#X connect 45 2 62 0;
#X connect 47 0 36 0;
#X connect 50 0 51 0;
#X connect 52 0 2 0;
#X connect 52 0 48 0;
#X connect 52 1 3 0;
#X connect 52 1 48 1;
#X connect 54 0 53 0;
#X connect 54 1 39 0;
#X connect 54 2 35 0;
#X connect 54 3 40 0;
#X connect 55 0 56 0;
#X connect 56 0 15 0;
#X connect 56 0 6 0;
#X connect 56 1 6 0;
#X connect 56 1 58 0;
#X connect 57 0 43 1;
#X connect 57 0 42 1;
#X connect 58 0 15 0;
#X connect 59 0 14 0;
#X connect 61 0 63 0;
#X connect 62 1 2 0;
#X connect 62 2 3 0;
#X connect 63 0 47 0;
#X connect 63 1 54 0;
#X connect 75 0 76 0;
#X connect 76 0 19 0;
#X connect 76 0 77 0;
#X connect 76 0 78 0;
#X connect 77 0 76 1;
#X connect 78 0 79 0;
#X connect 79 0 76 1;
#X coords 0 -1 1 1 410 34 1 310 190;

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

1999

1998

Re: [PD] reverse & variable speed soundplayback?