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 --- clkMaster.pd | 140 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 140 insertions(+) create mode 100644 clkMaster.pd (limited to 'clkMaster.pd') diff --git a/clkMaster.pd b/clkMaster.pd new file mode 100644 index 0000000..d50607c --- /dev/null +++ b/clkMaster.pd @@ -0,0 +1,140 @@ +#N canvas 440 71 999 659 10; +#X msg 362 169 60000; +#X obj 361 203 /; +#X obj 528 163 * 24; +#X obj 231 249 metro 20; +#N canvas 279 182 470 320 step.counter 0; +#X obj 156 66 t f f; +#X obj 157 40 r \$0step; +#X obj 262 38 r \$0iter; +#X obj 237 114 f; +#X obj 250 75 t b f; +#X obj 249 142 +; +#X obj 241 183 max 0; +#X obj 44 -7 inlet; +#X obj 55 249 outlet; +#X obj 68 189 t f f; +#X obj 139 185 t f f; +#X obj 239 257 outlet; +#X msg 186 220 seek \$1; +#X obj 34 128 tof/increment; +#X connect 0 0 10 0; +#X connect 0 1 13 1; +#X connect 1 0 0 0; +#X connect 2 0 4 0; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 4 1 5 1; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 7 0 13 0; +#X connect 9 0 8 0; +#X connect 9 1 3 1; +#X connect 10 0 12 0; +#X connect 10 1 3 1; +#X connect 12 0 11 0; +#X connect 13 0 9 0; +#X restore 227 292 pd step.counter; +#X obj -15 -141 inlet bpm; +#X obj 263 -143 loadbang; +#X obj 157 61 max 30; +#X obj 728 533 outlet heart_beat; +#X obj 768 424 mod 24; +#X obj 757 461 sel 0; +#X obj 157 92 t f b f f; +#X obj 623 -135 inlet external; +#X obj 109 31 t f f; +#X obj 459 2 spigot; +#X obj 184 -19 == 0; +#X obj 85 -44 sel 0; +#X obj 81 -18 f; +#X obj 140 -47 t f f; +#X obj 107 5 spigot 1; +#X obj 339 542 outlet step; +#X obj 479 537 outlet beat_interval; +#X obj 337 38 f; +#X obj 12 -115 route bang float external; +#X obj 367 -116 tof/getdollarzero root; +#X obj 366 502 send; +#X msg 367 -91 symbol \$1CLK; +#X text -10 -90 would like to add a bpm bang; +#N canvas 0 0 450 300 bpm2ms 0; +#X obj 140 62 inlet; +#X obj 140 122 /; +#X obj 140 148 * 60; +#X msg 140 99 1000 \$1; +#X obj 139 201 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 478 496 pd bpm2ms; +#X obj -55 -59 tof/argument 1 120; +#X obj 55 328 f; +#X obj 240 360 t f f f; +#X msg 66 390 bpm \$1; +#X obj 16 280 b; +#X obj 263 -73 t b b b b; +#X obj 623 -111 route bpm; +#X obj -8 228 r _NEWCLK; +#X obj 367 -27 tof/onlyone; +#X obj 617 91 symbol; +#X obj 367 -68 t s s; +#X obj 629 -5 print Warning; +#X msg 629 -33 There is alreaday a [clkMaster] linked to this root +patch!; +#X msg 367 -47 set \$1; +#X obj 249 326 zexy/multiplex 0 1; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 2 0 1 1; +#X connect 3 0 4 0; +#X connect 4 0 43 0; +#X connect 5 0 23 0; +#X connect 6 0 24 0; +#X connect 7 0 11 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 30 0; +#X connect 11 1 0 0; +#X connect 11 2 2 0; +#X connect 11 3 28 0; +#X connect 12 0 35 0; +#X connect 13 1 7 0; +#X connect 14 0 13 0; +#X connect 15 0 19 1; +#X connect 16 0 17 0; +#X connect 17 0 19 0; +#X connect 18 0 16 0; +#X connect 18 1 15 0; +#X connect 19 0 13 0; +#X connect 22 0 14 1; +#X connect 22 0 18 0; +#X connect 22 0 43 2; +#X connect 23 1 17 0; +#X connect 23 2 22 0; +#X connect 24 0 26 0; +#X connect 26 0 39 0; +#X connect 28 0 21 0; +#X connect 29 0 17 0; +#X connect 30 0 32 0; +#X connect 31 0 20 0; +#X connect 31 1 25 0; +#X connect 31 2 9 0; +#X connect 32 0 25 0; +#X connect 33 0 30 0; +#X connect 34 0 33 0; +#X connect 34 1 3 0; +#X connect 34 2 29 0; +#X connect 34 3 38 0; +#X connect 35 0 14 0; +#X connect 35 1 43 1; +#X connect 36 0 33 0; +#X connect 37 0 34 0; +#X connect 37 1 41 0; +#X connect 38 0 25 1; +#X connect 39 0 42 0; +#X connect 39 1 38 1; +#X connect 41 0 40 0; +#X connect 42 0 37 0; +#X connect 43 0 31 0; -- cgit v1.2.1