Commit 7caddd46 authored by Roman Haefeli's avatar Roman Haefeli
Browse files

manage sequencer events using id

parent 19695627
......@@ -1490,112 +1490,84 @@ certain period.;
#X connect 11 1 8 0;
#X restore 19 159 pd note.change.gid;
#X obj 285 430 text define \$0.sequence;
#N canvas 392 150 545 360 sequencer 1;
#N canvas 392 150 545 360 sequencer 0;
#N canvas 0 281 404 347 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 obj 24 85 t a a a;
#X obj 24 223 pack f f 0;
#X msg 68 125 \$2;
#X obj 24 285 s \$0.sequencer.event.add.pre;
#X obj 165 210 s \$0.sequencer.event.add.post;
#X obj 165 240 s \$0.sequencer.event.add.post;
#X obj 24 169 mod;
#X obj 50 169 r \$0.stepsperpage;
#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 connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 2 0 9 0;
#X connect 1 0 15 0;
#X connect 2 0 12 0;
#X connect 3 0 4 0;
#X connect 4 0 10 0;
#X connect 5 0 3 0;
#X connect 5 1 7 0;
#X connect 5 2 2 0;
#X connect 6 0 8 0;
#X connect 7 0 6 1;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 12 0 0 0;
#X connect 4 0 8 0;
#X connect 5 0 11 1;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 10 0 0 0;
#X connect 11 0 6 0;
#X connect 12 0 7 0;
#X connect 14 0 11 3;
#X connect 14 0 12 1;
#X connect 15 0 3 0;
#X connect 15 1 5 0;
#X connect 15 2 2 0;
#X restore 13 19 pd note.create;
#N canvas 140 99 581 399 note.delete 0;
#N canvas 140 99 478 389 note.delete 0;
#X obj 24 39 route note;
#X obj 24 62 route delete;
#X obj 147 190 tabread \$0.duration;
#X msg 83 209 \$1;
#X obj 83 236 +;
#X obj 83 284 pack f f;
#X msg 128 233 \$2;
#X obj 24 85 t a a;
#X obj 24 319 s \$0.sequencer.event.remove;
#X obj 83 260 mod;
#X obj 109 260 r \$0.stepsperpage;
#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 102 141 pd step|pitch->id;
#X obj 102 164 route -1;
#X obj 244 238 list append;
#X obj 244 214 b;
#X obj 83 114 t a a a a, f 10;
#X msg 244 262 sequencer: note delete: note not found (\$1 \$2);
#X obj 244 285 s error;
#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 69 170 t a a a;
#X obj 88 213 tabread \$0.velocity;
#X obj 88 236 pack f f;
#X msg 69 275 0 \$1, f 5;
#X text 151 235 note-on (vel \, id);
#X text 111 276 note-off (vel \, id);
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 9 0;
#X connect 5 0 8 0;
#X connect 6 0 5 1;
#X connect 7 0 8 0;
#X connect 7 1 15 0;
#X connect 9 0 5 0;
#X connect 10 0 9 1;
#X connect 11 0 12 0;
#X connect 12 0 14 0;
#X connect 12 1 2 0;
#X connect 13 0 16 0;
#X connect 14 0 13 0;
#X connect 15 0 3 0;
#X connect 15 1 11 0;
#X connect 15 2 6 0;
#X connect 15 3 13 1;
#X connect 16 0 17 0;
#X connect 18 0 0 0;
#X connect 1 0 6 0;
#X connect 3 1 8 0;
#X connect 4 0 0 0;
#X connect 5 0 7 1;
#X connect 6 0 7 0;
#X connect 7 0 3 0;
#X connect 8 0 11 0;
#X connect 8 1 9 0;
#X connect 8 2 10 1;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 2 0;
#X restore 13 42 pd note.delete;
#N canvas 0 99 785 486 note.change.duration 0;
#N canvas 0 99 784 430 note.change.duration 0;
#X obj 24 39 route note;
#X obj 239 299 tabread \$0.duration;
#X msg 254 334 \$1;
#X obj 239 361 +;
#X obj 239 417 pack f f;
#X msg 283 358 \$2;
#X obj 24 109 t a a;
#X obj 24 62 route change;
#X obj 24 85 route duration;
#X msg 194 162 \$1 \$2;
#X msg 186 110 \$1 \$2;
#X obj 24 173 t a a;
#X msg 24 196 \$1 \$3;
#X obj 24 219 +;
#X obj 24 270 pack f f 0;
#X msg 52 225 \$2;
#X obj 239 444 s \$0.sequencer.event.remove;
#X obj 258 331 s \$0.sequencer.event.remove;
#X obj 24 298 s \$0.sequencer.event.add.pre;
#X obj 239 391 mod;
#X obj 24 246 mod;
#X obj 50 246 r \$0.stepsperpage;
#X obj 265 391 r \$0.stepsperpage;
#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;
......@@ -1608,46 +1580,43 @@ certain period.;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 194 225 pd step|pitch->id;
#X obj 194 248 route -1;
#X restore 186 173 pd step|pitch->id;
#X obj 186 196 route -1;
#X obj 483 343 list append;
#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 194 194 t a a a a;
#X obj 24 16 r \$0.global.receive.seq;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 3 0 17 0;
#X connect 4 0 15 0;
#X connect 5 0 4 1;
#X connect 6 0 10 0;
#X connect 6 1 9 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 9 0 27 0;
#X connect 10 0 11 0;
#X connect 10 1 14 0;
#X connect 11 0 12 0;
#X connect 12 0 18 0;
#X connect 13 0 16 0;
#X connect 14 0 13 1;
#X connect 17 0 4 0;
#X connect 18 0 13 0;
#X connect 19 0 18 1;
#X connect 20 0 17 1;
#X connect 21 0 22 0;
#X connect 22 0 24 0;
#X connect 22 1 1 0;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X connect 25 0 26 0;
#X connect 27 0 21 0;
#X connect 27 1 2 0;
#X connect 27 2 5 0;
#X connect 27 3 23 1;
#X connect 28 0 0 0;
#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 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 21 0;
#X connect 5 0 6 0;
#X connect 5 1 8 0;
#X connect 6 0 7 0;
#X connect 7 0 11 0;
#X connect 8 0 20 1;
#X connect 11 0 20 0;
#X connect 12 0 11 1;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 14 1 23 0;
#X connect 15 0 17 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 19 0 0 0;
#X connect 20 0 10 0;
#X connect 21 0 13 0;
#X connect 21 1 15 1;
#X connect 22 0 9 0;
#X connect 23 0 20 3;
#X connect 23 1 22 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;
......@@ -1683,23 +1652,24 @@ certain period.;
#X connect 13 0 9 0;
#X connect 14 0 13 0;
#X restore 15 132 pd event.add;
#N canvas 594 765 359 230 event.remove 0;
#X obj 14 57 text search \$0.sequence 0 1;
#N canvas 594 798 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;
#X obj 14 143 list append;
#X msg 14 166 sequencer: note (\$1 \$2) not found for deletion;
#X obj 14 34 t a a;
#X obj 14 189 s error;
#X connect 0 0 3 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 1 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 6 0 0 0;
#X connect 6 1 4 1;
#X msg 14 166 sequencer: note (id=\$2) not found for deletion;
#X obj 14 57 text search \$0.sequence 2 3;
#X text 186 55 remove by velocity and id;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 2 1 0 0;
#X connect 3 0 6 0;
#X connect 4 0 7 0;
#X connect 4 1 3 1;
#X connect 6 0 5 0;
#X connect 7 0 2 0;
#X restore 15 155 pd event.remove;
#X obj 17 207 r \$0.init;
#X msg 17 230 -1;
......@@ -2443,6 +2413,7 @@ certain period.;
#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;
......@@ -2450,6 +2421,7 @@ certain period.;
#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;
......@@ -2652,10 +2624,12 @@ certain period.;
#X obj 6 355 pack f f f f f f f f f, f 57;
#X obj 6 473 s \$1;
#X obj 17 214 r \$0.redraw.notes;
#X obj 97 77 s \$0.sequencer.id;
#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 34 0;
#X connect 11 0 4 0;
#X connect 12 0 30 0;
#X connect 12 1 11 0;
......@@ -2692,15 +2666,15 @@ certain period.;
#X connect 31 0 19 0;
#X connect 33 0 30 0;
#X restore 19 238 pd note.create;
#N canvas 166 289 353 503 note.delete 0;
#N canvas 166 322 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;
#X obj 51 462 s \$0.active;
#X msg 51 435 \$1 0;
#X msg 161 393 5;
#X msg 123 392 5;
#X obj 78 297 f;
#X obj 51 492 s \$0.active;
#X msg 51 465 \$1 0;
#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;
......@@ -2726,19 +2700,21 @@ certain period.;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 78 324 pd id->pointer;
#X obj 6 122 route -1;
#X restore 78 354 pd id->pointer;
#X obj 6 152 route -1;
#X obj 6 77 t a a;
#X obj 6 145 b;
#X msg 6 199 note delete: no such note (\$1 \$2);
#X obj 6 226 s error;
#X obj 6 168 list append;
#X obj 51 273 t a a;
#X obj 78 347 route -1;
#X obj 123 418 set \$0.note x y id vis, f 26;
#X obj 123 369 t b b b b p, f 26;
#X msg 199 392 -1;
#X obj 6 175 b;
#X msg 6 229 note delete: no such note (\$1 \$2);
#X obj 6 256 s error;
#X obj 6 198 list append;
#X obj 51 303 t a a;
#X obj 78 377 route -1;
#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 connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 11 0;
......@@ -2746,7 +2722,7 @@ certain period.;
#X connect 5 0 18 1;
#X connect 6 0 18 0;
#X connect 7 0 9 0;
#X connect 8 0 10 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;
......@@ -2765,6 +2741,8 @@ certain period.;
#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 restore 19 261 pd note.delete;
#N canvas 0 209 422 584 note.change.duration 0;
#X obj 6 8 r \$0.global.receive;
......
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