Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
283 lines (282 sloc) 7.24 KB
#N canvas 129 22 999 710 10;
#X declare -path abstractions;
#X declare -path abstractions;
#X declare -path abstractions;
#X obj 507 29 cnv 15 350 275 empty empty empty 20 12 0 14 -228856 -66577
0;
#N canvas 357 228 763 495 init 0;
#X obj 32 21 loadbang;
#X obj 78 74 s lb1;
#X obj 32 42 t b b b;
#X obj 55 96 s lb2;
#X obj 32 120 s lb3;
#X obj 535 184 r lb1;
#X obj 350 184 r lb2;
#X floatatom 555 242 5 0 0 0 - - -;
#X floatatom 370 242 5 0 0 0 - - -;
#X floatatom 535 332 5 0 0 0 - - -;
#X floatatom 350 332 5 0 0 0 - - -;
#X obj 370 268 s synth-window-size;
#X obj 555 268 s synth-overlap;
#X obj 350 358 s analysis-window-size;
#X obj 535 358 s analysis-overlap;
#X obj 144 24 r lb3;
#X obj 12 434 declare -path abstractions;
#X text 343 40 Set overlap and window-size (in that order) in the number
boxes below;
#X text 343 80 If you're not sure about these settings \, read info
in the [pd timbreGrains] sub-patch first.;
#X msg 535 305 1;
#X msg 350 305 1024;
#X msg 370 215 1024;
#X msg 555 215 1;
#X obj 89 5 r reset;
#X msg 144 50 \; pd dsp 1;
#X connect 0 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 2 2 1 0;
#X connect 5 0 19 0;
#X connect 5 0 22 0;
#X connect 6 0 21 0;
#X connect 6 0 20 0;
#X connect 7 0 12 0;
#X connect 8 0 11 0;
#X connect 9 0 14 0;
#X connect 10 0 13 0;
#X connect 15 0 24 0;
#X connect 19 0 9 0;
#X connect 20 0 10 0;
#X connect 21 0 8 0;
#X connect 22 0 7 0;
#X connect 23 0 2 0;
#X restore 523 62 pd init;
#N canvas 1091 473 675 485 master-out 0;
#X obj 42 302 *~;
#X obj 79 232 dbtorms;
#X obj 79 253 pack f 40;
#X obj 79 274 line~;
#X obj 79 164 moses 41;
#X obj 79 186 t b;
#X msg 79 208 0;
#X obj 42 407 dac~;
#X obj 42 33 catch~ 1-master-sum;
#X obj 364 30 catch~ 2-master-sum;
#X obj 388 228 dbtorms;
#X obj 388 249 pack f 40;
#X obj 388 270 line~;
#X obj 388 160 moses 41;
#X obj 388 182 t b;
#X msg 388 204 0;
#X obj 364 292 *~;
#X obj 141 161 sssad/sssad 1-master_volume;
#X obj 141 188 s 1-master-volume-set;
#X obj 450 158 sssad/sssad 2-master_volume;
#X obj 450 184 s 2-master-volume-set;
#X obj 79 96 r 1-master-volume;
#X obj 388 92 r 2-master-volume;
#X floatatom 374 346 5 0 0 0 - - -;
#X obj 378 320 env~;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 1 1 0;
#X connect 5 0 6 0;
#X connect 6 0 1 0;
#X connect 8 0 0 0;
#X connect 9 0 16 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 16 1;
#X connect 13 0 14 0;
#X connect 13 1 10 0;
#X connect 14 0 15 0;
#X connect 15 0 10 0;
#X connect 16 0 7 1;
#X connect 16 0 24 0;
#X connect 17 0 18 0;
#X connect 19 0 20 0;
#X connect 21 0 4 0;
#X connect 21 0 17 1;
#X connect 22 0 13 0;
#X connect 22 0 19 1;
#X connect 24 0 23 0;
#X restore 526 168 pd master-out;
#X obj 204 70 bng 30 250 50 0 savenew empty Save_New -5 -8 0 10 -204786
-1 -1;
#X obj 266 70 bng 30 250 50 0 save empty Save -4 -8 0 10 -262130 -1
-1;
#X obj 204 123 bng 30 250 50 0 load empty Load 1 -8 0 10 -204786 -1
-1;
#X obj 266 124 bng 30 250 50 0 reload empty Reload -4 -8 0 10 -262130
-1 -1;
#N canvas 420 104 831 545 metronome 0;
#X obj 67 186 metro;
#X msg 114 117 60000;
#X floatatom 222 122 5 0 0 1 tempo - -;
#X obj 150 142 /;
#X msg 67 64 1;
#X msg 98 63 0;
#X obj 66 217 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 129 168 5 0 0 0 - - -;
#X floatatom 66 282 5 0 0 0 - - -;
#X obj 66 251 counter;
#X floatatom 159 197 5 0 0 1 time_signature - -;
#X obj 80 327 select;
#X obj 125 219 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 113 301 - 1;
#X obj 164 119 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 496 232 soundfiler;
#X obj 587 73 table ting;
#X obj 588 96 table tick;
#X msg 419 164 read -resize tic.wav ting;
#X msg 524 196 read -resize toc.wav tick;
#X obj 66 374 sel 0;
#X obj 66 406 tabplay~ ting;
#X obj 153 407 tabplay~ tick;
#X obj 66 436 +~;
#X obj 419 122 loadbang;
#X msg 343 92 120;
#X msg 338 159 4;
#X text 401 86 metronome -by Weibin Shen;
#X obj 68 42 sel 1 0;
#X obj 48 12 r metro;
#X obj 222 43 r tempo;
#X obj 332 118 s tempo-set;
#X obj 66 475 dac~ 3;
#X connect 0 0 6 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 14 0;
#X connect 3 0 7 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 5 0 9 2;
#X connect 6 0 9 0;
#X connect 7 0 0 1;
#X connect 8 0 11 0;
#X connect 8 0 20 0;
#X connect 9 0 8 0;
#X connect 10 0 13 0;
#X connect 10 0 12 0;
#X connect 11 0 12 0;
#X connect 12 0 9 2;
#X connect 13 0 11 1;
#X connect 14 0 1 0;
#X connect 18 0 15 0;
#X connect 19 0 15 0;
#X connect 20 0 21 0;
#X connect 20 1 22 0;
#X connect 21 0 23 0;
#X connect 22 0 23 1;
#X connect 23 0 32 0;
#X connect 24 0 18 0;
#X connect 24 0 19 0;
#X connect 24 0 25 0;
#X connect 24 0 26 0;
#X connect 25 0 2 0;
#X connect 25 0 31 0;
#X connect 26 0 10 0;
#X connect 28 0 4 0;
#X connect 28 1 5 0;
#X connect 29 0 28 0;
#X connect 30 0 2 0;
#X restore 523 42 pd metronome;
#X obj 203 23 tgl 30 0 metro empty Metronome -7 -8 0 10 -203904 -1
-1 0 1;
#X obj 265 23 nbx 5 30 -1e+37 1e+37 0 0 tempo tempo-set Tempo 0 -8
0 10 -262144 -1 -1 120 256;
#X obj 333 123 bng 30 250 50 0 reset empty Reset -4 -5 0 10 -258113
-1 -1;
#X obj -33 128 adc~ 1 2;
#N canvas 580 53 430 629 state-saving 0;
#X obj 13 315 cnv 15 400 300 empty empty Restore 300 12 0 14 -233017
-123526 0;
#X obj 13 12 cnv 15 400 300 empty empty Save 300 12 0 14 -233017 -123526
0;
#X obj 239 237 textfile;
#X msg 128 138 clear;
#X msg 313 220 print;
#X obj 239 161 list prepend add;
#X obj 239 187 list trim;
#X obj 86 520 textfile;
#X obj 86 550 s SSSAD;
#X obj 86 462 until;
#X msg 86 441 100;
#X msg 30 503 print;
#X text 81 572 also received inside sssad;
#X obj 106 238 s SSSAD_ADMIN;
#X obj 239 93 r SSSAD_ADMIN;
#X obj 239 137 route persist;
#X obj 239 115 list trim;
#X msg 106 172 save;
#X msg 120 211 set;
#X obj 154 547 s SSSAD_ADMIN;
#X msg 154 522 set;
#X obj 84 59 savepanel;
#X obj 84 102 t a b b;
#X msg 84 285 write \$1;
#X obj 84 31 bng 24 250 50 0 empty empty save 0 -6 0 8 -262144 -1 -1
;
#X obj 86 418 t b a;
#X msg 133 463 read \$1 \, rewind;
#X obj 86 337 bng 24 250 50 0 empty empty load 0 -6 0 8 -262144 -1
-1;
#X obj 86 365 openpanel;
#X text 118 441 Avoid loops. A bang normally also works.;
#X obj 84 81 symbol;
#X msg 27 63 bang;
#X text 25 43 again;
#X obj 86 395 symbol;
#X msg 29 378 bang;
#X text 27 358 again;
#X text 40 597 Hint: get creative with the [OSCroute] external!;
#X obj 126 29 r savenew;
#X obj 23 19 r save;
#X obj 168 328 r load;
#X obj 20 328 r reload;
#X connect 3 0 2 0;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 1 9 1;
#X connect 7 1 20 0;
#X connect 9 0 7 0;
#X connect 10 0 9 0;
#X connect 11 0 7 0;
#X connect 14 0 16 0;
#X connect 15 0 5 0;
#X connect 16 0 15 0;
#X connect 17 0 13 0;
#X connect 18 0 13 0;
#X connect 20 0 19 0;
#X connect 21 0 30 0;
#X connect 22 0 23 0;
#X connect 22 1 17 0;
#X connect 22 2 3 0;
#X connect 23 0 2 0;
#X connect 24 0 21 0;
#X connect 25 0 10 0;
#X connect 25 1 26 0;
#X connect 26 0 7 0;
#X connect 27 0 28 0;
#X connect 28 0 33 0;
#X connect 30 0 22 0;
#X connect 31 0 30 0;
#X connect 33 0 25 0;
#X connect 34 0 33 0;
#X connect 37 0 21 0;
#X connect 38 0 31 0;
#X connect 39 0 28 0;
#X connect 40 0 34 0;
#X restore 526 147 pd state-saving;
#X obj -33 186 smash-channel 1;
#X obj 181 185 smash-channel 2;
#X connect 11 0 13 0;
#X connect 11 1 14 0;
Jump to Line
Something went wrong with that request. Please try again.