#N canvas 411 387 478 275 10; #X obj 173 66 vsl 15 128 0.001 5 1 0 zookv zookv zookv 0 -8 192 8 -241291 -1 -1 12700 0; #N canvas 536 200 634 658 zook 0; #X obj 179 496 inlet~; #X obj 23 578 outlet~; #X floatatom 22 96 0 0 0 0 - - -; #X obj 87 365 *~; #X obj 195 296 line~; #X obj 195 270 pack 0 200; #X obj 195 148 r window; #X obj 22 67 r transpose; #X obj 22 149 exp; #X floatatom 22 175 0 0 0 0 - - -; #X obj 22 265 /; #X obj 140 197 * 0.001; #X obj 316 375 line~; #X obj 316 349 pack 0 200; #X floatatom 318 270 0 0 0 0 - - -; #X obj 87 391 +~; #X msg 318 317 1; #X obj 318 294 moses 1.5; #X obj 87 417 vd~ delay1; #X obj 22 416 cos~; #X obj 22 443 *~; #X obj 22 472 +~; #X obj 109 323 wrap~; #X obj 254 366 *~; #X obj 254 399 +~; #X obj 254 428 vd~ delay1; #X obj 191 426 cos~; #X obj 191 453 *~; #X obj 181 572 delwrite~ delay1 5000; #X obj 140 223 t b f; #X floatatom 22 291 0 0 0 0 - - -; #X obj 22 318 phasor~ 0; #X obj 109 296 +~ 0.5; #X obj 22 364 -~ 0.5; #X obj 22 390 *~ 0.5; #X obj 191 365 -~ 0.5; #X obj 191 398 *~ 0.5; #X obj 22 202 - 1; #X obj 22 123 * 0.05776; #X obj 22 228 * -1; #X text 56 92 <-- transposition; #X text 99 105 (halftones); #X text 89 183 speed; #X text 88 197 change; #X text 57 258 tape head; #X text 58 271 rotation speed; #X obj 180 527 *~; #X obj 23 531 hip~ 10; #X obj 240 496 r fbreturn; #X text 26 15 this has been unscrupuliously taken from the pd doc (56.delay.pitchshift.pd) ; #N canvas 1051 300 496 567 rangemetro 0; #X obj 26 201 metro 500; #X obj 26 359 random 300; #X obj 47 334 r range; #X obj 26 494 outlet; #X floatatom 269 139 5 0 0 0 - - -; #X obj 265 30 r rate; #X obj 226 184 *; #X obj 26 61 loadbang; #X obj 265 59 select 0 1 2 3 4 5; #X obj 144 167 r tempoms; #X msg 252 100 0.5; #X msg 291 100 1; #X msg 328 99 2; #X msg 368 99 4; #X msg 404 99 8; #X msg 441 100 16; #X obj 59 126 r zookcancel; #X obj 59 152 == 0; #X obj 63 223 r sync; #X obj 257 321 select 0 1 2 3 4 5; #X msg 259 372 0.5; #X msg 295 372 0.75; #X msg 333 372 1; #X msg 368 372 2; #X msg 406 373 4; #X obj 128 444 *; #X obj 257 296 random 6; #X obj 269 159 t b f; #X msg 165 372 0.333333; #X obj 77 259 spigot; #X obj 63 285 == 0; #X obj 26 308 spigot; #X obj 346 4 loadbang; #X msg 346 30 1; #X msg 13 232 1; #X connect 0 0 31 0; #X connect 0 0 29 0; #X connect 1 0 3 0; #X connect 2 0 1 1; #X connect 4 0 27 0; #X connect 5 0 8 0; #X connect 6 0 0 1; #X connect 7 0 0 0; #X connect 7 0 34 0; #X connect 8 0 10 0; #X connect 8 1 11 0; #X connect 8 2 12 0; #X connect 8 3 13 0; #X connect 8 4 14 0; #X connect 8 5 15 0; #X connect 9 0 6 0; #X connect 9 0 25 1; #X connect 10 0 4 0; #X connect 11 0 4 0; #X connect 12 0 4 0; #X connect 13 0 4 0; #X connect 14 0 4 0; #X connect 15 0 4 0; #X connect 16 0 17 0; #X connect 17 0 0 0; #X connect 18 0 29 1; #X connect 18 0 30 0; #X connect 19 0 28 0; #X connect 19 1 20 0; #X connect 19 2 21 0; #X connect 19 3 22 0; #X connect 19 4 23 0; #X connect 19 5 24 0; #X connect 20 0 25 0; #X connect 21 0 25 0; #X connect 22 0 25 0; #X connect 23 0 25 0; #X connect 24 0 25 0; #X connect 25 0 3 0; #X connect 26 0 19 0; #X connect 27 0 6 0; #X connect 27 1 6 1; #X connect 28 0 25 0; #X connect 29 0 26 0; #X connect 30 0 31 1; #X connect 31 0 1 0; #X connect 32 0 33 0; #X connect 33 0 8 0; #X connect 34 0 30 0; #X connect 34 0 29 1; #X restore 318 229 pd rangemetro; #N canvas 131 279 754 601 compress 0; #X obj 127 -10 inlet~; #X obj 126 52 snapshot~; #X obj 190 -6 r comp; #X obj 126 127 ||; #X obj 168 105 t b f; #X obj 126 155 route 0; #X obj 159 209 r fbreturn; #X obj 79 253 f; #X obj 141 457 s fbreturn; #X msg 79 208 bang; #X msg 283 205 bang; #X obj 283 256 f; #X obj 213 411 - 0.01; #X obj 79 409 + 0.01; #X obj 113 383 f; #X obj 213 385 f; #X obj 265 313 route 1; #X obj 19 306 route 1; #X msg 265 338 bang; #X msg 19 331 bang; #X obj 126 87 > 0.5; #X obj 169 76 < -0.5; #X obj 265 287 >= 0; #X obj 19 280 <= 1; #X obj 165 28 metro 10; #X text 281 -6 i know \, i know... this is the uglyiest compressor in town... any suggest to asb2m10@microcosm.ws; #X connect 0 0 1 0; #X connect 1 0 20 0; #X connect 1 0 21 0; #X connect 2 0 24 0; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 4 1 3 1; #X connect 5 0 9 0; #X connect 5 1 10 0; #X connect 6 0 7 1; #X connect 6 0 11 1; #X connect 6 0 14 1; #X connect 6 0 15 1; #X connect 7 0 23 0; #X connect 9 0 7 0; #X connect 10 0 11 0; #X connect 11 0 22 0; #X connect 12 0 8 0; #X connect 13 0 8 0; #X connect 14 0 13 0; #X connect 15 0 12 0; #X connect 16 0 18 0; #X connect 17 0 19 0; #X connect 18 0 15 0; #X connect 19 0 14 0; #X connect 20 0 3 0; #X connect 21 0 4 0; #X connect 22 0 16 0; #X connect 23 0 17 0; #X connect 24 0 1 0; #X restore 84 531 pd compress; #X connect 0 0 46 0; #X connect 2 0 38 0; #X connect 3 0 15 0; #X connect 4 0 3 1; #X connect 4 0 23 1; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 6 0 11 0; #X connect 7 0 2 0; #X connect 8 0 9 0; #X connect 9 0 37 0; #X connect 10 0 30 0; #X connect 11 0 29 0; #X connect 12 0 15 1; #X connect 12 0 24 1; #X connect 13 0 12 0; #X connect 14 0 17 0; #X connect 15 0 18 0; #X connect 16 0 13 0; #X connect 17 0 16 0; #X connect 17 1 13 0; #X connect 18 0 20 1; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 21 0 46 0; #X connect 21 0 47 0; #X connect 21 0 51 0; #X connect 22 0 23 0; #X connect 22 0 35 0; #X connect 23 0 24 0; #X connect 24 0 25 0; #X connect 25 0 27 1; #X connect 26 0 27 0; #X connect 27 0 21 1; #X connect 29 0 10 0; #X connect 29 1 10 1; #X connect 30 0 31 0; #X connect 31 0 3 0; #X connect 31 0 33 0; #X connect 31 0 32 0; #X connect 32 0 22 0; #X connect 33 0 34 0; #X connect 34 0 19 0; #X connect 35 0 36 0; #X connect 36 0 26 0; #X connect 37 0 39 0; #X connect 38 0 8 0; #X connect 39 0 10 0; #X connect 46 0 28 0; #X connect 47 0 1 0; #X connect 48 0 46 1; #X connect 50 0 14 0; #X restore 90 174 pd zook; #N canvas 297 741 762 466 sampler 0; #X obj 614 206 outlet~; #N canvas 0 0 450 300 graph1 0; #X array bdsample 64256 float 0; #X coords 0 1 64255 -1 50 50 1; #X restore 81 386 graph; #N canvas 0 0 450 300 graph1 0; #X array snsample 277015 float 0; #X coords 0 1 277014 -1 50 50 1; #X restore 215 386 graph; #X obj 35 72 tabplay~ bdsample; #X obj 184 72 tabplay~ snsample; #X obj 35 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 184 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #N canvas 0 0 450 300 graph1 0; #X array ohhsample 9972 float 0; #X coords 0 1 9971 -1 50 50 1; #X restore 347 387 graph; #N canvas 0 0 450 300 graph1 0; #X array chhsample 14415 float 0; #X coords 0 1 14414 -1 50 50 1; #X restore 474 387 graph; #X obj 326 51 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 470 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 614 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 470 72 tabplay~ chhsample; #X obj 326 71 tabplay~ ohhsample; #N canvas 0 0 450 300 graph1 0; #X array tomsample 31856 float 0; #X coords 0 1 31855 -1 50 50 1; #X restore 598 389 graph; #X obj 614 72 tabplay~ tomsample; #X obj 35 29 r trgbd; #X obj 184 30 r trgsn; #X obj 326 30 r trgohh; #X obj 470 30 r trgcch; #X obj 614 30 r trgperc; #X obj 40 320 soundfiler; #N canvas 529 444 450 300 sample-loader 0; #X obj 111 18 inlet; #X obj 46 150 outlet; #X obj 39 59 openpanel; #X obj 39 35 t b; #X obj 46 104 pack 0 s s; #X obj 39 81 t b s; #X msg 46 127 read -resize \$2 \$3; #X connect 0 0 3 0; #X connect 0 0 4 2; #X connect 2 0 5 0; #X connect 3 0 2 0; #X connect 4 0 6 0; #X connect 5 0 4 0; #X connect 5 1 4 1; #X connect 6 0 1 0; #X restore 40 295 pd sample-loader; #X msg 40 183 symbol bdsample; #X msg 40 271 symbol tomsample; #X msg 40 205 symbol snsample; #X msg 40 227 symbol ohhsample; #X msg 40 249 symbol chhsample; #X connect 3 0 0 0; #X connect 4 0 0 0; #X connect 5 0 3 0; #X connect 6 0 4 0; #X connect 9 0 13 0; #X connect 10 0 12 0; #X connect 11 0 15 0; #X connect 12 0 0 0; #X connect 13 0 0 0; #X connect 15 0 0 0; #X connect 16 0 5 0; #X connect 17 0 6 0; #X connect 18 0 9 0; #X connect 19 0 10 0; #X connect 20 0 11 0; #X connect 22 0 21 0; #X connect 23 0 22 0; #X connect 24 0 22 0; #X connect 25 0 22 0; #X connect 26 0 22 0; #X connect 27 0 22 0; #X restore 65 113 pd sampler; #N canvas 521 315 450 548 sequencer 0; #N canvas 0 0 450 300 graph1 0; #X array bdseq 16 float 1; #A 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0; #X coords 0 1 15 0 300 60 1; #X restore 87 87 graph; #N canvas 94 266 589 519 seqrouting 0; #X obj 20 130 tabread bdseq; #X obj 231 51 metro 100; #X obj 231 76 f; #X obj 352 46 + 1; #X obj 231 9 r seqmsg; #X obj 20 153 > 0.5; #X obj 20 177 select 1; #X obj 20 226 s trgbd; #X obj 20 201 t b; #X obj 127 153 > 0.5; #X obj 127 177 select 1; #X obj 127 201 t b; #X obj 127 130 tabread snseq; #X obj 127 226 s trgsn; #X obj 311 79 mod 16; #X floatatom 231 31 5 0 0 0 - - -; #X floatatom 303 32 5 0 0 0 - - -; #X obj 231 153 > 0.5; #X obj 231 177 select 1; #X obj 231 201 t b; #X obj 231 226 s trgohh; #X obj 231 130 tabread ohhseq; #X obj 341 152 > 0.5; #X obj 341 176 select 1; #X obj 341 200 t b; #X obj 341 225 s trgcch; #X obj 455 153 > 0.5; #X obj 455 177 select 1; #X obj 455 204 t b; #X obj 455 226 s trgperc; #X obj 455 130 tabread percseq; #X obj 341 129 tabread cchseq; #X msg 20 334 1; #X msg 46 355 0; #X obj 20 383 s seqmsg; #X msg 20 284 bang; #X obj 46 312 delay 1000; #X obj 20 258 r startstop; #X text 61 280 <-- start and stop the sequencer; #X obj 303 9 r tempoms; #X obj 324 253 r tempo; #X obj 342 351 /; #X msg 324 325 60000; #X obj 342 383 s tempoms; #X obj 324 299 trigger bang float; #X obj 324 275 * 4; #X connect 0 0 5 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 0 0 0; #X connect 2 0 12 0; #X connect 2 0 21 0; #X connect 2 0 30 0; #X connect 2 0 31 0; #X connect 3 0 14 0; #X connect 4 0 15 0; #X connect 5 0 6 0; #X connect 6 0 8 0; #X connect 8 0 7 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 11 0 13 0; #X connect 12 0 9 0; #X connect 14 0 2 1; #X connect 15 0 1 0; #X connect 16 0 1 1; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 19 0 20 0; #X connect 21 0 17 0; #X connect 22 0 23 0; #X connect 23 0 24 0; #X connect 24 0 25 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 30 0 26 0; #X connect 31 0 22 0; #X connect 32 0 34 0; #X connect 33 0 34 0; #X connect 35 0 36 0; #X connect 35 0 32 0; #X connect 36 0 33 0; #X connect 37 0 35 0; #X connect 39 0 16 0; #X connect 40 0 45 0; #X connect 41 0 43 0; #X connect 42 0 41 0; #X connect 44 0 42 0; #X connect 44 1 41 1; #X connect 45 0 44 0; #X restore 340 39 pd seqrouting; #N canvas 0 0 450 300 graph1 0; #X array ohhseq 16 float 1; #A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0; #X coords 0 1 15 0 300 60 1; #X restore 89 244 graph; #N canvas 0 0 450 300 graph1 0; #X array snseq 16 float 1; #A 0 0 0 1 0 0 0 1 1 0 0 1 0 0 0 1 1; #X coords 0 1 15 0 300 60 1; #X restore 87 165 graph; #X text 14 18 zook! sequencer window _____________________________________ ; #N canvas 0 0 450 300 graph1 0; #X array cchseq 16 float 1; #A 0 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1; #X coords 0 1 15 0 300 60 1; #X restore 89 329 graph; #N canvas 0 0 450 300 graph1 0; #X array percseq 16 float 1; #A 0 0 0 0 0 0 -1.11759e-08 -1.11759e-08 0 0 0 0 0 0 0 0 0; #X coords 0 1 15 0 300 60 1; #X restore 91 409 graph; #X restore 358 41 pd sequencer; #X obj 372 109 nbx 5 14 20 220 0 1 tempo tempo tempo 0 -6 192 8 -260818 -1 -1 100 256; #X obj 16 66 vsl 15 128 1e-04 1 1 0 sampv sampv sampv 0 -8 192 8 -169159 -1 -1 0 0; #X obj 372 145 nbx 5 14 -90 90 0 0 transpose transpose transpose 0 -6 192 8 -24198 -1 -1 87 256; #X obj 229 144 hsl 128 15 20 2000 0 0 range range range -2 -6 192 8 -44926 -1 -1 11000 1; #X obj 228 179 hsl 128 15 0.01 1 1 0 fbreturn fbreturn return -2 -6 192 8 -258699 -1 -1 8300 1; #X obj 372 179 hradio 15 1 0 6 empty empty rate 0 -6 0 8 -62784 -1 -33289 0; #X obj 372 196 s rate; #X obj 228 214 hsl 128 15 -15 100 0 0 window window window -2 -6 192 8 -250685 -1 -1 1200 1; #N canvas 234 218 1036 583 patches 0; #X text 266 228 <-- panic button; #X msg 18 5 bang; #X obj 402 229 r range; #X floatatom 402 252 8 0 0 0 - - -; #X obj 466 229 r fbreturn; #X floatatom 466 252 8 0 0 0 - - -; #X obj 546 229 r window; #X floatatom 546 252 8 0 0 0 - - -; #X floatatom 616 252 8 0 0 0 - - -; #X obj 616 229 r zookv; #X text 397 209 value helper ___________________________; #X msg 176 210 \; fbreturn 0 \; zookv 0 \; seqmsg 0 \;; #X obj 18 45 s startstop; #X msg 133 4 bang; #X obj 133 45 s startstop; #X obj 253 45 s startstop; #X msg 253 4 bang; #X msg 10 335 bang; #X msg 415 352 \; snseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X msg 12 263 bang; #X msg 104 280 \; bdseq 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0; #X msg 104 352 \; bdseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X msg 724 352 \; ohhseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X msg 1045 352 \; cchseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X msg 724 280 \; ohhseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0; #X msg 1045 280 \; cchseq 0 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1; #X msg 415 280 \; snseq 0 0 0 1 0 0 0 1 1 0 0 1 0 0 0 1 1; #X obj 12 237 loadbang; #X msg 391 4 bang; #X msg 536 4 bang; #X msg 10 299 bang; #X msg 391 27 \; seqmsg 1; #X msg 536 27 \; seqmsg 1; #X msg 415 316 \; snseq 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0; #X msg 104 316 \; bdseq 0 1 1 0 0 0 0 0 0 1 0 1 0 0 0 0 0; #X msg 724 316 \; ohhseq 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0; #X msg 1045 316 \; cchseq 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0; #X msg 690 3 bang; #X msg 690 26 \; seqmsg 1; #X msg 690 62 \; tempo 100 \; transpose -57 \; sync 1 \; fbreturn 0.775825 \; window 23.937 \; rate 2 \; zookv 1.59894 \;; #X msg 18 68 \; tempo 60 \; transpose 64 \; range 1600 \; fbreturn 0.9 \; window -4.5 \; rate 3 \; zookv 0.5 \; sync 0 \;; #X msg 253 68 \; tempo 120 \; transpose -48 \; range 1600 \; fbreturn 0.66792 \; window -4.5 \; rate 2 \; zookv 0.6686 \; sync 0 \;; #X msg 535 63 \; tempo 96 \; transpose 12 \; range 40.59 \; fbreturn 0.382402 \; window -12.2835 \; rate 1 \; zookv 0.625276 \; sync 0 \; ; #X msg 391 63 \; tempo 60 \; transpose -4 \; sync 1 \; fbreturn 0.2141 \; window -8.66142 \; rate 3 \; zookv 1.92391 \;; #X msg 133 68 \; tempo 60 \; transpose 0 \; range 1600 \; fbreturn 0.94 \; window -4.5 \; rate 5 \; zookv 0.9 \; sync 0 \;; #X obj 13 406 loadbang; #X msg 13 432 \; zookv 5 \; fbreturn 0.122071 \; range 1095.75 \; window 1.29921 \;; #X connect 1 0 40 0; #X connect 1 0 12 0; #X connect 2 0 3 0; #X connect 4 0 5 0; #X connect 6 0 7 0; #X connect 9 0 8 0; #X connect 13 0 14 0; #X connect 13 0 44 0; #X connect 16 0 15 0; #X connect 16 0 41 0; #X connect 17 0 21 0; #X connect 17 0 18 0; #X connect 17 0 22 0; #X connect 17 0 23 0; #X connect 19 0 20 0; #X connect 19 0 26 0; #X connect 19 0 24 0; #X connect 19 0 25 0; #X connect 27 0 19 0; #X connect 28 0 43 0; #X connect 28 0 31 0; #X connect 29 0 42 0; #X connect 29 0 32 0; #X connect 30 0 34 0; #X connect 30 0 33 0; #X connect 30 0 35 0; #X connect 30 0 36 0; #X connect 37 0 39 0; #X connect 37 0 38 0; #X connect 45 0 46 0; #X restore 372 65 pd patches; #X obj 226 65 bng 15 250 50 0 startstop empty google 0 -6 128 8 -262144 -1 -1; #N canvas 262 514 276 384 output 0; #X obj 123 117 *~; #X obj 81 298 dac~; #X obj 37 119 *~; #X obj 37 30 inlet~; #X obj 122 25 inlet~; #X obj 53 58 r sampv; #X obj 139 65 r zookv; #X obj 80 160 *~; #X obj 212 115 r muter; #X obj 212 143 == 0; #X obj 103 235 r pan; #X obj 164 89 loadbang; #X msg 164 116 1; #X obj 95 190 delwrite~ fxpan 40; #X obj 103 262 delread~ fxpan 40; #X connect 0 0 7 0; #X connect 2 0 7 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 5 0 2 1; #X connect 6 0 0 1; #X connect 7 0 1 0; #X connect 7 0 13 0; #X connect 8 0 9 0; #X connect 9 0 7 1; #X connect 10 0 14 0; #X connect 11 0 12 0; #X connect 12 0 7 1; #X connect 14 0 1 1; #X restore 66 214 pd output; #X obj 140 214 tgl 15 0 muter empty mute 0 -6 128 8 -99865 -1 -1 0 1; #X obj 273 66 tgl 15 0 seqmsg seqmsg sequencer 0 -6 192 8 -262144 -1 -1 1 1; #X obj 38 82 hsl 128 15 0 1000 0 0 pan empty panneux -2 -6 128 8 -195568 -1 -1 0 1; #X obj 373 230 tgl 15 0 zookcancel empty zookcancel 0 -6 128 8 -228992 -1 -1 0 1; #X obj 1 11 cnv 15 73 30 empty empty zook! 20 12 1 14 -262144 -33289 0; #X text 74 20 _____________________________________________________ ; #X obj 200 144 tgl 15 0 sync sync sync 0 -6 192 8 -165206 -262144 -1 0 1; #X obj 200 178 tgl 15 0 comp empty comp 0 -6 128 8 -225271 -1 -1 0 1; #X text 84 251 zook 1.2 is a sequencer ==> sampler ==> variable delay. ; #X connect 1 0 14 1; #X connect 2 0 1 0; #X connect 2 0 14 0; #X connect 9 0 10 0;