better sheduller for effects and bus

svn path=/trunk/externals/nusmuk/; revision=17060

7 files changed, 168 insertions, 166 deletions

diff --git a/lightboard/abs_light/bus.pd b/lightboard/abs_light/bus.pd
index 4849f91..477f777 100755
--- a/lightboard/abs_light/bus.pd
+++ b/lightboard/abs_light/bus.pd
@@ -1,13 +1,13 @@
-#N canvas 1 84 450 300 10;
+#N canvas 117 238 450 300 10;
 #X obj 79 23 inlet;
 #X obj 61 118 f;
-#X obj 61 74 r \$1-bang;
 #X obj 61 142 s \$1-bus;
 #X obj 114 50 != 0;
 #X obj 61 95 spigot 0;
+#X obj 61 74 r metro_bus\$2;
 #X connect 0 0 1 1;
-#X connect 0 0 4 0;
-#X connect 1 0 3 0;
-#X connect 2 0 5 0;
-#X connect 4 0 5 1;
-#X connect 5 0 1 0;
+#X connect 0 0 3 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 4 0;
diff --git a/lightboard/abs_light/bus_effet.pd b/lightboard/abs_light/bus_effet.pd
new file mode 100644
index 0000000..2edb6a1
--- /dev/null
+++ b/lightboard/abs_light/bus_effet.pd
@@ -0,0 +1,13 @@
+#N canvas 111 253 450 300 10;
+#X obj 79 23 inlet;
+#X obj 61 118 f;
+#X obj 61 142 s \$1-bus;
+#X obj 114 50 != 0;
+#X obj 61 95 spigot 0;
+#X obj 61 74 r metro_effet\$2;
+#X connect 0 0 1 1;
+#X connect 0 0 3 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 4 0;
diff --git a/lightboard/abs_light/bus_master.pd b/lightboard/abs_light/bus_master.pd
index 4409305..4d1584f 100755
--- a/lightboard/abs_light/bus_master.pd
+++ b/lightboard/abs_light/bus_master.pd
@@ -1,4 +1,4 @@
-#N canvas 528 235 620 731 10;
+#N canvas 239 302 725 703 10;
 #X obj 232 427 unpack f f;
 #X obj 232 370 t l b;
 #X obj 61 470 spigot 1;
@@ -13,7 +13,6 @@
 #X obj 426 578 change;
 #X obj 426 557 i;
 #X obj 61 317 +;
-#X obj 61 54 t b b b;
 #X obj 268 319 r set_lumiere;
 #X obj 232 342 r set_lumiere\$1;
 #X obj 61 390 * 1;
@@ -21,35 +20,13 @@
 #X obj 93 315 r add;
 #X obj 94 363 r mul;
 #X obj 61 361 * 1;
-#X obj 61 32 r metro_dmx_int\$2;
-#X msg 108 110 0;
-#X obj 88 192 max;
-#X obj 61 88 t b b b;
-#X obj 61 238 f;
-#X obj 104 217 f;
-#X obj 84 131 s lumiere\$1-bang;
-#X obj 88 167 r lumiere\$1-bus;
-#X msg 285 119 0;
-#X obj 238 97 t b b b;
-#X obj 238 247 f;
-#X obj 281 226 f;
-#X obj 265 201 +;
-#X obj 261 140 s add\$1-bang;
-#X obj 265 176 r add\$1-bus;
-#X obj 377 106 t b b b;
-#X obj 377 256 f;
-#X obj 420 235 f;
-#X obj 404 210 *;
-#X msg 423 127 1;
-#X obj 400 149 s mul\$1-bang;
-#X obj 404 185 r mul\$1-bus;
 #X obj 301 679 outlet;
 #X obj 495 44 inlet;
 #X obj 318 660 loadbang;
 #X obj 298 40 inlet;
 #X floatatom 426 601 3 0 0 0 - - -;
 #X obj 301 556 symbol;
-#X symbolatom 301 617 24 0 0 0 - - -;
+#X symbolatom 301 616 24 0 0 0 - - -;
 #X msg 500 105 set \$2_:_\$1;
 #X obj 500 126 s nom_circuit-\$1;
 #X obj 500 84 pack s \$1;
@@ -76,6 +53,26 @@
 #X restore 412 520 pd dirty;
 #X obj 408 600 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
+#X obj 76 258 max;
+#X obj 95 285 f;
+#X obj 61 286 f;
+#X msg 34 212 0 0;
+#X obj 34 192 t b b;
+#X obj 76 224 r lumiere\$1-bus;
+#X obj 246 285 f;
+#X obj 212 286 f;
+#X msg 185 212 0 0;
+#X obj 185 192 t b b;
+#X obj 396 285 f;
+#X obj 362 286 f;
+#X obj 335 192 t b b;
+#X obj 34 131 r metro_dmx_int\$2;
+#X obj 34 158 t b b b;
+#X obj 227 224 r add\$1-bus;
+#X obj 377 224 r mul\$1-bus;
+#X obj 227 258 +;
+#X obj 377 258 *;
+#X msg 335 212 1 1;
 #X connect 0 0 9 0;
 #X connect 0 1 4 0;
 #X connect 1 0 0 0;
@@ -88,60 +85,54 @@
 #X connect 9 0 7 0;
 #X connect 9 0 8 0;
 #X connect 9 0 12 0;
-#X connect 9 0 56 0;
+#X connect 9 0 33 0;
 #X connect 10 0 2 0;
-#X connect 11 0 48 0;
+#X connect 11 0 25 0;
 #X connect 12 0 11 0;
-#X connect 13 0 18 0;
-#X connect 14 0 25 0;
-#X connect 14 1 31 0;
-#X connect 14 2 37 0;
+#X connect 13 0 17 0;
+#X connect 14 0 1 0;
 #X connect 15 0 1 0;
-#X connect 16 0 1 0;
-#X connect 17 0 6 0;
-#X connect 18 0 21 0;
-#X connect 19 0 18 1;
-#X connect 20 0 17 1;
-#X connect 21 0 17 0;
-#X connect 22 0 14 0;
-#X connect 23 0 24 1;
-#X connect 23 0 26 1;
-#X connect 24 0 26 1;
-#X connect 24 0 27 0;
-#X connect 25 0 26 0;
-#X connect 25 1 28 0;
-#X connect 25 2 23 0;
-#X connect 26 0 13 0;
-#X connect 27 0 24 1;
-#X connect 29 0 24 0;
-#X connect 30 0 32 1;
-#X connect 30 0 34 1;
-#X connect 31 0 32 0;
-#X connect 31 1 35 0;
-#X connect 31 2 30 0;
-#X connect 32 0 13 1;
-#X connect 33 0 34 1;
-#X connect 34 0 32 1;
-#X connect 34 0 33 0;
-#X connect 36 0 34 0;
-#X connect 37 0 38 0;
-#X connect 37 1 42 0;
-#X connect 37 2 41 0;
-#X connect 38 0 21 1;
-#X connect 39 0 40 1;
-#X connect 40 0 38 1;
-#X connect 40 0 39 0;
-#X connect 41 0 38 1;
-#X connect 41 0 40 1;
-#X connect 43 0 40 0;
-#X connect 45 0 49 0;
-#X connect 45 0 53 0;
-#X connect 46 0 44 0;
-#X connect 49 0 54 0;
-#X connect 50 0 55 0;
-#X connect 51 0 52 0;
-#X connect 53 0 51 0;
-#X connect 54 0 50 0;
-#X connect 55 0 44 0;
-#X connect 56 0 57 0;
+#X connect 16 0 6 0;
+#X connect 17 0 20 0;
+#X connect 18 0 17 1;
+#X connect 19 0 16 1;
+#X connect 20 0 16 0;
+#X connect 22 0 26 0;
+#X connect 22 0 30 0;
+#X connect 23 0 21 0;
+#X connect 26 0 31 0;
+#X connect 27 0 32 0;
+#X connect 28 0 29 0;
+#X connect 30 0 28 0;
+#X connect 31 0 27 0;
+#X connect 32 0 21 0;
+#X connect 33 0 34 0;
+#X connect 35 0 36 0;
+#X connect 35 0 37 1;
+#X connect 36 0 35 1;
+#X connect 37 0 13 0;
+#X connect 38 0 35 0;
+#X connect 39 0 38 0;
+#X connect 39 1 37 0;
+#X connect 40 0 35 0;
+#X connect 41 0 52 1;
+#X connect 42 0 13 1;
+#X connect 43 0 52 0;
+#X connect 44 0 43 0;
+#X connect 44 1 42 0;
+#X connect 45 0 53 1;
+#X connect 46 0 20 1;
+#X connect 47 0 54 0;
+#X connect 47 1 46 0;
+#X connect 48 0 49 0;
+#X connect 49 0 39 0;
+#X connect 49 1 44 0;
+#X connect 49 2 47 0;
+#X connect 50 0 52 0;
+#X connect 51 0 53 0;
+#X connect 52 0 41 0;
+#X connect 52 0 42 1;
+#X connect 53 0 45 0;
+#X connect 53 0 46 1;
+#X connect 54 0 53 0;
 #X coords 0 -1 1 1 150 30 1 300 600;
diff --git a/lightboard/abs_light/bus_master2.pd b/lightboard/abs_light/bus_master2.pd
index dbabad3..8d6a608 100755
--- a/lightboard/abs_light/bus_master2.pd
+++ b/lightboard/abs_light/bus_master2.pd
@@ -1,4 +1,4 @@
-#N canvas 489 95 665 710 10;
+#N canvas 1179 322 665 710 10;
 #X obj 232 427 unpack f f;
 #X obj 232 370 t l b;
 #X obj 61 470 spigot 1;
@@ -11,7 +11,6 @@
 #X floatatom 399 601 3 0 0 0 - - -;
 #X obj 399 575 change;
 #X obj 399 553 i;
-#X obj 61 32 r metro_dmx_int2;
 #X obj 232 342 r set_led\$1;
 #X obj 266 318 r set_led;
 #X obj 107 565 \$1;
@@ -81,14 +80,14 @@
 #X connect 27 0 28 0;
 #X connect 28 0 25 0;
 #X restore 61 606 pd dmx_out;
-#X msg 121 84 0;
-#X obj 88 167 max;
-#X obj 61 63 t b b b;
-#X obj 61 213 f;
-#X obj 104 192 f;
-#X obj 80 107 s led\$1-bang;
-#X obj 88 142 r led\$1-bus;
-#X obj 121 59 r metro_dmx2;
+#X obj 76 233 max;
+#X obj 95 260 f;
+#X obj 61 261 f;
+#X msg 34 187 0 0;
+#X obj 34 167 t b b;
+#X obj 34 133 t b b b;
+#X obj 34 106 r metro_dmx_int2;
+#X obj 76 199 r led\$1-bus;
 #X connect 0 0 7 0;
 #X connect 0 1 4 0;
 #X connect 1 0 0 0;
@@ -99,25 +98,24 @@
 #X connect 5 0 2 1;
 #X connect 6 0 8 0;
 #X connect 7 0 11 0;
-#X connect 7 0 18 0;
+#X connect 7 0 17 0;
 #X connect 8 0 2 0;
 #X connect 10 0 9 0;
 #X connect 11 0 10 0;
-#X connect 12 0 22 0;
+#X connect 12 0 1 0;
 #X connect 13 0 1 0;
-#X connect 14 0 1 0;
-#X connect 15 0 16 0;
-#X connect 16 0 19 1;
-#X connect 17 0 15 0;
-#X connect 18 0 19 0;
-#X connect 20 0 21 1;
-#X connect 20 0 23 1;
-#X connect 21 0 23 1;
-#X connect 21 0 24 0;
-#X connect 22 0 23 0;
-#X connect 22 1 25 0;
-#X connect 23 0 6 0;
-#X connect 24 0 21 1;
-#X connect 26 0 21 0;
-#X connect 27 0 20 0;
+#X connect 14 0 15 0;
+#X connect 15 0 18 1;
+#X connect 16 0 14 0;
+#X connect 17 0 18 0;
+#X connect 19 0 20 0;
+#X connect 19 0 21 1;
+#X connect 20 0 19 1;
+#X connect 21 0 6 0;
+#X connect 22 0 19 0;
+#X connect 23 0 22 0;
+#X connect 23 1 21 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 0;
+#X connect 26 0 19 0;
 #X coords 0 -1 1 1 120 16 1 300 600;
diff --git a/lightboard/abs_light/get_bus.pd b/lightboard/abs_light/get_bus.pd
index ab55284..43bc136 100644
--- a/lightboard/abs_light/get_bus.pd
+++ b/lightboard/abs_light/get_bus.pd
@@ -1,36 +1,18 @@
-#N canvas 1089 367 504 358 10;
-#X obj 84 208 list prepend;
-#X obj 84 235 list;
-#X obj 61 261 list;
-#X msg 203 141 list;
-#X obj 62 314 outlet;
-#X obj 61 288 list_max;
-#X obj 84 108 s \$1-bang;
-#X obj 84 142 r \$1-bus;
-#X obj 61 32 inlet;
-#X obj 61 76 t b b b b;
-#X msg 154 136 list;
-#X obj 84 166 spigot;
-#X text 194 265 a faire proprement le call : ne doit etre fait qu'une
-fois \, et pas pour chaques abstraction \, pour eviter d'avoir autant
-d'argument que d'bstraction.;
-#X msg 229 101 1;
-#X msg 195 98 0;
-#X connect 0 0 1 0;
-#X connect 1 0 0 1;
-#X connect 1 0 2 1;
-#X connect 2 0 5 0;
-#X connect 3 0 0 1;
-#X connect 5 0 4 0;
-#X connect 7 0 11 0;
-#X connect 8 0 9 0;
-#X connect 9 0 2 0;
-#X connect 9 0 14 0;
-#X connect 9 1 6 0;
-#X connect 9 2 10 0;
-#X connect 9 2 13 0;
-#X connect 9 3 3 0;
-#X connect 10 0 0 0;
-#X connect 11 0 0 0;
-#X connect 13 0 11 1;
-#X connect 14 0 11 1;
+#N canvas 807 635 504 358 10;
+#X obj 75 170 outlet;
+#X obj 90 83 r \$1-bus;
+#X obj 90 117 max;
+#X obj 109 144 f;
+#X obj 75 145 f;
+#X msg 48 71 0 0;
+#X obj 48 51 t b b;
+#X obj 48 29 r metro_get_bus\$2;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 0 4 1;
+#X connect 3 0 2 1;
+#X connect 4 0 0 0;
+#X connect 5 0 2 0;
+#X connect 6 0 5 0;
+#X connect 6 1 4 0;
+#X connect 7 0 6 0;
diff --git a/lightboard/abs_light/get_effet.pd b/lightboard/abs_light/get_effet.pd
new file mode 100644
index 0000000..ae57704
--- /dev/null
+++ b/lightboard/abs_light/get_effet.pd
@@ -0,0 +1,18 @@
+#N canvas 803 645 504 358 10;
+#X obj 75 170 outlet;
+#X obj 90 83 r \$1-bus;
+#X obj 90 117 max;
+#X obj 109 144 f;
+#X obj 75 145 f;
+#X msg 48 71 0 0;
+#X obj 48 51 t b b;
+#X obj 48 29 r metro_get_effet\$2;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 0 4 1;
+#X connect 3 0 2 1;
+#X connect 4 0 0 0;
+#X connect 5 0 2 0;
+#X connect 6 0 5 0;
+#X connect 6 1 4 0;
+#X connect 7 0 6 0;
diff --git a/lightboard/abs_light/mem_effet.pd b/lightboard/abs_light/mem_effet.pd
index 50fc777..4916291 100755
--- a/lightboard/abs_light/mem_effet.pd
+++ b/lightboard/abs_light/mem_effet.pd
@@ -1,4 +1,4 @@
-#N canvas 871 179 894 617 10;
+#N canvas 732 275 894 617 10;
 #X obj 354 343 pack f f;
 #X obj 321 108 list split;
 #X obj 388 56 \$1;
@@ -11,7 +11,7 @@
 #X floatatom 100 321 2 0 100 0 - - -;
 #X obj 157 261 i;
 #X msg 157 284 set \$1;
-#X msg 100 140 set 2;
+#X msg 100 140 set 1;
 #X msg 100 116 set set \$1 \, bang;
 #X obj 100 334 tgl 16 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
@@ -46,7 +46,7 @@
 #X connect 9 0 0 0;
 #X restore 100 376 pd send_valeur_light_when_recording;
 #X obj 481 297 r ramp_time_light;
-#N canvas 0 0 450 300 up_down 0;
+#N canvas 0 50 450 300 up_down 0;
 #X obj 32 248 outlet;
 #X obj 40 9 inlet;
 #X msg 40 86 \$1;
@@ -69,7 +69,7 @@
 #X connect 8 0 9 1;
 #X connect 9 0 3 0;
 #X restore 407 321 pd up_down;
-#N canvas 0 0 450 300 up_down 0;
+#N canvas 0 50 450 300 up_down 0;
 #X obj 37 40 inlet;
 #X msg 38 66 \$1;
 #X obj 36 140 sel 0 1;
@@ -130,7 +130,6 @@
 #X obj 611 16 r effet-\$1;
 #X obj 158 166 _speedlim 50;
 #X obj 355 534 r \$0-valeur_lumiere;
-#X obj 355 560 bus effet\$1;
 #X obj 209 14 r bcf_data;
 #X obj 209 495 s bcf_data2;
 #X obj 209 450 pack f \$1;
@@ -167,6 +166,7 @@
 #X connect 8 0 6 0;
 #X connect 9 0 5 0;
 #X restore 209 37 pd route;
+#X obj 355 560 bus_effet effet\$1;
 #X connect 0 0 33 0;
 #X connect 1 1 5 0;
 #X connect 2 0 3 0;
@@ -205,7 +205,7 @@
 #X connect 30 0 32 0;
 #X connect 31 0 6 0;
 #X connect 32 0 33 0;
-#X connect 32 0 58 0;
+#X connect 32 0 57 0;
 #X connect 33 0 20 0;
 #X connect 34 0 35 0;
 #X connect 34 1 45 0;
@@ -244,19 +244,19 @@
 #X connect 47 0 34 0;
 #X connect 48 0 31 0;
 #X connect 48 0 9 0;
-#X connect 48 0 55 0;
-#X connect 49 0 50 0;
-#X connect 51 0 64 0;
-#X connect 53 0 54 0;
+#X connect 48 0 54 0;
+#X connect 49 0 64 0;
+#X connect 50 0 63 0;
+#X connect 52 0 53 0;
+#X connect 53 0 51 0;
 #X connect 54 0 52 0;
-#X connect 55 0 53 0;
+#X connect 56 0 55 0;
 #X connect 57 0 56 0;
-#X connect 58 0 57 0;
-#X connect 59 0 32 0;
+#X connect 58 0 32 0;
+#X connect 59 0 60 0;
 #X connect 60 0 61 0;
-#X connect 61 0 62 0;
-#X connect 62 0 57 1;
-#X connect 62 0 53 1;
-#X connect 62 0 64 1;
-#X connect 64 0 59 0;
+#X connect 61 0 56 1;
+#X connect 61 0 52 1;
+#X connect 61 0 63 1;
+#X connect 63 0 58 0;
 #X coords 0 -1 1 1 16 150 2 100 200;