Commit d2de4afd authored by Roman Haefeli's avatar Roman Haefeli
Browse files

re-order global.receive

 * create ids before everything else
 * send to seq.receive (it does not need lookup for creation)
 * send to global.receive
parent 1b4c11d7
......@@ -1498,8 +1498,8 @@ num float nvis;
#X connect 17 0 16 0;
#X connect 18 0 19 0;
#X restore 624 215 pd gui-templates;
#X obj 20 468 r \$0.global.send;
#X obj 47 412 s \$0.global.receive;
#X obj 20 498 r \$0.global.send;
#X obj 20 465 s \$0.global.receive;
#X text 20 63 generate events;
#X text 20 218 process events;
#N canvas 0 99 406 517 note.change.duration 0;
......@@ -1836,43 +1836,44 @@ certain period.;
#X restore 19 159 pd note.change.gid;
#X obj 285 430 text define \$0.sequence;
#N canvas 136 170 513 371 sequencer 0;
#N canvas 0 281 404 347 note.create 0;
#N canvas 0 278 505 346 note.create 0;
#X obj 24 39 route note;
#X obj 24 62 route create;
#X msg 165 178 \$1 \$2 \$3;
#X msg 24 123 \$1 \$4;
#X obj 24 146 +;
#X msg 68 125 \$2;
#X obj 24 285 s \$0.sequencer.event.add.pre;
#X obj 165 240 s \$0.sequencer.event.add.post;
#X obj 24 16 r \$0.global.receive.seq;
#X obj 24 223 pack f f 0 f;
#X obj 165 201 list append;
#X text 245 202 append id;
#X obj 135 82 r \$0.sequencer.id;
#X obj 24 85 t a a a;
#X obj 69 228 +;
#X obj 69 287 s \$0.sequencer.event.add.pre;
#X obj 251 243 s \$0.sequencer.event.add.post;
#X obj 69 254 pack f f 0 f;
#X obj 131 86 r \$0.create.id;
#X obj 24 16 r \$0.seq.receive;
#X obj 24 85 list prepend -1;
#X obj 24 108 route -1;
#X msg 69 205 \$2 \$5;
#X msg 113 202 \$3;
#X msg 251 217 \$2 \$3 \$4 \$1;
#X obj 69 160 t a a a a;
#X msg 146 202 \$1;
#X connect 0 0 1 0;
#X connect 1 0 13 0;
#X connect 2 0 10 0;
#X connect 3 0 4 0;
#X connect 4 0 9 0;
#X connect 5 0 9 1;
#X connect 8 0 0 0;
#X connect 9 0 6 0;
#X connect 10 0 7 0;
#X connect 12 0 9 3;
#X connect 12 0 10 1;
#X connect 13 0 3 0;
#X connect 13 1 5 0;
#X connect 13 2 2 0;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 8 1;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 9 1 13 0;
#X connect 10 0 2 0;
#X connect 11 0 5 1;
#X connect 12 0 4 0;
#X connect 13 0 10 0;
#X connect 13 1 11 0;
#X connect 13 2 14 0;
#X connect 13 3 12 0;
#X connect 14 0 5 3;
#X restore 13 19 pd note.create;
#N canvas 140 99 478 389 note.delete 0;
#X obj 24 39 route note;
#X obj 24 62 route delete;
#X obj 69 313 s \$0.sequencer.event.remove;
#X obj 24 143 route -1;
#X obj 24 16 r \$0.global.receive.seq;
#X obj 56 110 r \$0.sequencer.id;
#X obj 24 85 b;
#X obj 24 108 f;
#X obj 88 213 tabread \$0.velocity;
......@@ -1881,19 +1882,21 @@ certain period.;
#X text 151 235 note-on (vel \, id);
#X text 111 276 note-off (vel \, id);
#X obj 69 170 t a a a;
#X obj 56 110 r \$0.delete.id;
#X obj 24 16 r \$0.seq.receive;
#X connect 0 0 1 0;
#X connect 1 0 6 0;
#X connect 3 1 13 0;
#X connect 4 0 0 0;
#X connect 5 0 7 1;
#X connect 1 0 4 0;
#X connect 3 1 11 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 3 0;
#X connect 8 0 9 0;
#X connect 9 0 2 0;
#X connect 10 0 2 0;
#X connect 13 0 10 0;
#X connect 13 1 8 0;
#X connect 13 2 9 1;
#X connect 7 0 2 0;
#X connect 8 0 2 0;
#X connect 11 0 8 0;
#X connect 11 1 6 0;
#X connect 11 2 7 1;
#X connect 12 0 5 1;
#X connect 13 0 0 0;
#X restore 13 42 pd note.delete;
#N canvas 0 99 784 430 note.change.duration 0;
#X obj 24 39 route note;
......@@ -1925,35 +1928,35 @@ certain period.;
#X obj 483 319 b;
#X msg 483 367 sequencer: note delete: note not found (\$1 \$2);
#X obj 483 390 s error;
#X obj 24 16 r \$0.global.receive.seq;
#X obj 24 270 pack f f 0 f;
#X obj 186 142 t a a;
#X msg 258 269 0 \$1;
#X obj 231 233 t a a;
#X obj 24 16 r \$0.seq.receive;
#X connect 0 0 2 0;
#X connect 1 0 5 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 19 0;
#X connect 4 0 18 0;
#X connect 5 0 6 0;
#X connect 5 1 8 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 18 1;
#X connect 7 0 17 0;
#X connect 8 0 17 1;
#X connect 11 0 12 0;
#X connect 12 0 14 0;
#X connect 12 1 21 0;
#X connect 12 1 20 0;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 17 0 0 0;
#X connect 18 0 10 0;
#X connect 19 0 11 0;
#X connect 19 1 13 1;
#X connect 20 0 9 0;
#X connect 21 0 18 3;
#X connect 21 1 20 0;
#X connect 17 0 10 0;
#X connect 18 0 11 0;
#X connect 18 1 13 1;
#X connect 19 0 9 0;
#X connect 20 0 17 3;
#X connect 20 1 19 0;
#X connect 21 0 0 0;
#X restore 13 66 pd note.change.duration;
#N canvas 604 608 577 279 event.add 0;
#X obj 16 37 t a a;
......@@ -1989,7 +1992,7 @@ certain period.;
#X connect 13 0 9 0;
#X connect 14 0 13 0;
#X restore 15 132 pd event.add;
#N canvas 594 798 359 230 event.remove 0;
#N canvas 594 831 359 230 event.remove 0;
#X obj 47 110 text delete \$0.sequence;
#X obj 14 11 r \$0.sequencer.event.remove;
#X obj 14 80 sel -1;
......@@ -2030,7 +2033,7 @@ certain period.;
#X obj 212 319 s error;
#X obj 69 282 f;
#X obj 69 252 t b a b, f 13;
#X obj 24 16 r \$0.global.receive.seq;
#X obj 24 16 r \$0.seq.receive;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 11 0;
......@@ -2053,7 +2056,7 @@ certain period.;
#X connect 16 2 8 0;
#X connect 17 0 0 0;
#X restore 13 88 pd note.change.velocity;
#N canvas 0 99 415 481 play.notes.by.index 0;
#N canvas 0 99 415 480 play.notes.by.index 0;
#X obj 18 77 text search \$0.sequence 0;
#X obj 96 100 text search \$0.sequence > 0;
#X obj 18 52 t a a;
......@@ -2291,7 +2294,7 @@ certain period.;
#X connect 14 3 12 0;
#X connect 15 0 13 0;
#X restore 199 430 pd sequencer;
#X obj 20 491 outlet;
#X obj 20 521 outlet;
#X obj 20 364 inlet;
#X obj 199 461 outlet;
#X obj 199 367 inlet;
......@@ -2623,7 +2626,7 @@ certain period.;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 415 48 pd pitch->y;
#N canvas 73 91 483 612 step|pitch->id 0;
#N canvas 73 99 483 612 step|pitch->id 0;
#X obj 135 313 tabread \$0.step;
#X msg 135 94 1000;
#X obj 135 140 until;
......@@ -2692,7 +2695,7 @@ certain period.;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X restore 15 108 pd step|pitch->id;
#N canvas 83 99 410 208 step|pitch->id 0;
#N canvas 80 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
......@@ -2907,29 +2910,6 @@ certain period.;
#X obj 417 183 s \$0.duration;
#X obj 328 183 s \$0.velocity;
#X obj 508 183 s \$0.gid;
#N canvas 0 99 391 254 prepend.id 0;
#X obj 32 58 t a b;
#X obj 113 86 array min \$0.active;
#X obj 113 109 sel 0;
#X obj 113 132 f;
#X msg 147 139 note buffer full!;
#X obj 147 163 print ERROR;
#X obj 32 22 inlet;
#X obj 32 190 outlet;
#X obj 32 156 list prepend 0;
#X obj 135 208 outlet;
#X connect 0 0 8 0;
#X connect 0 1 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 1;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 3 0 8 1;
#X connect 3 0 9 0;
#X connect 4 0 5 0;
#X connect 6 0 0 0;
#X connect 8 0 7 0;
#X restore 6 77 pd prepend.id;
#X msg 119 148 \$1 1;
#X obj 6 100 t a a;
#X msg 196 148 \$1 \$2;
......@@ -3125,7 +3105,6 @@ certain period.;
#X restore 46 291 pd y;
#X obj 6 473 s \$1;
#X obj 17 214 r \$0.redraw.notes;
#X obj 97 77 s \$0.sequencer.id;
#X text 20 389 x y w h id gid vel dur c vis;
#X obj 6 355 pack f f f f f f f f f f, f 57;
#X obj 6 252 t a a a a a a a a a a, f 57;
......@@ -3136,50 +3115,52 @@ certain period.;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 302 291 pd dur;
#X obj 89 76 r \$0.create.id;
#X obj 6 77 list prepend;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 10 0;
#X connect 10 0 12 0;
#X connect 10 1 31 0;
#X connect 11 0 4 0;
#X connect 12 0 34 0;
#X connect 12 1 11 0;
#X connect 12 1 13 0;
#X connect 12 1 14 0;
#X connect 12 1 15 0;
#X connect 12 1 16 0;
#X connect 12 1 17 0;
#X connect 13 0 5 0;
#X connect 14 0 6 0;
#X connect 15 0 8 0;
#X connect 16 0 7 0;
#X connect 17 0 9 0;
#X connect 18 0 19 0;
#X connect 19 0 29 0;
#X connect 20 0 33 2;
#X connect 21 0 33 3;
#X connect 22 0 33 4;
#X connect 23 0 33 5;
#X connect 24 0 33 6;
#X connect 25 0 33 8;
#X connect 26 0 33 9;
#X connect 27 0 33 0;
#X connect 28 0 33 1;
#X connect 30 0 34 0;
#X connect 33 0 18 0;
#X connect 34 0 27 0;
#X connect 34 1 28 0;
#X connect 34 2 20 0;
#X connect 34 3 21 0;
#X connect 34 4 22 0;
#X connect 34 5 23 0;
#X connect 34 6 24 0;
#X connect 34 7 35 0;
#X connect 34 8 25 0;
#X connect 34 9 26 0;
#X connect 35 0 33 7;
#X connect 2 0 35 0;
#X connect 10 0 4 0;
#X connect 11 0 32 0;
#X connect 11 1 10 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 11 1 14 0;
#X connect 11 1 15 0;
#X connect 11 1 16 0;
#X connect 12 0 5 0;
#X connect 13 0 6 0;
#X connect 14 0 8 0;
#X connect 15 0 7 0;
#X connect 16 0 9 0;
#X connect 17 0 18 0;
#X connect 18 0 28 0;
#X connect 19 0 31 2;
#X connect 20 0 31 3;
#X connect 21 0 31 4;
#X connect 22 0 31 5;
#X connect 23 0 31 6;
#X connect 24 0 31 8;
#X connect 25 0 31 9;
#X connect 26 0 31 0;
#X connect 27 0 31 1;
#X connect 29 0 32 0;
#X connect 31 0 17 0;
#X connect 32 0 26 0;
#X connect 32 1 27 0;
#X connect 32 2 19 0;
#X connect 32 3 20 0;
#X connect 32 4 21 0;
#X connect 32 5 22 0;
#X connect 32 6 23 0;
#X connect 32 7 33 0;
#X connect 32 8 24 0;
#X connect 32 9 25 0;
#X connect 33 0 31 7;
#X connect 34 0 35 1;
#X connect 35 0 11 0;
#X restore 19 238 pd note.create;
#N canvas 166 355 345 548 note.delete 0;
#N canvas 166 421 345 548 note.delete 0;
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#X obj 6 54 route delete;
......@@ -3188,19 +3169,6 @@ certain period.;
#X msg 161 423 5;
#X msg 123 422 5;
#X obj 78 327 f;
#N canvas 83 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 6 99 pd step|pitch->id;
#N canvas 73 91 410 208 id->pointer 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
......@@ -3215,7 +3183,6 @@ certain period.;
#X connect 5 0 2 1;
#X restore 78 354 pd id->pointer;
#X obj 6 152 route -1;
#X obj 6 77 t a a;
#X obj 6 175 b;
#X msg 6 229 note delete: no such note (\$1 \$2);
#X obj 6 256 s error;
......@@ -3225,37 +3192,37 @@ certain period.;
#X obj 123 448 set \$0.note x y id vis, f 26;
#X obj 123 399 t b b b b p, f 26;
#X msg 199 422 -1;
#X msg 237 392 0;
#X obj 6 122 t a a;
#X obj 49 122 s \$0.sequencer.id;
#X msg 237 424 0;
#X obj 6 77 t b a;
#X obj 6 107 f;
#X obj 37 108 r \$0.delete.id;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 11 0;
#X connect 2 0 20 0;
#X connect 4 0 3 0;
#X connect 5 0 18 1;
#X connect 6 0 18 0;
#X connect 7 0 9 0;
#X connect 8 0 22 0;
#X connect 9 0 17 0;
#X connect 10 0 12 0;
#X connect 10 1 16 0;
#X connect 11 0 8 0;
#X connect 11 1 15 1;
#X connect 12 0 15 0;
#X connect 13 0 14 0;
#X connect 15 0 13 0;
#X connect 16 0 4 0;
#X connect 16 1 7 0;
#X connect 17 1 19 0;
#X connect 19 0 6 0;
#X connect 19 1 5 0;
#X connect 19 2 20 0;
#X connect 19 3 21 0;
#X connect 19 4 18 4;
#X connect 20 0 18 2;
#X connect 21 0 18 3;
#X connect 22 0 10 0;
#X connect 22 1 23 0;
#X connect 5 0 16 1;
#X connect 6 0 16 0;
#X connect 7 0 8 0;
#X connect 8 0 15 0;
#X connect 9 0 10 0;
#X connect 9 1 14 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 14 1 7 0;
#X connect 15 1 17 0;
#X connect 17 0 6 0;
#X connect 17 1 5 0;
#X connect 17 2 18 0;
#X connect 17 3 19 0;
#X connect 17 4 16 4;
#X connect 18 0 16 2;
#X connect 19 0 16 3;
#X connect 20 0 21 0;
#X connect 20 1 13 1;
#X connect 21 0 9 0;
#X connect 22 0 21 1;
#X restore 19 261 pd note.delete;
#N canvas 0 209 422 584 note.change.duration 0;
#X obj 6 8 r \$0.global.receive;
......@@ -3639,7 +3606,7 @@ certain period.;
#X connect 26 0 25 0;
#X connect 26 1 17 0;
#X restore 19 330 pd note.change.gid;
#N canvas 842 143 401 476 inspector 0;
#N canvas 344 165 401 476 inspector 0;
#X obj 42 89 t a a a a a a;
#X obj 117 113 tabread \$0.active;
#X obj 102 158 tabread \$0.step;
......@@ -3685,17 +3652,66 @@ certain period.;
#X obj 15 37 print ERROR:;
#X connect 0 0 1 0;
#X restore 350 497 pd errors;
#X obj 20 434 s \$0.global.receive.seq;
#X obj 20 387 t a a;
#X msg 206 69 \; \$1.stepsperpage 64 \; \$1.page 0 \; \$1.pitchrange
48 \; \$1.stepviswidth 15 \; \$1.stepvisheight 14 \; \$1.canvastopmargin
53 \; \$1.canvasleftmargin 30 \; \$1.stepkeycolor1 887 \; \$1.stepkeycolor2
777 \; \$1.griddivision 4 \; \$1.gridsubdivision 4 \; \$1.gidcolorlist
800 840 80 68 408 808 \; \$1.default.vel 64 \; \$1.default.gid 0 \;
\$1.default.dur 4 \; \$1.default.show 0 \; \$1.init bang \;;
#X obj 20 387 t a a a;
#X obj 39 442 s \$0.seq.receive;
#N canvas 0 99 450 300 manaage.id 0;
#X obj 13 22 inlet;
#N canvas 0 99 391 254 prepend.id 0;
#X obj 32 66 array min \$0.active;
#X obj 32 89 sel 0;
#X obj 32 123 f;
#X obj 32 13 inlet;
#X obj 32 190 outlet;
#X obj 94 176 s error;
#X msg 94 152 note create: note buffer full!;
#X obj 59 123 t b b;
#X msg 59 146 -1;
#X obj 32 36 b;
#X connect 0 0 1 0;
#X connect 0 1 2 1;
#X connect 1 0 2 0;
#X connect 1 1 7 0;
#X connect 2 0 4 0;
#X connect 3 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 7 1 6 0;
#X connect 8 0 4 0;
#X connect 9 0 0 0;
#X restore 13 150 pd prepend.id;
#X obj 13 173 s \$0.create.id;
#X obj 13 45 route note;
#X obj 13 73 route create delete;
#N canvas 80 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 68 99 pd step|pitch->id;
#X obj 68 122 s \$0.delete.id;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X restore 59 417 pd manaage.id;
#X connect 0 0 31 0;
#X connect 1 0 2 0;
#X connect 2 0 58 0;
#X connect 2 0 56 0;
#X connect 3 0 2 0;
#X connect 4 0 31 0;
#X connect 7 0 31 0;
......@@ -3724,5 +3740,6 @@ certain period.;
#X connect 37 0 39 0;
#X connect 37 1 13 0;
#X connect 46 0 13 0;
#X connect 57 0 56 0;
#X connect 57 1 17 0;
#X connect 57 0 17 0;
#X connect 57 1 58 0;
#X connect 57 2 59 0;
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment