From 8b69d70bf92ae85f73bd3852663120883eaa2615 Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Mon, 25 May 2009 11:18:48 +0000 Subject: add a project that i use to control light in DMX for diferent projet. it is just like a cheep lighing interface, but hjave an open API so you can easilly control any light / memory thanks to sensors / sound etc. svn path=/trunk/abstractions/nusmuk/; revision=11495 --- lightboard/abs_light/_speedlim.pd | 40 +++++ lightboard/abs_light/aff_light.pd | 67 +++++++++ lightboard/abs_light/bcf_mem.pd | 36 +++++ lightboard/abs_light/bus.pd | 12 ++ lightboard/abs_light/bus_master.pd | 50 +++++++ lightboard/abs_light/dmx_out-help.pd | 67 +++++++++ lightboard/abs_light/dmx_out.pd | 90 +++++++++++ lightboard/abs_light/line_curve_smooth.pd | 134 +++++++++++++++++ lightboard/abs_light/list_max.pd | 24 +++ lightboard/abs_light/mem_groupe.pd | 225 ++++++++++++++++++++++++++++ lightboard/abs_light/mem_lumiere.pd | 210 ++++++++++++++++++++++++++ lightboard/abs_light/random_parametrique.pd | 35 +++++ lightboard/abs_light/sel_bank.pd | 62 ++++++++ 13 files changed, 1052 insertions(+) create mode 100644 lightboard/abs_light/_speedlim.pd create mode 100644 lightboard/abs_light/aff_light.pd create mode 100755 lightboard/abs_light/bcf_mem.pd create mode 100755 lightboard/abs_light/bus.pd create mode 100755 lightboard/abs_light/bus_master.pd create mode 100755 lightboard/abs_light/dmx_out-help.pd create mode 100755 lightboard/abs_light/dmx_out.pd create mode 100755 lightboard/abs_light/line_curve_smooth.pd create mode 100644 lightboard/abs_light/list_max.pd create mode 100755 lightboard/abs_light/mem_groupe.pd create mode 100755 lightboard/abs_light/mem_lumiere.pd create mode 100755 lightboard/abs_light/random_parametrique.pd create mode 100755 lightboard/abs_light/sel_bank.pd (limited to 'lightboard/abs_light') diff --git a/lightboard/abs_light/_speedlim.pd b/lightboard/abs_light/_speedlim.pd new file mode 100644 index 0000000..b792ed3 --- /dev/null +++ b/lightboard/abs_light/_speedlim.pd @@ -0,0 +1,40 @@ +#N canvas 0 0 327 315 10; +#X obj 45 33 inlet; +#X obj 44 448 outlet; +#X obj 68 124 list; +#X msg 122 272 1; +#X msg 111 102 1; +#X msg 70 273 0; +#X obj 44 214 t a b b; +#X obj 90 350 sel 1; +#X obj 89 378 f; +#X obj 59 402 sel 1; +#X obj 45 68 t a a b; +#X obj 44 162 spigot 1; +#X obj 177 339 f; +#X obj 121 297 t f f; +#X obj 71 298 t f f; +#X obj 265 24 inlet; +#X obj 121 248 delay \$1; +#X connect 0 0 10 0; +#X connect 2 0 11 0; +#X connect 3 0 13 0; +#X connect 4 0 8 1; +#X connect 5 0 14 0; +#X connect 6 0 1 0; +#X connect 6 1 5 0; +#X connect 6 2 16 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 10 0 11 0; +#X connect 10 1 2 1; +#X connect 10 2 4 0; +#X connect 11 0 6 0; +#X connect 12 0 11 1; +#X connect 13 0 7 0; +#X connect 13 1 12 0; +#X connect 14 0 8 1; +#X connect 14 1 12 0; +#X connect 15 0 16 1; +#X connect 16 0 3 0; diff --git a/lightboard/abs_light/aff_light.pd b/lightboard/abs_light/aff_light.pd new file mode 100644 index 0000000..31e09a5 --- /dev/null +++ b/lightboard/abs_light/aff_light.pd @@ -0,0 +1,67 @@ +#N canvas 186 138 474 528 10; +#X obj 301 312 loadbang; +#X obj 301 353 symbol \$2; +#X obj 315 333 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 93 305 tgl 8 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 +; +#X floatatom 301 423 3 0 0 0 - - -; +#X obj 377 350 f \$1; +#X msg 55 254 1; +#X msg 91 253 0; +#X obj 91 281 f; +#X obj 300 416 cnv 1 1 5 empty \$0-size empty 20 12 0 14 -99865 -66577 +0; +#X obj 14 352 s \$0-size; +#X floatatom 23 310 5 0 0 0 - - -; +#X text 46 415 taille de la zone de selection; +#X obj 91 209 t b; +#X text 102 301 mvt; +#X symbolatom 301 400 13 0 0 0 - - -; +#X floatatom 371 423 3 0 0 0 - - -; +#X obj 178 497 i; +#X msg 39 396 size 115 15; +#X obj 14 71 r simulation_light_\$1; +#X obj 14 221 min 100; +#X obj 14 243 max 0; +#X msg 377 324 bang; +#X msg 377 372 set \$1; +#X obj 14 94 i; +#X obj 14 115 change -1; +#X obj 14 176 f; +#X obj 91 231 delay 200; +#X text 104 13 aff_light \, num circuit \, nom; +#X obj 14 278 * 0.94; +#X msg 43 378 size 0 5; +#X msg 14 330 vis_size \$1 5; +#X obj 14 137 _speedlim 80; +#X connect 0 0 1 0; +#X connect 0 0 5 0; +#X connect 1 0 15 0; +#X connect 2 0 1 0; +#X connect 4 0 22 0; +#X connect 5 0 23 0; +#X connect 6 0 8 0; +#X connect 7 0 8 0; +#X connect 8 0 3 0; +#X connect 11 0 31 0; +#X connect 13 0 27 0; +#X connect 17 0 16 0; +#X connect 18 0 10 0; +#X connect 19 0 24 0; +#X connect 20 0 21 0; +#X connect 21 0 17 0; +#X connect 21 0 29 0; +#X connect 22 0 5 0; +#X connect 23 0 4 0; +#X connect 24 0 25 0; +#X connect 25 0 32 0; +#X connect 26 0 6 0; +#X connect 26 0 13 0; +#X connect 26 0 20 0; +#X connect 27 0 7 0; +#X connect 29 0 31 0; +#X connect 30 0 10 0; +#X connect 31 0 10 0; +#X connect 32 0 26 0; +#X coords 0 -1 1 1 95 37 2 300 400; diff --git a/lightboard/abs_light/bcf_mem.pd b/lightboard/abs_light/bcf_mem.pd new file mode 100755 index 0000000..9634b14 --- /dev/null +++ b/lightboard/abs_light/bcf_mem.pd @@ -0,0 +1,36 @@ +#N canvas 0 0 463 363 10; +#X obj 61 25 r bcf_data; +#X obj 61 125 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 +-1 -1 0 1; +#X obj 25 306 bus lumiere\$1; +#X obj 61 49 route \$1; +#X obj 25 284 / 1.27; +#X msg 61 72 set \$1; +#X obj 178 322 s bcf_data2; +#X obj 178 269 pack f \$1; +#X msg 178 292 \$2 \$1; +#X obj 206 33 r bcf_bank; +#X obj 206 144 ==; +#X obj 224 57 loadbang; +#X obj 224 80 \$1; +#X obj 206 166 sel 1; +#X obj 206 189 delay 0; +#X obj 224 103 / 8; +#X obj 224 123 i; +#X connect 0 0 3 0; +#X connect 1 0 7 0; +#X connect 1 0 4 0; +#X connect 3 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X connect 5 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 10 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 15 0; +#X connect 13 0 14 0; +#X connect 14 0 1 0; +#X connect 15 0 16 0; +#X connect 16 0 10 1; diff --git a/lightboard/abs_light/bus.pd b/lightboard/abs_light/bus.pd new file mode 100755 index 0000000..72e525d --- /dev/null +++ b/lightboard/abs_light/bus.pd @@ -0,0 +1,12 @@ +#N canvas 0 0 450 300 10; +#X obj 77 23 inlet; +#X obj 61 118 f; +#X obj 61 74 r \$1-bang; +#X obj 61 142 s \$1-bus; +#X obj 188 27 inlet; +#X obj 63 95 spigot 1; +#X connect 0 0 1 1; +#X connect 1 0 3 0; +#X connect 2 0 5 0; +#X connect 4 0 5 1; +#X connect 5 0 1 0; diff --git a/lightboard/abs_light/bus_master.pd b/lightboard/abs_light/bus_master.pd new file mode 100755 index 0000000..3276b9a --- /dev/null +++ b/lightboard/abs_light/bus_master.pd @@ -0,0 +1,50 @@ +#N canvas 708 252 389 434 10; +#X obj 61 30 loadbang; +#X obj 61 76 t b b b; +#X obj 84 168 list prepend; +#X obj 84 195 list; +#X obj 61 221 list; +#X msg 203 141 list; +#X obj 61 52 metro 20; +#X obj 232 277 unpack f f; +#X obj 232 220 t l b; +#X obj 61 320 spigot 1; +#X msg 264 243 0; +#X obj 299 301 delay; +#X msg 299 324 1; +#X obj 268 169 r cut; +#X obj 61 271 max 0; +#X obj 123 405 s simulation_light_\$1; +#X obj 61 405 outlet; +#X obj 61 383 f; +#X obj 84 108 s lumiere\$1-bang; +#X obj 84 142 r lumiere\$1-bus; +#X obj 232 192 r cut_lumiere\$1; +#X obj 61 295 min 100; +#X obj 61 248 list_max; +#X connect 0 0 6 0; +#X connect 1 0 4 0; +#X connect 1 1 18 0; +#X connect 1 2 5 0; +#X connect 2 0 3 0; +#X connect 3 0 2 1; +#X connect 3 0 4 1; +#X connect 4 0 22 0; +#X connect 5 0 2 1; +#X connect 6 0 1 0; +#X connect 7 0 17 0; +#X connect 7 1 11 0; +#X connect 8 0 7 0; +#X connect 8 1 10 0; +#X connect 9 0 17 0; +#X connect 10 0 9 1; +#X connect 11 0 12 0; +#X connect 12 0 9 1; +#X connect 13 0 8 0; +#X connect 14 0 21 0; +#X connect 17 0 15 0; +#X connect 17 0 16 0; +#X connect 19 0 2 0; +#X connect 20 0 8 0; +#X connect 21 0 9 0; +#X connect 22 0 14 0; diff --git a/lightboard/abs_light/dmx_out-help.pd b/lightboard/abs_light/dmx_out-help.pd new file mode 100755 index 0000000..163f017 --- /dev/null +++ b/lightboard/abs_light/dmx_out-help.pd @@ -0,0 +1,67 @@ +#N canvas 112 68 516 465 10; +#N canvas 0 22 450 300 (subpatch) 0; +#X array \$0-curve 200 float 0; +#X coords 0 1 199 0 200 200 1; +#X restore 33 229 graph; +#N canvas 786 75 427 417 draw_array 0; +#X msg 54 82 bang; +#X obj 54 103 until; +#X text 85 82 start; +#X obj 54 125 f; +#X obj 83 125 + 1; +#X obj 54 43 loadbang; +#X obj 54 180 trigger float float; +#X obj 127 127 select 0; +#X obj 54 313 tabwrite \$0-curve; +#X obj 138 9 inlet; +#X obj 153 32 send \$0-to-numbox; +#X obj 139 53 trigger bang float; +#X obj 83 147 mod 200; +#X obj 54 257 / 200; +#X text 96 257 mapping output range: 0 to 1; +#N canvas 0 0 456 374 curve 0; +#X obj 69 45 inlet; +#X obj 69 296 outlet; +#X obj 69 252 pow 1; +#X obj 308 110 t f b; +#X msg 340 133 2; +#X obj 340 154 log; +#X obj 322 178 *; +#X obj 322 202 exp; +#X obj 308 60 inlet; +#X connect 0 0 2 0; +#X connect 2 0 1 0; +#X connect 3 0 6 0; +#X connect 3 1 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 2 1; +#X connect 8 0 3 0; +#X restore 54 284 pd curve; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 4 0 12 0; +#X connect 5 0 0 0; +#X connect 6 0 13 0; +#X connect 6 1 8 1; +#X connect 7 0 1 1; +#X connect 9 0 10 0; +#X connect 9 0 11 0; +#X connect 11 0 0 0; +#X connect 11 1 15 1; +#X connect 12 0 3 1; +#X connect 12 0 7 0; +#X connect 13 0 15 0; +#X connect 15 0 8 0; +#X restore 35 188 pd draw_array; +#X obj 38 166 hsl 128 15 -3 3 0 0 empty empty empty -2 -6 0 8 -262144 +-1 -1 0 0; +#X floatatom 140 192 5 0 0 0 - - -; +#X obj 44 53 dmx_out 5 0; +#X text 78 76 1er argument : cannal dmx en sortie; +#X text 78 91 2eme argument : courbe; +#X connect 2 0 1 0; +#X connect 2 0 3 0; diff --git a/lightboard/abs_light/dmx_out.pd b/lightboard/abs_light/dmx_out.pd new file mode 100755 index 0000000..fe1ce28 --- /dev/null +++ b/lightboard/abs_light/dmx_out.pd @@ -0,0 +1,90 @@ +#N canvas 485 116 380 654 10; +#X obj 59 602 ctlout; +#X obj 152 449 * 2; +#X obj 152 529 + 1; +#X obj 133 602 ctlout; +#X obj 59 350 moses 128; +#X obj 133 373 - 128; +#X obj 152 499 & 127; +#X obj 196 499 >> 7; +#X obj 152 471 t f f; +#X obj 59 297 t f b; +#X obj 152 397 \$1; +#X obj 59 103 i; +#X obj 59 152 max 0; +#X obj 59 175 change; +#X obj 59 8 inlet; +#X obj 59 247 spigot 1; +#X obj 112 223 r master_light; +#X obj 152 423 - 1; +#X obj 59 128 min 256; +#N canvas 0 0 456 374 curve 0; +#X obj 69 45 inlet; +#X obj 69 296 outlet; +#X obj 69 252 pow 1; +#X obj 308 110 t f b; +#X msg 340 133 2; +#X obj 340 154 log; +#X obj 322 178 *; +#X obj 322 202 exp; +#X obj 308 87 \$2; +#X obj 308 60 loadbang; +#X connect 0 0 2 0; +#X connect 2 0 1 0; +#X connect 3 0 6 0; +#X connect 3 1 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 2 1; +#X connect 8 0 3 0; +#X connect 9 0 8 0; +#X restore 59 54 pd curve; +#X obj 59 81 * 255; +#X obj 196 522 + 1; +#X obj 59 272 spigot 1; +#X obj 243 218 \$1; +#X obj 243 239 > 0; +#X obj 243 197 loadbang; +#X obj 59 29 / 100; +#X obj 292 6 inlet; +#X obj 59 196 _speedlim 20; +#X obj 226 523 r dmx_channel; +#X obj 226 547 - 1; +#X obj 196 569 +; +#X connect 1 0 8 0; +#X connect 2 0 3 1; +#X connect 4 0 0 0; +#X connect 4 1 5 0; +#X connect 5 0 3 0; +#X connect 6 0 2 0; +#X connect 6 0 0 1; +#X connect 7 0 21 0; +#X connect 8 0 6 0; +#X connect 8 1 7 0; +#X connect 9 0 4 0; +#X connect 9 1 10 0; +#X connect 10 0 17 0; +#X connect 11 0 18 0; +#X connect 12 0 13 0; +#X connect 13 0 28 0; +#X connect 14 0 26 0; +#X connect 15 0 22 0; +#X connect 16 0 15 1; +#X connect 17 0 1 0; +#X connect 18 0 12 0; +#X connect 19 0 20 0; +#X connect 20 0 11 0; +#X connect 21 0 31 0; +#X connect 22 0 9 0; +#X connect 23 0 24 0; +#X connect 24 0 22 1; +#X connect 25 0 23 0; +#X connect 26 0 19 0; +#X connect 27 0 23 0; +#X connect 27 0 10 0; +#X connect 28 0 15 0; +#X connect 29 0 30 0; +#X connect 30 0 31 1; +#X connect 31 0 3 2; +#X connect 31 0 0 2; diff --git a/lightboard/abs_light/line_curve_smooth.pd b/lightboard/abs_light/line_curve_smooth.pd new file mode 100755 index 0000000..08c97fb --- /dev/null +++ b/lightboard/abs_light/line_curve_smooth.pd @@ -0,0 +1,134 @@ +#N canvas 280 94 580 502 10; +#X obj 134 375 outlet; +#X obj 37 19 inlet; +#X obj 134 110 route float list; +#X obj 279 20 inlet; +#X msg 37 86 stop; +#X obj 279 48 unpack f f; +#X obj 134 85 t a a; +#N canvas 512 295 450 300 rescale 0; +#X obj 29 27 inlet; +#X obj 89 27 inlet; +#X obj 103 265 outlet; +#X msg 89 82 \$1; +#X obj 89 54 t a b; +#X obj 29 181 *; +#X obj 103 237 +; +#X obj 121 105 f; +#X obj 89 143 -; +#X obj 176 205 == 0; +#X obj 176 227 sel 1; +#X obj 176 254 outlet; +#X connect 0 0 5 0; +#X connect 1 0 4 0; +#X connect 3 0 8 0; +#X connect 4 0 3 0; +#X connect 4 1 7 0; +#X connect 5 0 6 0; +#X connect 6 0 2 0; +#X connect 6 0 7 1; +#X connect 7 0 6 1; +#X connect 7 0 8 1; +#X connect 8 0 5 1; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X restore 134 344 pd rescale; +#N canvas 0 0 456 374 pow_curve 0; +#X obj 69 45 inlet; +#X obj 69 296 outlet; +#X obj 308 47 inlet; +#X obj 69 252 pow 1; +#X obj 308 110 t f b; +#X msg 340 133 2; +#X obj 340 154 log; +#X obj 322 178 *; +#X obj 322 202 exp; +#X connect 0 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 1 0; +#X connect 4 0 7 0; +#X connect 4 1 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 7 0 8 0; +#X connect 8 0 3 1; +#X restore 134 289 pd pow_curve; +#X obj 134 262 line 0 \$1; +#X msg 134 159 1; +#X obj 463 14 inlet; +#X obj 188 154 route 0; +#X obj 188 133 swap; +#X msg 234 178 0 \, 1 \$1; +#N canvas 0 0 678 417 curve_sigmoide 0; +#X obj 37 79 inlet; +#X obj 37 351 outlet; +#X obj 37 198 * 1; +#X obj 284 18 inlet; +#X obj 37 278 expr $f1 / $f2; +#X obj 37 251 - 0.5; +#X obj 316 249 - 0.5; +#X obj 37 118 - 0.5; +#X obj 37 140 * 2; +#X obj 37 304 / 2; +#X obj 37 326 + 0.5; +#X obj 284 105 * 10; +#X obj 284 154 t f f; +#X msg 304 70 0; +#X obj 304 47 loadbang; +#X obj 316 227 expr (exp($f1)) / ( 1 + exp($f1)); +#X obj 37 228 expr (exp($f1)) / ( 1 + exp($f1)); +#X obj 284 130 + 0.00015; +#X connect 0 0 7 0; +#X connect 2 0 16 0; +#X connect 3 0 11 0; +#X connect 4 0 9 0; +#X connect 5 0 4 0; +#X connect 6 0 4 1; +#X connect 7 0 8 0; +#X connect 8 0 2 0; +#X connect 9 0 10 0; +#X connect 10 0 1 0; +#X connect 11 0 17 0; +#X connect 12 0 2 1; +#X connect 12 1 15 0; +#X connect 13 0 11 0; +#X connect 14 0 13 0; +#X connect 15 0 6 0; +#X connect 16 0 5 0; +#X connect 17 0 12 0; +#X restore 134 317 pd curve_sigmoide; +#X obj 37 46 route stop set; +#X msg 84 88 set \$1; +#X text 291 367 protection si destination == depart \, alors pas de +line \, pour reduire l'utilisation CPU; +#X msg 201 388 stop; +#X obj 201 365 delay 1; +#X msg 188 178 1; +#X connect 1 0 16 0; +#X connect 2 0 10 0; +#X connect 2 1 13 0; +#X connect 3 0 5 0; +#X connect 4 0 9 0; +#X connect 5 0 8 1; +#X connect 5 1 15 1; +#X connect 6 0 2 0; +#X connect 6 1 7 1; +#X connect 7 0 0 0; +#X connect 7 1 20 0; +#X connect 8 0 15 0; +#X connect 9 0 8 0; +#X connect 10 0 9 0; +#X connect 11 0 9 0; +#X connect 12 0 21 0; +#X connect 12 1 14 0; +#X connect 13 0 12 0; +#X connect 14 0 9 0; +#X connect 15 0 7 0; +#X connect 16 0 4 0; +#X connect 16 1 17 0; +#X connect 16 1 4 0; +#X connect 16 2 6 0; +#X connect 19 0 9 0; +#X connect 20 0 19 0; +#X connect 21 0 9 0; diff --git a/lightboard/abs_light/list_max.pd b/lightboard/abs_light/list_max.pd new file mode 100644 index 0000000..bca3288 --- /dev/null +++ b/lightboard/abs_light/list_max.pd @@ -0,0 +1,24 @@ +#N canvas 0 0 441 373 10; +#X obj 100 63 inlet; +#X obj 123 132 list split 1; +#X obj 123 207 max; +#X msg 146 184 0; +#X obj 163 154 list; +#X obj 141 235 f; +#X obj 100 260 f; +#X obj 100 85 t b a b; +#X obj 123 110 list prepend 0; +#X obj 100 284 outlet; +#X connect 0 0 7 0; +#X connect 1 0 2 0; +#X connect 1 1 4 0; +#X connect 2 0 5 0; +#X connect 3 0 2 1; +#X connect 4 0 1 0; +#X connect 5 0 2 1; +#X connect 5 0 6 1; +#X connect 6 0 9 0; +#X connect 7 0 6 0; +#X connect 7 1 8 0; +#X connect 7 2 3 0; +#X connect 8 0 1 0; diff --git a/lightboard/abs_light/mem_groupe.pd b/lightboard/abs_light/mem_groupe.pd new file mode 100755 index 0000000..2ab4983 --- /dev/null +++ b/lightboard/abs_light/mem_groupe.pd @@ -0,0 +1,225 @@ +#N canvas 628 41 695 617 10; +#X obj 354 343 pack f f; +#X obj 321 108 list split; +#X obj 388 56 \$1; +#X obj 388 85 - 1; +#X obj 388 37 loadbang; +#X obj 354 132 list split 1; +#X obj 100 221 vsl 16 101 0 100 0 0 empty empty empty 0 -9 0 10 -262144 +-1 -1 0 1; +#X floatatom 100 200 2 0 0 0 - - -; +#X floatatom 100 326 2 0 100 0 - - -; +#X obj 157 261 i; +#X msg 157 284 set \$1; +#X msg 100 140 set 1; +#X msg 100 116 set set \$1 \, bang; +#X obj 100 340 tgl 16 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 354 209 moses 0; +#X obj 400 232 t f b; +#X msg 432 254 0; +#X msg 317 236 1; +#X obj 354 300 t f f; +#X obj 496 344 r curve_lumiere_ramp; +#X obj 354 508 s \$0-valeur_lumiere; +#X obj 104 435 r \$0-valeur_lumiere; +#X obj 157 143 r \$0-valeur_lumiere; +#N canvas 684 130 450 300 send_valeur_light_when_recording 0; +#X obj 32 100 f; +#X obj 100 98 * -1000; +#X obj 32 127 +; +#X obj 50 78 r \$0-valeur_lumiere; +#X obj 100 29 inlet; +#X text 117 125 valeur negative si en dehors de la sauvegarde; +#X obj 32 176 i; +#X obj 32 197 / 100; +#X obj 32 155 * 100; +#X obj 32 57 r get_valeur_mem_groupe-\$1; +#X obj 32 219 s valeur_mem_groupe_lumiere; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 8 0; +#X connect 3 0 0 1; +#X connect 4 0 1 0; +#X connect 6 0 7 0; +#X connect 7 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 0 0; +#X restore 99 386 pd send_valeur_light_when_recording; +#X obj 481 297 r ramp_time_light; +#N canvas 0 0 450 300 up_down 0; +#X obj 32 248 outlet; +#X obj 40 9 inlet; +#X msg 40 86 \$1; +#X obj 36 140 sel 0 1; +#X obj 248 6 inlet; +#X obj 52 175 unpack f f; +#X obj 32 208 f; +#X obj 90 217 f; +#X obj 96 14 r \$0-valeur_lumiere; +#X obj 37 117 <; +#X connect 1 0 2 0; +#X connect 2 0 9 0; +#X connect 3 0 6 0; +#X connect 3 1 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 5 1 7 1; +#X connect 6 0 0 0; +#X connect 7 0 0 0; +#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; +#X obj 37 40 inlet; +#X msg 38 66 \$1; +#X obj 36 140 sel 0 1; +#X obj 221 47 inlet; +#X obj 32 208 f; +#X obj 89 209 f; +#X obj 224 72 unpack f f f f; +#X obj 32 276 outlet; +#X obj 32 248 pack f f; +#X obj 137 210 f; +#X obj 194 211 f; +#X obj 37 163 t b b; +#X obj 87 163 t b b; +#X obj 55 92 r \$0-valeur_lumiere; +#X obj 37 117 <; +#X connect 0 0 1 0; +#X connect 1 0 14 0; +#X connect 2 0 11 0; +#X connect 2 1 12 0; +#X connect 3 0 6 0; +#X connect 4 0 8 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 6 1 5 1; +#X connect 6 2 9 1; +#X connect 6 3 10 1; +#X connect 8 0 7 0; +#X connect 9 0 8 1; +#X connect 10 0 8 1; +#X connect 11 0 4 0; +#X connect 11 1 9 0; +#X connect 12 0 5 0; +#X connect 12 1 10 0; +#X connect 13 0 14 1; +#X connect 14 0 2 0; +#X restore 422 369 pd up_down; +#X obj 491 401 r manual_go_mem; +#X obj 544 430 == 0; +#X obj 491 453 spigot 1; +#X obj 230 102 / 1.27; +#X obj 13 15 r bcf_bank; +#X obj 13 146 ==; +#X obj 31 39 loadbang; +#X obj 31 62 \$1; +#X obj 13 168 sel 1; +#X obj 13 191 delay 0; +#X obj 31 105 / 8; +#X obj 31 125 i; +#X msg 289 634 \$2 \$1; +#X obj 289 589 * 1.27; +#X obj 101 215 cnv 2 14 3 empty \$0-green empty 20 12 0 14 -262144 +-262144 0; +#X obj 15 295 s \$0-green; +#X msg 15 271 color \$1 0; +#X msg 29 245 -63489; +#X msg 15 221 0; +#X obj 31 83 + 63; +#X obj 321 8 r mem_lumiere_groupe_ramp; +#X obj 354 475 line_curve_smooth 20; +#X obj 230 14 r bcf_data; +#X obj 342 585 + \$1; +#X obj 340 542 loadbang; +#X obj 289 611 pack f f; +#X obj 230 57 sel \$1; +#X obj 230 36 unpack f f; +#X obj 230 79 f; +#X obj 117 64 + 1; +#X obj 107 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 289 657 s bcf_data2; +#X msg 342 562 64; +#X obj 104 461 effet\$1; +#X obj 362 389 r instant_go; +#X msg 167 192 set \$1; +#X obj 157 166 f; +#X obj 387 424 f; +#X obj 289 502 f; +#X connect 0 0 48 0; +#X connect 1 1 5 0; +#X connect 2 0 3 0; +#X connect 2 0 12 0; +#X connect 3 0 1 1; +#X connect 4 0 2 0; +#X connect 5 0 14 0; +#X connect 6 0 64 0; +#X connect 7 0 11 0; +#X connect 8 0 64 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 7 0; +#X connect 12 0 11 0; +#X connect 13 0 23 0; +#X connect 13 0 28 0; +#X connect 14 0 17 0; +#X connect 14 1 15 0; +#X connect 15 0 18 0; +#X connect 15 1 16 0; +#X connect 16 0 13 0; +#X connect 17 0 13 0; +#X connect 18 0 0 0; +#X connect 18 0 64 1; +#X connect 18 1 25 0; +#X connect 18 1 26 0; +#X connect 19 0 26 1; +#X connect 21 0 60 0; +#X connect 22 0 63 0; +#X connect 24 0 25 1; +#X connect 25 0 0 1; +#X connect 26 0 48 1; +#X connect 27 0 29 0; +#X connect 28 0 29 1; +#X connect 29 0 48 2; +#X connect 30 0 64 0; +#X connect 31 0 32 0; +#X connect 32 0 35 0; +#X connect 33 0 34 0; +#X connect 34 0 46 0; +#X connect 35 0 36 0; +#X connect 35 0 44 0; +#X connect 35 1 45 0; +#X connect 36 0 65 0; +#X connect 37 0 38 0; +#X connect 38 0 32 1; +#X connect 39 0 58 0; +#X connect 40 0 52 0; +#X connect 43 0 42 0; +#X connect 44 0 43 0; +#X connect 45 0 43 0; +#X connect 46 0 37 0; +#X connect 46 0 56 0; +#X connect 47 0 1 0; +#X connect 48 0 20 0; +#X connect 48 0 65 1; +#X connect 49 0 54 0; +#X connect 50 0 52 1; +#X connect 51 0 59 0; +#X connect 52 0 39 0; +#X connect 53 0 55 0; +#X connect 54 0 53 0; +#X connect 54 1 55 1; +#X connect 55 0 30 0; +#X connect 56 0 53 1; +#X connect 57 0 34 0; +#X connect 59 0 50 0; +#X connect 61 0 64 0; +#X connect 62 0 6 0; +#X connect 63 0 62 0; +#X connect 63 0 9 0; +#X connect 64 0 48 0; +#X connect 64 0 65 1; +#X connect 65 0 40 0; +#X coords 0 -1 1 1 16 156 2 100 200; diff --git a/lightboard/abs_light/mem_lumiere.pd b/lightboard/abs_light/mem_lumiere.pd new file mode 100755 index 0000000..cb7e196 --- /dev/null +++ b/lightboard/abs_light/mem_lumiere.pd @@ -0,0 +1,210 @@ +#N canvas 558 86 691 598 10; +#X obj 321 8 r mem_lumiere_ramp; +#X obj 104 461 bus lumiere\$1; +#X obj 354 343 pack f f; +#X obj 321 108 list split; +#X obj 388 56 \$1; +#X obj 388 85 - 1; +#X obj 388 37 loadbang; +#X obj 354 132 list split 1; +#X obj 100 221 vsl 16 101 0 100 0 0 empty empty empty 0 -9 0 10 -262144 +-1 -1 0 1; +#X floatatom 100 200 2 0 0 0 - - -; +#X floatatom 100 326 2 0 100 0 - - -; +#X obj 157 261 i; +#X msg 157 284 set \$1; +#X msg 100 140 set 22; +#X msg 100 116 set set \$1 \, bang; +#X obj 100 340 tgl 16 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 354 209 moses 0; +#X obj 400 232 t f b; +#X msg 432 254 0; +#X msg 317 236 1; +#X obj 354 300 t f f; +#X obj 496 344 r curve_lumiere_ramp; +#X obj 354 508 s \$0-valeur_lumiere; +#X obj 104 435 r \$0-valeur_lumiere; +#X obj 157 143 r \$0-valeur_lumiere; +#N canvas 0 27 450 300 send_valeur_light_when_recording 0; +#X obj 32 100 f; +#X obj 32 57 r get_valeur_mem-\$1; +#X obj 32 219 s valeur_mem_lumiere; +#X obj 100 98 * -1000; +#X obj 32 127 +; +#X obj 50 78 r \$0-valeur_lumiere; +#X obj 100 29 inlet; +#X text 117 125 valeur negative si en dehors de la sauvegarde; +#X obj 32 176 i; +#X obj 32 197 / 100; +#X obj 32 155 * 100; +#X connect 0 0 4 0; +#X connect 1 0 0 0; +#X connect 3 0 4 1; +#X connect 4 0 10 0; +#X connect 5 0 0 1; +#X connect 6 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 10 0 8 0; +#X restore 100 371 pd send_valeur_light_when_recording; +#X obj 481 297 r ramp_time_light; +#N canvas 0 0 450 300 up_down 0; +#X obj 32 248 outlet; +#X obj 40 9 inlet; +#X msg 40 86 \$1; +#X obj 36 140 sel 0 1; +#X obj 248 6 inlet; +#X obj 52 175 unpack f f; +#X obj 32 208 f; +#X obj 90 217 f; +#X obj 96 14 r \$0-valeur_lumiere; +#X obj 37 117 <; +#X connect 1 0 2 0; +#X connect 2 0 9 0; +#X connect 3 0 6 0; +#X connect 3 1 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 5 1 7 1; +#X connect 6 0 0 0; +#X connect 7 0 0 0; +#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; +#X obj 37 40 inlet; +#X msg 38 66 \$1; +#X obj 36 140 sel 0 1; +#X obj 221 47 inlet; +#X obj 32 208 f; +#X obj 89 209 f; +#X obj 224 72 unpack f f f f; +#X obj 32 276 outlet; +#X obj 32 248 pack f f; +#X obj 137 210 f; +#X obj 194 211 f; +#X obj 37 163 t b b; +#X obj 87 163 t b b; +#X obj 55 92 r \$0-valeur_lumiere; +#X obj 37 117 <; +#X connect 0 0 1 0; +#X connect 1 0 14 0; +#X connect 2 0 11 0; +#X connect 2 1 12 0; +#X connect 3 0 6 0; +#X connect 4 0 8 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 6 1 5 1; +#X connect 6 2 9 1; +#X connect 6 3 10 1; +#X connect 8 0 7 0; +#X connect 9 0 8 1; +#X connect 10 0 8 1; +#X connect 11 0 4 0; +#X connect 11 1 9 0; +#X connect 12 0 5 0; +#X connect 12 1 10 0; +#X connect 13 0 14 1; +#X connect 14 0 2 0; +#X restore 422 369 pd up_down; +#X obj 491 401 r manual_go_mem; +#X obj 544 430 == 0; +#X obj 491 453 spigot 1; +#X obj 209 14 r bcf_data; +#X obj 209 38 route \$1; +#X obj 209 59 / 1.27; +#X obj 13 15 r bcf_bank; +#X obj 13 146 ==; +#X obj 31 39 loadbang; +#X obj 31 62 \$1; +#X obj 13 168 sel 1; +#X obj 13 191 delay 0; +#X obj 31 105 / 8; +#X obj 31 125 i; +#X obj 294 603 s bcf_data2; +#X obj 294 560 pack f \$1; +#X msg 294 581 \$2 \$1; +#X obj 294 538 * 1.27; +#X obj 31 83 - 1; +#X obj 101 215 cnv 2 14 3 empty \$0-green empty 20 12 0 14 -262144 +-262144 0; +#X obj 16 298 s \$0-green; +#X msg 16 274 color \$1 0; +#X msg 30 248 -63489; +#X msg 16 224 0; +#X obj 372 436 f; +#X obj 371 406 r instant_go; +#X msg 129 193 set \$1; +#X obj 294 498 f; +#X obj 354 475 line_curve_smooth 20; +#X floatatom 53 148 5 0 0 0 - - -; +#X obj 157 166 _speedlim 50; +#X connect 0 0 3 0; +#X connect 2 0 57 0; +#X connect 3 1 7 0; +#X connect 4 0 5 0; +#X connect 4 0 14 0; +#X connect 5 0 3 1; +#X connect 6 0 4 0; +#X connect 7 0 16 0; +#X connect 8 0 53 0; +#X connect 9 0 13 0; +#X connect 10 0 53 0; +#X connect 11 0 12 0; +#X connect 12 0 10 0; +#X connect 13 0 9 0; +#X connect 14 0 13 0; +#X connect 15 0 25 0; +#X connect 15 0 30 0; +#X connect 16 0 19 0; +#X connect 16 1 17 0; +#X connect 17 0 20 0; +#X connect 17 1 18 0; +#X connect 18 0 15 0; +#X connect 19 0 15 0; +#X connect 20 0 2 0; +#X connect 20 0 53 1; +#X connect 20 1 27 0; +#X connect 20 1 28 0; +#X connect 21 0 28 1; +#X connect 23 0 1 0; +#X connect 24 0 59 0; +#X connect 26 0 27 1; +#X connect 27 0 2 1; +#X connect 28 0 57 1; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 57 2; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 53 0; +#X connect 35 0 36 0; +#X connect 36 0 39 0; +#X connect 37 0 38 0; +#X connect 38 0 47 0; +#X connect 39 0 40 0; +#X connect 39 0 51 0; +#X connect 39 1 52 0; +#X connect 40 0 56 0; +#X connect 41 0 42 0; +#X connect 42 0 36 1; +#X connect 42 0 58 0; +#X connect 44 0 45 0; +#X connect 45 0 43 0; +#X connect 46 0 44 0; +#X connect 47 0 41 0; +#X connect 50 0 49 0; +#X connect 51 0 50 0; +#X connect 52 0 50 0; +#X connect 53 0 56 1; +#X connect 53 0 57 0; +#X connect 54 0 53 0; +#X connect 55 0 8 0; +#X connect 56 0 46 0; +#X connect 57 0 22 0; +#X connect 57 0 56 1; +#X connect 59 0 55 0; +#X connect 59 0 11 0; +#X coords 0 -1 1 1 16 156 2 100 200; diff --git a/lightboard/abs_light/random_parametrique.pd b/lightboard/abs_light/random_parametrique.pd new file mode 100755 index 0000000..6fa006a --- /dev/null +++ b/lightboard/abs_light/random_parametrique.pd @@ -0,0 +1,35 @@ +#N canvas 609 155 450 445 10; +#X obj 24 90 random 1000; +#X obj 24 112 / 1000; +#X obj 24 135 pow; +#X obj 197 -99 inlet; +#X obj 24 258 outlet; +#X obj 24 160 *; +#X obj 24 184 +; +#X obj 24 233 line; +#X obj 24 19 loadbang; +#X msg 24 41 1; +#X obj 24 65 metro 20; +#X obj 24 208 pack f f; +#X text 318 55 amplitude (0-100); +#X text 319 76 offset (0-100); +#X text 319 95 courbe (0.01-10); +#X text 319 134 line (20-5000); +#X text 320 114 metro (20-5000); +#X obj 197 -72 unpack f f f f f; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 5 0; +#X connect 3 0 17 0; +#X connect 5 0 6 0; +#X connect 6 0 11 0; +#X connect 7 0 4 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 11 0 7 0; +#X connect 17 0 5 1; +#X connect 17 1 6 1; +#X connect 17 2 2 1; +#X connect 17 3 10 1; +#X connect 17 4 11 1; diff --git a/lightboard/abs_light/sel_bank.pd b/lightboard/abs_light/sel_bank.pd new file mode 100755 index 0000000..45b1c48 --- /dev/null +++ b/lightboard/abs_light/sel_bank.pd @@ -0,0 +1,62 @@ +#N canvas 0 224 809 366 10; +#X obj 226 101 bng 16 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 173 154 \$1; +#X obj 173 176 s sel_bank; +#X obj 268 8 ctlin; +#X obj 268 36 pack f f f; +#X obj 268 206 route \$1; +#X obj 268 184 - 64; +#X obj 321 119 r bcf_channel; +#X obj 268 163 f; +#X obj 268 86 t l l; +#X obj 268 141 select 1; +#X msg 268 110 \$2; +#X msg 339 143 \$1; +#X obj 268 63 route 127 0; +#X obj 437 203 route \$1; +#X obj 437 181 - 64; +#X obj 490 116 r bcf_channel; +#X obj 437 160 f; +#X obj 437 83 t l l; +#X obj 437 138 select 1; +#X msg 437 107 \$2; +#X msg 508 140 \$1; +#X obj 437 249 + 64; +#X obj 437 270 t b f; +#X obj 437 310 ctlout 65 1; +#X msg 437 290 127; +#X obj 437 227 \$1; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 3 0 4 0; +#X connect 3 1 4 1; +#X connect 3 2 4 2; +#X connect 4 0 13 0; +#X connect 5 0 0 0; +#X connect 6 0 5 0; +#X connect 7 0 10 1; +#X connect 8 0 6 0; +#X connect 9 0 11 0; +#X connect 9 1 12 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X connect 12 0 8 1; +#X connect 13 0 9 0; +#X connect 13 1 18 0; +#X connect 14 0 26 0; +#X connect 14 0 0 0; +#X connect 15 0 14 0; +#X connect 16 0 19 1; +#X connect 17 0 15 0; +#X connect 18 0 20 0; +#X connect 18 1 21 0; +#X connect 19 0 17 0; +#X connect 20 0 19 0; +#X connect 21 0 17 1; +#X connect 22 0 23 0; +#X connect 23 0 25 0; +#X connect 23 1 24 1; +#X connect 25 0 24 0; +#X connect 26 0 22 0; +#X coords 0 -1 1 1 142 18 1 100 100; -- cgit v1.2.1