kollabs/ds_transition_occupy.pd

#N canvas 180 22 575 673 10;
#X obj 113 109 r /ds/\$1\$2/occupy;
#N canvas 572 35 570 506 occupy 0;
#X obj 136 66 inlet;
#X obj 136 314 outlet;
#X msg 338 54 1;
#X msg 384 167 0;
#X obj 338 108 spigot;
#X obj 384 145 r /ds/\$1\$2/dispatched;
#X obj 338 220 s /ds/\$1\$2/busy;
#X obj 175 157 r /ds/\$1\$2/busy;
#X obj 338 32 r /ds/\$1\$2/dispatch/start;
#X obj 136 202 kdemux2;
#X obj 175 233 b;
#X obj 175 255 list prepend \$2: not dispatched (occupied);
#X obj 175 277 s /ds/\$1/print/debug;
#X obj 371 82 r /ds/\$1\$2/occupy/state;
#X obj 175 179 pipe 0;
#X connect 0 0 9 0;
#X connect 2 0 4 0;
#X connect 3 0 6 0;
#X connect 4 0 6 0;
#X connect 5 0 3 0;
#X connect 7 0 14 0;
#X connect 8 0 2 0;
#X connect 9 0 1 0;
#X connect 9 1 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 13 0 4 1;
#X connect 14 0 9 1;
#X restore 124 579 pd occupy;
#X obj 136 487 spigot 1;
#X obj 181 463 == 0;
#X obj 113 347 f;
#X obj 149 347 f;
#X obj 136 389 kmux2;
#X obj 130 223 t f f;
#X obj 130 245 sel 0 1;
#X obj 130 131 r /ds/\$1/occupy/override;
#X obj 200 223 r /ds/\$1/occupy;
#X obj 85 78 r /ds/\$1\$2/transition/in;
#X text 305 821 (c)2013 Marian Weger;
#X obj 124 680 s /ds/\$1\$2/dispatch/start;
#X obj 85 552 kdemux2;
#N canvas 57 153 644 329 copy_paste_settings 0;
#X obj 40 89 r /ds/\$1\$2/settings/paste;
#X obj 308 89 r /ds/\$1\$2/settings/copy;
#X obj 40 141 b;
#X obj 308 111 b;
#X obj 40 168 list append /ds/\$1\$2/occupy;
#X obj 40 220 s /ds/\$1/reg/settings/buffer/occupy/route;
#X obj 308 190 s /ds/\$1\$2/occupy/route;
#X obj 308 138 list append /ds/\$1/reg/settings/buffer/occupy;
#X obj 40 190 list trim;
#X obj 308 160 list trim;
#X obj 50 113 r /ds/\$1/reg/settings/buffer/paste/all;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 5 0;
#X connect 9 0 6 0;
#X connect 10 0 2 0;
#X restore 353 126 pd copy_paste_settings;
#N canvas 757 134 354 463 register 0;
#X obj 53 42 ds_reg_settings \$1 \$2/occupy;
#X obj 103 138 r /ds/\$1\$2/busy;
#X obj 103 160 t b f;
#X obj 103 252 s /ds/\$1\$2/occupy/reg/state;
#X obj 53 115 v /ds/\$1\$2/occupy/lock/v;
#X obj 103 193 ||;
#X obj 103 215 == 0;
#X obj 53 90 r \$0-loadbang;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 2 1 5 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 7 0 4 0;
#X restore 353 146 pd register;
#N canvas 906 22 285 240 INIT 0;
#X obj 28 24 loadbang;
#X obj 55 68 s /ds/\$1\$2/occupy/reinit;
#X obj 28 46 t b b;
#X obj 28 98 s \$0-loadbang;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X restore 353 106 pd INIT;
#X obj 85 803 outlet dispatched;
#X obj 104 755 outlet value;
#X obj 85 658 t b a b;
#X text 35 49 (used by ds_reg);
#X text 28 26 ds_transition_occupy <domain> <name>;
#X obj 181 441 v /ds/\$1\$2/occupy/lock/v;
#X obj 146 178 v /ds/\$1/occupy/override/v;
#X obj 200 283 v /ds/\$1/occupy/v;
#X obj 146 519 s /ds/\$1\$2/occupy/state;
#X obj 353 280 r \$0-loadbang;
#X obj 353 302 t b b;
#X connect 0 0 4 0;
#X connect 1 0 20 0;
#X connect 2 0 26 0;
#X connect 2 0 14 1;
#X connect 3 0 2 1;
#X connect 4 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 1 6 2;
#X connect 8 0 4 0;
#X connect 8 1 5 0;
#X connect 9 0 7 0;
#X connect 10 0 5 0;
#X connect 11 0 14 0;
#X connect 14 0 20 0;
#X connect 14 1 1 0;
#X connect 20 0 18 0;
#X connect 20 1 19 0;
#X connect 20 2 13 0;
#X connect 23 0 3 0;
#X connect 24 0 7 0;
#X connect 25 0 5 0;
#X connect 27 0 28 0;
#X connect 28 0 25 0;
#X connect 28 0 24 0;
#X connect 28 1 23 0;