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

implement mode button, but they do nothing yet

when active, clicking a note applies the default value on it
parent 39c635dc
...@@ -620,8 +620,8 @@ id float gid float vel float c float vis; ...@@ -620,8 +620,8 @@ id float gid float vel float c float vis;
#X msg 481 337 const 0; #X msg 481 337 const 0;
#X obj 565 306 array define \$0.active 1000; #X obj 565 306 array define \$0.active 1000;
#X obj 461 58 t b b b b b; #X obj 461 58 t b b b b b;
#N canvas 617 363 640 399 create_guis 0; #N canvas 188 187 640 399 create_guis 0;
#X obj 356 33 inlet; #X obj 355 32 inlet;
#X obj 404 294 outlet; #X obj 404 294 outlet;
#X obj 16 346 list store; #X obj 16 346 list store;
#X msg 16 320 get \$1 1; #X msg 16 320 get \$1 1;
...@@ -689,7 +689,7 @@ id float gid float vel float c float vis; ...@@ -689,7 +689,7 @@ id float gid float vel float c float vis;
#X connect 19 3 15 3; #X connect 19 3 15 3;
#X connect 20 0 6 0; #X connect 20 0 6 0;
#X connect 21 0 6 1; #X connect 21 0 6 1;
#X restore 426 103 pd create.gid.buttons; #X restore 442 89 pd create.gid.buttons;
#N canvas 0 99 450 300 create.vel.number 0; #N canvas 0 99 450 300 create.vel.number 0;
#X obj 24 21 inlet; #X obj 24 21 inlet;
#X obj 24 201 outlet; #X obj 24 201 outlet;
...@@ -708,7 +708,7 @@ id float gid float vel float c float vis; ...@@ -708,7 +708,7 @@ id float gid float vel float c float vis;
#X connect 6 0 7 0; #X connect 6 0 7 0;
#X connect 7 0 8 0; #X connect 7 0 8 0;
#X connect 8 0 1 0; #X connect 8 0 1 0;
#X restore 409 132 pd create.vel.number; #X restore 427 120 pd create.vel.number;
#N canvas 0 99 450 300 create.dur.number 0; #N canvas 0 99 450 300 create.dur.number 0;
#X obj 24 21 inlet; #X obj 24 21 inlet;
#X obj 24 216 outlet; #X obj 24 216 outlet;
...@@ -727,13 +727,12 @@ id float gid float vel float c float vis; ...@@ -727,13 +727,12 @@ id float gid float vel float c float vis;
#X connect 6 0 4 1; #X connect 6 0 4 1;
#X connect 7 0 1 0; #X connect 7 0 1 0;
#X connect 8 0 3 1; #X connect 8 0 3 1;
#X restore 392 160 pd create.dur.number; #X restore 413 147 pd create.dur.number;
#N canvas 0 99 397 449 create.show.selector 0; #N canvas 0 99 397 449 create.show.selector 0;
#X obj 7 7 inlet; #X obj 7 7 inlet;
#X obj 7 411 outlet; #X obj 7 411 outlet;
#X obj 7 350 list prepend \$0; #X obj 7 350 list prepend \$0;
#X msg 7 378 scalar \$1.show.selector \$2 20 555 \$3 \$4; #X msg 7 378 scalar \$1.show.selector \$2 20 555 \$3 \$4;
#X msg 7 316 \$1 0 none \, \$2 1 velocity \, \$3 2 gid;
#X obj 7 61 f; #X obj 7 61 f;
#X text 46 84 offset from left border; #X text 46 84 offset from left border;
#X msg 26 138 3; #X msg 26 138 3;
...@@ -748,29 +747,30 @@ id float gid float vel float c float vis; ...@@ -748,29 +747,30 @@ id float gid float vel float c float vis;
#X obj 7 30 b; #X obj 7 30 b;
#X obj 7 111 t b b a b; #X obj 7 111 t b b a b;
#X obj 8 84 + 300; #X obj 8 84 + 300;
#X connect 0 0 16 0; #X msg 7 316 \$1 0 none \, \$2 1 velocity \, \$3 2 group;
#X connect 0 0 15 0;
#X connect 2 0 3 0; #X connect 2 0 3 0;
#X connect 3 0 1 0; #X connect 3 0 1 0;
#X connect 4 0 2 0; #X connect 4 0 17 0;
#X connect 5 0 18 0; #X connect 6 0 7 0;
#X connect 7 0 8 0; #X connect 7 0 8 0;
#X connect 8 0 9 0; #X connect 8 0 9 0;
#X connect 9 0 10 0; #X connect 9 0 11 0;
#X connect 10 0 12 0; #X connect 9 1 10 0;
#X connect 10 1 11 0; #X connect 10 0 8 1;
#X connect 11 0 9 1; #X connect 11 0 12 0;
#X connect 12 0 13 0; #X connect 12 0 13 1;
#X connect 13 0 14 1; #X connect 12 1 11 1;
#X connect 13 1 12 1; #X connect 13 0 18 0;
#X connect 14 0 4 0; #X connect 14 0 4 1;
#X connect 15 0 5 1; #X connect 15 0 4 0;
#X connect 16 0 5 0; #X connect 16 0 13 0;
#X connect 17 0 14 0; #X connect 16 1 6 0;
#X connect 17 1 7 0; #X connect 16 2 8 1;
#X connect 17 2 9 1; #X connect 16 3 11 1;
#X connect 17 3 12 1; #X connect 17 0 16 0;
#X connect 18 0 17 0; #X connect 18 0 2 0;
#X restore 362 190 pd create.show.selector; #X restore 384 204 pd create.show.selector;
#N canvas 0 99 450 300 gid.state 0; #N canvas 0 99 450 300 gid.state 0;
#X obj 12 76 route click; #X obj 12 76 route click;
#X obj 12 99 t b p p b; #X obj 12 99 t b p p b;
...@@ -928,8 +928,7 @@ id float gid float vel float c float vis; ...@@ -928,8 +928,7 @@ id float gid float vel float c float vis;
#X connect 7 0 3 0; #X connect 7 0 3 0;
#X connect 8 0 1 1; #X connect 8 0 1 1;
#X connect 9 0 4 0; #X connect 9 0 4 0;
#X restore 311 212 pd create.cursor; #X restore 369 228 pd create.cursor;
#X obj 355 61 t b b b b b b;
#N canvas 357 99 501 367 cursor.state 0; #N canvas 357 99 501 367 cursor.state 0;
#X obj 258 107 until; #X obj 258 107 until;
#X msg 258 130 next; #X msg 258 130 next;
...@@ -966,7 +965,31 @@ id float gid float vel float c float vis; ...@@ -966,7 +965,31 @@ id float gid float vel float c float vis;
#X connect 14 0 8 0; #X connect 14 0 8 0;
#X connect 15 0 7 0; #X connect 15 0 7 0;
#X restore 52 204 pd cursor.state; #X restore 52 204 pd cursor.state;
#X connect 0 0 14 0; #N canvas 0 99 450 300 create.mode.button 0;
#X obj 24 21 inlet;
#X obj 24 206 outlet;
#X obj 110 93 r \$0.canvasleftmargin;
#X obj 24 159 list prepend \$0;
#X obj 24 91 +;
#X obj 24 69 unpack f f s;
#X obj 24 112 pack f f s;
#X msg 24 138 \$1 6 \$2 666 \$3;
#X msg 24 182 scalar \$1.mode.button \$2 \$3 \$4 \$5 \$6;
#X msg 24 46 0 66 velocity \, 90 60 duration \, 170 90 gid;
#X connect 0 0 9 0;
#X connect 2 0 4 1;
#X connect 3 0 8 0;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 5 1 6 1;
#X connect 5 2 6 2;
#X connect 6 0 7 0;
#X connect 7 0 3 0;
#X connect 8 0 1 0;
#X connect 9 0 5 0;
#X restore 398 175 pd create.mode.button;
#X obj 355 61 t b b b b b b b;
#X connect 0 0 16 0;
#X connect 2 0 4 0; #X connect 2 0 4 0;
#X connect 3 0 2 0; #X connect 3 0 2 0;
#X connect 5 0 3 0; #X connect 5 0 3 0;
...@@ -976,14 +999,16 @@ id float gid float vel float c float vis; ...@@ -976,14 +999,16 @@ id float gid float vel float c float vis;
#X connect 9 0 1 0; #X connect 9 0 1 0;
#X connect 10 0 1 0; #X connect 10 0 1 0;
#X connect 13 0 1 0; #X connect 13 0 1 0;
#X connect 14 0 11 0; #X connect 15 0 1 0;
#X connect 14 0 12 0; #X connect 16 0 11 0;
#X connect 14 0 15 0; #X connect 16 0 12 0;
#X connect 14 1 13 0; #X connect 16 0 14 0;
#X connect 14 2 10 0; #X connect 16 1 13 0;
#X connect 14 3 9 0; #X connect 16 2 10 0;
#X connect 14 4 8 0; #X connect 16 3 15 0;
#X connect 14 5 7 0; #X connect 16 4 9 0;
#X connect 16 5 8 0;
#X connect 16 6 7 0;
#X restore 461 195 pd create_guis; #X restore 461 195 pd create_guis;
#N canvas 0 99 804 221 gui-templates 0; #N canvas 0 99 804 221 gui-templates 0;
#N canvas 0 99 408 150 gid.button-template 0; #N canvas 0 99 408 150 gid.button-template 0;
...@@ -992,7 +1017,7 @@ id float gid float vel float c float vis; ...@@ -992,7 +1017,7 @@ id float gid float vel float c float vis;
hl float gid; hl float gid;
#X obj 17 26 filledpolygon clr 0 hl 0 0 0 15 15 15 15 0; #X obj 17 26 filledpolygon clr 0 hl 0 0 0 15 15 15 15 0;
#X connect 1 0 0 0; #X connect 1 0 0 0;
#X restore 7 19 pd gid.button-template; #X restore 8 78 pd gid.button-template;
#N canvas 195 247 418 274 vel-template 0; #N canvas 195 247 418 274 vel-template 0;
#X obj 14 230 s \$0.vel.send; #X obj 14 230 s \$0.vel.send;
#X obj 99 138 max 0; #X obj 99 138 max 0;
...@@ -1036,15 +1061,15 @@ hl float gid; ...@@ -1036,15 +1061,15 @@ hl float gid;
#X connect 5 0 9 0; #X connect 5 0 9 0;
#X connect 8 0 1 1; #X connect 8 0 1 1;
#X connect 9 0 1 0; #X connect 9 0 1 0;
#X restore 8 76 pd dur-template; #X restore 8 18 pd dur-template;
#N canvas 489 158 450 300 show.selector-template 0; #N canvas 469 142 450 300 show.selector-template 0;
#X obj 22 149 s \$0.show.selector.send; #X obj 22 149 s \$0.show.selector.send;
#X obj 21 25 filledpolygon 777 hilite 2 0 0 0 15 55 15 55 0; #X obj 21 25 filledpolygon 777 hilite 2 0 0 0 15 55 15 55 0;
#X obj 22 53 drawsymbol label 2 1 hilite; #X obj 22 53 drawsymbol label 2 1 hilite;
#X obj 22 108 struct \$0.show.selector float x float y float hilite #X obj 22 108 struct \$0.show.selector float x float y float hilite
float id symbol label; float id symbol label;
#X connect 3 0 0 0; #X connect 3 0 0 0;
#X restore 9 102 pd show.selector-template; #X restore 8 138 pd show.selector-template;
#X obj 464 59 route click; #X obj 464 59 route click;
#X obj 464 107 s \$0.default.gid; #X obj 464 107 s \$0.default.gid;
#X obj 333 35 r \$0.vel.send; #X obj 333 35 r \$0.vel.send;
...@@ -1066,7 +1091,56 @@ float id symbol label; ...@@ -1066,7 +1091,56 @@ float id symbol label;
#X obj 22 108 struct \$0.cursor float x float y float h float vis; #X obj 22 108 struct \$0.cursor float x float y float h float vis;
#X obj 18 20 drawpolygon -v vis 900 1 0 0 0 h; #X obj 18 20 drawpolygon -v vis 900 1 0 0 0 h;
#X connect 1 0 0 0; #X connect 1 0 0 0;
#X restore 9 126 pd cursor-template; #X restore 8 168 pd cursor-template;
#N canvas 0 99 392 164 mode.button-template 0;
#X obj 16 99 s \$0.mode.button.send;
#X obj 17 26 filledpolygon c c 1 0 0 0 8 w 8 w 0;
#X obj 16 60 struct \$0.mode.button float x float y float w float c
symbol param;
#X connect 2 0 0 0;
#X restore 8 108 pd mode.button-template;
#N canvas 209 512 810 268 mode.button.logic 0;
#X obj 23 17 r \$0.mode.button.send;
#X msg 99 186 900;
#X msg 130 187 666;
#X obj 99 159 sel 666 900;
#X obj 23 63 t p p, f 26;
#X obj 23 88 get \$0.mode.button w c;
#X obj 23 217 set \$0.mode.button w c, f 26;
#X obj 23 148 f;
#X obj 75 121 b;
#X obj 23 40 route click change;
#X obj 243 17 r \$0.mode.button.send;
#X obj 243 40 route click;
#X obj 243 63 get \$0.mode.button c param;
#X obj 243 86 sel 666 900;
#X msg 243 109 1;
#X msg 274 109 0;
#X obj 243 152 list prepend;
#X obj 243 175 print MODES;
#X connect 0 0 9 0;
#X connect 1 0 6 1;
#X connect 2 0 6 1;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 4 1 6 2;
#X connect 5 0 7 0;
#X connect 5 1 3 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 4 0;
#X connect 9 1 8 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 1 16 1;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 14 0 16 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X restore 212 143 pd mode.button.logic;
#X connect 4 0 15 0; #X connect 4 0 15 0;
#X connect 6 0 9 0; #X connect 6 0 9 0;
#X connect 7 0 8 0; #X connect 7 0 8 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