Commit 28c8481e authored by Roman Haefeli's avatar Roman Haefeli
Browse files

process event 'note select' (turn border of selected notes purple)

parent 784f8a95
...@@ -473,7 +473,7 @@ n float nvis; ...@@ -473,7 +473,7 @@ n float nvis;
#X connect 21 0 12 0; #X connect 21 0 12 0;
#X connect 22 0 5 1; #X connect 22 0 5 1;
#X restore 491 186 pd create_vertline; #X restore 491 186 pd create_vertline;
#N canvas 36 99 741 470 note-template 0; #N canvas 35 99 741 470 note-template 0;
#X obj 121 282 min 127; #X obj 121 282 min 127;
#X obj 51 166 route click change; #X obj 51 166 route click change;
#X obj 121 307 t a a; #X obj 121 307 t a a;
...@@ -487,7 +487,6 @@ n float nvis; ...@@ -487,7 +487,6 @@ n float nvis;
#X obj 270 259 r \$0.stepviswidth; #X obj 270 259 r \$0.stepviswidth;
#X obj 241 259 div; #X obj 241 259 div;
#X obj 241 333 *; #X obj 241 333 *;
#X obj 32 54 filledpolygon -v vis c 444 1 0 0 0 h w h w 0;
#N canvas 320 203 446 363 clr.* 0; #N canvas 320 203 446 363 clr.* 0;
#X obj 28 62 t a a a; #X obj 28 62 t a a a;
#X obj 28 112 div 100; #X obj 28 112 div 100;
...@@ -563,21 +562,16 @@ n float nvis; ...@@ -563,21 +562,16 @@ n float nvis;
#X connect 5 0 0 0; #X connect 5 0 0 0;
#X restore 51 274 pd range; #X restore 51 274 pd range;
#X obj 51 297 t a a; #X obj 51 297 t a a;
#X obj 508 111 drawnumber gid 3 1 999;
#X obj 469 210 drawnumber vel 3 1 999;
#X obj 241 284 min; #X obj 241 284 min;
#X obj 241 307 max 1; #X obj 241 307 max 1;
#X obj 274 283 r \$0.stepsperpage; #X obj 274 283 r \$0.stepsperpage;
#X obj 508 84 == 3; #X obj 508 84 == 3;
#X obj 121 259 max 1; #X obj 121 259 max 1;
#X obj 469 57 t a a a; #X obj 469 57 t a a a;
#X obj 488 160 drawnumber dur 3 1 999;
#X obj 488 133 == 2; #X obj 488 133 == 2;
#X obj 51 212 get \$0.note gid vel dur w, f 32; #X obj 51 212 get \$0.note gid vel dur w, f 32;
#X obj 51 406 set \$0.note gid c vel dur w h, f 48; #X obj 51 406 set \$0.note gid c vel dur w h, f 48;
#X obj 178 302 max 1; #X obj 178 302 max 1;
#X obj 32 104 struct \$0.note float x float y float w float h float
id float gid float vel float dur float c float vis;
#N canvas 83 99 410 208 gid->gclr 0; #N canvas 83 99 410 208 gid->gclr 0;
#X obj 13 14 inlet; #X obj 13 14 inlet;
#X obj 13 37 t b a; #X obj 13 37 t b a;
...@@ -591,48 +585,54 @@ id float gid float vel float dur float c float vis; ...@@ -591,48 +585,54 @@ id float gid float vel float dur float c float vis;
#X connect 2 0 3 0; #X connect 2 0 3 0;
#X connect 5 0 2 1; #X connect 5 0 2 1;
#X restore 64 331 pd gid->gclr; #X restore 64 331 pd gid->gclr;
#X obj 32 54 filledpolygon -v vis c mrk 1 0 0 0 h w h w 0;
#X obj 32 104 struct \$0.note float x float y float w float h float
id float gid float vel float dur float c float vis float mrk;
#X obj 508 111 drawnumber gid 3 1 999;
#X obj 469 210 drawnumber vel 3 1 999;
#X obj 488 160 drawnumber dur 3 1 999;
#X connect 0 0 2 0; #X connect 0 0 2 0;
#X connect 1 0 5 0; #X connect 1 0 5 0;
#X connect 1 1 5 0; #X connect 1 1 5 0;
#X connect 2 0 15 0; #X connect 2 0 14 0;
#X connect 2 1 37 2; #X connect 2 1 33 2;
#X connect 3 0 4 0; #X connect 3 0 4 0;
#X connect 3 1 1 0; #X connect 3 1 1 0;
#X connect 5 0 36 0; #X connect 5 0 32 0;
#X connect 5 1 37 6; #X connect 5 1 33 6;
#X connect 6 0 24 0; #X connect 6 0 23 0;
#X connect 6 1 7 0; #X connect 6 1 7 0;
#X connect 7 0 37 5; #X connect 7 0 33 5;
#X connect 8 0 9 0; #X connect 8 0 9 0;
#X connect 9 0 7 1; #X connect 9 0 7 1;
#X connect 10 0 11 1; #X connect 10 0 11 1;
#X connect 10 0 12 1; #X connect 10 0 12 1;
#X connect 11 0 28 0; #X connect 11 0 25 0;
#X connect 12 0 37 4; #X connect 12 0 33 4;
#X connect 14 0 37 1; #X connect 13 0 33 1;
#X connect 15 0 14 1; #X connect 14 0 13 1;
#X connect 16 0 33 0; #X connect 15 0 30 0;
#X connect 17 0 27 0; #X connect 16 0 39 0;
#X connect 22 0 23 0; #X connect 21 0 22 0;
#X connect 24 0 25 0; #X connect 23 0 24 0;
#X connect 25 0 37 0; #X connect 24 0 33 0;
#X connect 25 1 40 0; #X connect 24 1 35 0;
#X connect 28 0 29 0; #X connect 25 0 26 0;
#X connect 29 0 12 0; #X connect 26 0 12 0;
#X connect 30 0 28 1; #X connect 27 0 25 1;
#X connect 31 0 26 0; #X connect 28 0 38 0;
#X connect 32 0 0 0; #X connect 29 0 0 0;
#X connect 33 0 17 0; #X connect 30 0 16 0;
#X connect 33 1 35 0; #X connect 30 1 31 0;
#X connect 33 2 31 0; #X connect 30 2 28 0;
#X connect 35 0 34 0; #X connect 31 0 40 0;
#X connect 36 0 6 0; #X connect 32 0 6 0;
#X connect 36 1 32 0; #X connect 32 1 29 0;
#X connect 36 2 38 0; #X connect 32 2 34 0;
#X connect 36 3 11 0; #X connect 32 3 11 0;
#X connect 38 0 37 3; #X connect 34 0 33 3;
#X connect 39 0 3 0; #X connect 35 0 13 0;
#X connect 40 0 14 0; #X connect 37 0 3 0;
#X restore 644 101 pd note-template; #X restore 644 101 pd note-template;
#X msg 490 351 const 0; #X msg 490 351 const 0;
#N canvas 162 155 643 410 create_guis 0; #N canvas 162 155 643 410 create_guis 0;
...@@ -3189,7 +3189,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3189,7 +3189,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X text 15 17 GENERATE EVENTS; #X text 15 17 GENERATE EVENTS;
#X restore 19 125 pd generate.events; #X restore 19 125 pd generate.events;
#N canvas 0 99 413 279 process.events 0; #N canvas 0 99 413 279 process.events 0;
#N canvas 109 324 589 500 note.create 0; #N canvas 109 324 713 500 note.create 0;
#X obj 6 8 r \$0.global.receive; #X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note; #X obj 6 31 route note;
#X obj 6 54 route create; #X obj 6 54 route create;
...@@ -3243,7 +3243,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3243,7 +3243,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X connect 4 0 1 0; #X connect 4 0 1 0;
#X connect 5 0 4 0; #X connect 5 0 4 0;
#X restore 126 291 pd h; #X restore 126 291 pd h;
#N canvas 16 91 410 257 id 0; #N canvas 16 99 410 257 id 0;
#X obj 7 21 inlet; #X obj 7 21 inlet;
#X obj 7 211 outlet; #X obj 7 211 outlet;
#X msg 7 93 \$1; #X msg 7 93 \$1;
...@@ -3395,9 +3395,6 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3395,9 +3395,6 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X restore 46 291 pd y; #X restore 46 291 pd y;
#X obj 6 473 s \$1; #X obj 6 473 s \$1;
#X obj 17 214 r \$0.redraw.notes; #X obj 17 214 r \$0.redraw.notes;
#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;
#N canvas 15 91 396 215 dur 0; #N canvas 15 91 396 215 dur 0;
#X obj 20 21 inlet; #X obj 20 21 inlet;
#X obj 20 162 outlet; #X obj 20 162 outlet;
...@@ -3407,17 +3404,39 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3407,17 +3404,39 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X restore 302 291 pd dur; #X restore 302 291 pd dur;
#X obj 89 76 r \$0.create.id; #X obj 89 76 r \$0.create.id;
#X obj 6 77 list prepend; #X obj 6 77 list prepend;
#X obj 6 252 t a a a a a a a a a a a, f 57;
#X obj 6 355 pack f f f f f f f f f f f, f 57;
#N canvas 16 99 414 215 mrk 0;
#X obj 7 21 inlet;
#X obj 7 160 outlet;
#X msg 7 44 \$1;
#X obj 7 67 tabread \$0.marked;
#X obj 7 90 sel 0 1;
#X msg 7 113 444;
#X msg 35 112 808;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 6 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X restore 423 291 pd mrk;
#X text 20 389 x y w h id gid vel dur c vis mrk;
#X obj 568 183 s \$0.marked;
#X msg 568 148 \$1 0;
#X connect 0 0 1 0; #X connect 0 0 1 0;
#X connect 1 0 2 0; #X connect 1 0 2 0;
#X connect 2 0 35 0; #X connect 2 0 32 0;
#X connect 10 0 4 0; #X connect 10 0 4 0;
#X connect 11 0 32 0; #X connect 11 0 33 0;
#X connect 11 1 10 0; #X connect 11 1 10 0;
#X connect 11 1 12 0; #X connect 11 1 12 0;
#X connect 11 1 13 0; #X connect 11 1 13 0;
#X connect 11 1 14 0; #X connect 11 1 14 0;
#X connect 11 1 15 0; #X connect 11 1 15 0;
#X connect 11 1 16 0; #X connect 11 1 16 0;
#X connect 11 1 38 0;
#X connect 12 0 5 0; #X connect 12 0 5 0;
#X connect 13 0 6 0; #X connect 13 0 6 0;
#X connect 14 0 8 0; #X connect 14 0 8 0;
...@@ -3425,30 +3444,33 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3425,30 +3444,33 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X connect 16 0 9 0; #X connect 16 0 9 0;
#X connect 17 0 18 0; #X connect 17 0 18 0;
#X connect 18 0 28 0; #X connect 18 0 28 0;
#X connect 19 0 31 2; #X connect 19 0 34 2;
#X connect 20 0 31 3; #X connect 20 0 34 3;
#X connect 21 0 31 4; #X connect 21 0 34 4;
#X connect 22 0 31 5; #X connect 22 0 34 5;
#X connect 23 0 31 6; #X connect 23 0 34 6;
#X connect 24 0 31 8; #X connect 24 0 34 8;
#X connect 25 0 31 9; #X connect 25 0 34 9;
#X connect 26 0 31 0; #X connect 26 0 34 0;
#X connect 27 0 31 1; #X connect 27 0 34 1;
#X connect 29 0 32 0; #X connect 29 0 33 0;
#X connect 31 0 17 0; #X connect 30 0 34 7;
#X connect 32 0 26 0; #X connect 31 0 32 1;
#X connect 32 1 27 0; #X connect 32 0 11 0;
#X connect 32 2 19 0; #X connect 33 0 26 0;
#X connect 32 3 20 0; #X connect 33 1 27 0;
#X connect 32 4 21 0; #X connect 33 2 19 0;
#X connect 32 5 22 0; #X connect 33 3 20 0;
#X connect 32 6 23 0; #X connect 33 4 21 0;
#X connect 32 7 33 0; #X connect 33 5 22 0;
#X connect 32 8 24 0; #X connect 33 6 23 0;
#X connect 32 9 25 0; #X connect 33 7 30 0;
#X connect 33 0 31 7; #X connect 33 8 24 0;
#X connect 34 0 35 1; #X connect 33 9 25 0;
#X connect 35 0 11 0; #X connect 33 10 35 0;
#X connect 34 0 17 0;
#X connect 35 0 34 10;
#X connect 38 0 37 0;
#X restore 19 18 pd note.create; #X restore 19 18 pd note.create;
#N canvas 166 421 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 8 r \$0.global.receive;
...@@ -3896,7 +3918,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3896,7 +3918,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X connect 26 0 25 0; #X connect 26 0 25 0;
#X connect 26 1 17 0; #X connect 26 1 17 0;
#X restore 19 110 pd note.change.gid; #X restore 19 110 pd note.change.gid;
#N canvas 0 132 347 307 note.select 0; #N canvas 0 198 347 307 note.select 0;
#N canvas 73 99 380 620 get.selected.ids 0; #N canvas 73 99 380 620 get.selected.ids 0;
#X obj 39 309 tabread \$0.step; #X obj 39 309 tabread \$0.step;
#X msg 39 90 1000; #X msg 39 90 1000;
...@@ -3993,15 +4015,25 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -3993,15 +4015,25 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X connect 40 0 23 0; #X connect 40 0 23 0;
#X connect 40 1 41 0; #X connect 40 1 41 0;
#X connect 41 0 23 0; #X connect 41 0 23 0;
#X restore 17 94 pd get.selected.ids; #X restore 36 165 pd get.selected.ids;
#X obj 17 152 print selected_ids;
#X obj 17 21 r \$0.global.receive; #X obj 17 21 r \$0.global.receive;
#X obj 17 44 route note; #X obj 17 44 route note;
#X obj 17 67 route select; #X obj 17 67 route select;
#X connect 0 0 1 0; #X obj 36 219 s \$0.marked;
#X msg 36 193 \$1 1;
#X obj 17 243 s \$0.redraw;
#X msg 56 117 const 0;
#X obj 56 140 s \$0.marked;
#X obj 17 90 t b a b;
#X connect 0 0 5 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0; #X connect 2 0 3 0;
#X connect 3 0 4 0; #X connect 3 0 9 0;
#X connect 4 0 0 0; #X connect 5 0 4 0;
#X connect 7 0 8 0;
#X connect 9 0 6 0;
#X connect 9 1 0 0;
#X connect 9 2 7 0;
#X restore 19 133 pd note.select; #X restore 19 133 pd note.select;
#N canvas 1 99 452 346 dump 0; #N canvas 1 99 452 346 dump 0;
#X obj 15 20 r \$0.global.receive; #X obj 15 20 r \$0.global.receive;
...@@ -4146,6 +4178,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -4146,6 +4178,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X restore 19 156 pd dump; #X restore 19 156 pd dump;
#X restore 19 155 pd process.events; #X restore 19 155 pd process.events;
#X text 13 12 [unpunch] v0.0alpha; #X text 13 12 [unpunch] v0.0alpha;
#X obj 565 443 array define \$0.marked 1000;
#X connect 0 0 23 0; #X connect 0 0 23 0;
#X connect 1 0 2 0; #X connect 1 0 2 0;
#X connect 2 0 40 0; #X connect 2 0 40 0;
...@@ -4159,6 +4192,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.; ...@@ -4159,6 +4192,7 @@ by clicking on two coordinates on the grid with Ctrl-key pressed.;
#X connect 11 0 29 0; #X connect 11 0 29 0;
#X connect 11 0 30 0; #X connect 11 0 30 0;
#X connect 11 0 31 0; #X connect 11 0 31 0;
#X connect 11 0 45 0;
#X connect 12 0 23 0; #X connect 12 0 23 0;
#X connect 14 0 18 0; #X connect 14 0 18 0;
#X connect 17 0 20 0; #X connect 17 0 20 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