From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Sun, 25 Oct 2009 00:39:13 +0000 Subject: Adding mtl svn path=/trunk/abstractions/mtl/; revision=12667 --- tempo.pd | 197 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 197 insertions(+) create mode 100644 tempo.pd (limited to 'tempo.pd') diff --git a/tempo.pd b/tempo.pd new file mode 100644 index 0000000..fa27724 --- /dev/null +++ b/tempo.pd @@ -0,0 +1,197 @@ +#N canvas 1024 0 1018 716 10; +#X obj 86 -57 inlet; +#X obj 150 236 outlet; +#X obj 103 127 tgl 14 0 empty empty on 0 -5 0 8 -262144 -1 -1 0 1; +#X obj 123 127 nbx 5 14 0.001 1e+37 0 0 empty empty bpm 0 -5 0 8 -1 +-262144 -1 0.001 256; +#X obj 228 -46 inlet; +#X obj 157 -46 inlet; +#X obj 280 -32 inlet; +#X obj 172 127 nbx 5 14 1 1e+37 0 0 empty empty mult 0 -5 0 8 -1 -262144 +-1 1 256; +#X obj 222 127 nbx 5 14 1 1e+37 0 0 empty empty div 0 -5 0 8 -1 -262144 +-1 1 256; +#N canvas 1069 191 936 517 tempo 0; +#X obj 223 97 inlet; +#X obj 160 562 outlet; +#N canvas 0 0 454 304 bpm2ms 0; +#X obj 130 52 inlet; +#X obj 130 112 /; +#X obj 130 138 * 60; +#X msg 130 89 1000 \$1; +#X obj 129 191 outlet; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 3 0 1 0; +#X restore 173 276 pd bpm2ms; +#X obj 234 184 f \$1; +#X obj 86 137 inlet; +#N canvas 0 0 587 427 countmodulo 0; +#X obj 62 164 float; +#X obj 102 163 + 1; +#X obj 63 9 inlet; +#X msg 62 126 bang; +#X obj 62 258 outlet; +#X obj 61 208 mod; +#X obj 133 10 inlet; +#X msg 134 113 0; +#X obj 360 9 inlet; +#X text 168 9 reset or set; +#X obj 133 51 route bang reset float; +#X obj 181 124 mod; +#X text 399 9 modulo value (max value); +#X connect 0 0 5 0; +#X connect 1 0 0 1; +#X connect 2 0 3 0; +#X connect 3 0 0 0; +#X connect 5 0 1 0; +#X connect 5 0 4 0; +#X connect 6 0 10 0; +#X connect 7 0 0 1; +#X connect 8 0 5 1; +#X connect 8 0 11 1; +#X connect 10 0 7 0; +#X connect 10 1 7 0; +#X connect 10 2 11 0; +#X connect 11 0 0 1; +#X restore 166 522 pd countmodulo; +#X msg 489 216 16; +#X obj 517 165 f \$3; +#X obj 196 398 / 4; +#X msg 203 487 reset; +#X obj 95 403 t b b; +#X obj 123 371 sel 1; +#X obj 608 97 inlet; +#X obj 314 315 t b f; +#X obj 391 26 inlet; +#X obj 323 277 / 1; +#X msg 169 246 120; +#X obj 402 149 f \$2; +#X msg 347 210 1; +#X obj 385 182 moses 1; +#X obj 499 189 moses 1; +#X obj 181 220 moses 1; +#X obj 419 213 / 4; +#X obj 777 95 inlet shuffle; +#N canvas 0 0 994 658 shuffle 0; +#X obj 577 46 inlet; +#X obj 118 53 inlet; +#X obj 773 55 inlet; +#X obj 743 315 * 1000; +#X obj 234 457 delay; +#X obj 110 613 outlet; +#X obj 394 393 *; +#X obj 405 280 delay; +#X obj 440 256 / 2; +#X obj 668 373 expr 0.5+($f1/1000)-($f2/2); +#X text 573 23 Metro Time; +#X text 775 24 Shuffle 0 to 1; +#X msg 365 133 stop; +#X obj 668 343 random 0; +#X msg 267 160 stop; +#X obj 164 151 t b b b; +#X obj 604 301 metro; +#X text 106 31 start/stop; +#X obj 743 289 clip 0 1; +#X obj 197 101 sel 1 0; +#X obj 133 76 route bang; +#X connect 0 0 6 1; +#X connect 0 0 8 0; +#X connect 0 0 16 1; +#X connect 1 0 20 0; +#X connect 2 0 9 1; +#X connect 2 0 18 0; +#X connect 3 0 13 1; +#X connect 4 0 5 0; +#X connect 6 0 4 0; +#X connect 7 0 16 0; +#X connect 8 0 7 1; +#X connect 9 0 6 0; +#X connect 12 0 7 0; +#X connect 12 0 4 0; +#X connect 12 0 16 0; +#X connect 13 0 9 0; +#X connect 14 0 7 0; +#X connect 14 0 4 0; +#X connect 14 0 16 0; +#X connect 15 0 5 0; +#X connect 15 1 14 0; +#X connect 15 1 7 0; +#X connect 16 0 13 0; +#X connect 18 0 3 0; +#X connect 19 0 15 0; +#X connect 19 1 12 0; +#X connect 20 0 15 0; +#X connect 20 1 19 0; +#X restore 106 480 pd shuffle; +#X obj 109 324 != 0; +#X obj 60 291 route bang float; +#X connect 0 0 3 0; +#X connect 2 0 8 0; +#X connect 3 0 21 0; +#X connect 4 0 26 0; +#X connect 5 0 1 0; +#X connect 6 0 5 2; +#X connect 6 0 22 0; +#X connect 7 0 20 0; +#X connect 8 0 24 1; +#X connect 9 0 5 1; +#X connect 10 0 24 0; +#X connect 10 1 9 0; +#X connect 11 0 10 0; +#X connect 11 1 24 0; +#X connect 12 0 7 0; +#X connect 13 0 3 0; +#X connect 13 1 8 1; +#X connect 14 0 17 0; +#X connect 15 0 13 0; +#X connect 16 0 2 0; +#X connect 17 0 19 0; +#X connect 18 0 15 1; +#X connect 19 0 18 0; +#X connect 19 1 15 1; +#X connect 20 0 6 0; +#X connect 20 1 5 2; +#X connect 20 1 22 0; +#X connect 21 0 16 0; +#X connect 21 1 2 0; +#X connect 22 0 15 0; +#X connect 23 0 24 2; +#X connect 24 0 5 0; +#X connect 25 0 11 0; +#X connect 26 0 10 0; +#X connect 26 1 25 0; +#X restore 147 176 pd tempo; +#X obj 312 78 tof/argument 3 16; +#X obj 234 47 tof/argument 2 1; +#X obj 163 22 tof/argument 1 120; +#X obj 275 130 hsl 40 10 0 1 0 0 empty empty shuffle -2 -6 0 8 -262144 +-1 -1 0 1; +#X obj 375 140 tof/argument 4 0; +#X obj 509 -7 inlet; +#X obj 509 40 clip 0 1; +#X obj 361 -19 loadbang; +#X obj 365 7 t b b b b; +#X connect 0 0 2 0; +#X connect 2 0 9 0; +#X connect 3 0 9 1; +#X connect 4 0 7 0; +#X connect 5 0 3 0; +#X connect 6 0 8 0; +#X connect 7 0 9 2; +#X connect 8 0 9 3; +#X connect 9 0 1 0; +#X connect 10 0 8 0; +#X connect 11 0 7 0; +#X connect 12 0 3 0; +#X connect 13 0 9 4; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 16 0 13 0; +#X connect 17 0 18 0; +#X connect 18 0 12 0; +#X connect 18 1 11 0; +#X connect 18 2 10 0; +#X connect 18 3 14 0; +#X coords 0 -1 1 1 220 43 1 100 100; -- cgit v1.2.1