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

add scroller template for up/down scrolling buttons

parent 5d5dbaae
......@@ -684,7 +684,7 @@ id float gid float vel float dur float c float vis float mrk;
#X msg 490 351 const 0;
#N canvas 162 155 643 410 create_guis 0;
#X obj 355 32 inlet;
#X obj 408 312 outlet;
#X obj 483 367 outlet;
#X obj 16 346 list store;
#X msg 16 320 get \$1 1;
#X obj 16 371 s \$0.gid2lr.set;
......@@ -1271,7 +1271,6 @@ id float gid float vel float dur float c float vis float mrk;
#X connect 21 0 13 0;
#X connect 21 0 20 1;
#X restore 369 270 pd create.pager;
#X obj 355 61 t b b b b b b b b b;
#N canvas 301 211 450 300 create.guibar 0;
#X obj 8 14 inlet;
#X obj 8 235 outlet;
......@@ -1296,7 +1295,23 @@ id float gid float vel float dur float c float vis float mrk;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X restore 473 88 pd create.guibar;
#X connect 0 0 17 0;
#N canvas 83 122 394 333 create.scroller 0;
#X obj 34 256 outlet;
#X obj 34 17 inlet;
#X obj 34 47 f;
#X obj 68 49 r \$0.canvasleftmargin;
#X msg 34 135 17 -10 \, 20 10;
#X obj 34 179 list append \$0;
#X msg 34 214 scalar \$3.scroller 20 \$1 444 \$2;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 2 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X restore 345 296 pd create.scroller;
#X obj 355 61 t b b b b b b b b b b;
#X connect 0 0 19 0;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 5 0 3 0;
......@@ -1308,20 +1323,22 @@ id float gid float vel float dur float c float vis float mrk;
#X connect 13 0 1 0;
#X connect 15 0 1 0;
#X connect 16 0 1 0;
#X connect 17 0 11 0;
#X connect 17 0 12 0;
#X connect 17 0 14 0;
#X connect 17 1 16 0;
#X connect 17 2 13 0;
#X connect 17 3 10 0;
#X connect 17 4 15 0;
#X connect 17 5 9 0;
#X connect 17 6 8 0;
#X connect 17 7 7 0;
#X connect 17 8 18 0;
#X connect 17 0 1 0;
#X connect 18 0 1 0;
#X connect 19 0 11 0;
#X connect 19 0 12 0;
#X connect 19 0 14 0;
#X connect 19 1 18 0;
#X connect 19 2 16 0;
#X connect 19 3 13 0;
#X connect 19 4 10 0;
#X connect 19 5 15 0;
#X connect 19 6 9 0;
#X connect 19 7 8 0;
#X connect 19 8 7 0;
#X connect 19 9 17 0;
#X restore 476 215 pd create_guis;
#N canvas 0 99 804 259 gui-templates 0;
#N canvas 0 99 799 284 gui-templates 0;
#N canvas 0 99 408 150 gid.button-template 0;
#X obj 16 99 s \$0.gid.button.send;
#X obj 17 26 filledpolygon clr clr 1 0 0 0 15 15 15 15 0;
......@@ -1456,7 +1473,7 @@ symbol param;
#X connect 16 0 18 0;
#X connect 18 0 17 0;
#X restore 212 143 pd mode.button.logic;
#N canvas 399 371 405 373 pager-template 0;
#N canvas 330 412 405 373 pager-template 0;
#X obj 15 41 filledpolygon c c 1 dir 7 12 14 12 0;
#X obj 21 285 s \$0.pager.send;
#X obj 21 117 struct \$0.pager float x float y float c float dir float
......@@ -1482,7 +1499,7 @@ num float nvis;
#X obj 21 117 struct \$0.guibar float x float y float w;
#X obj 17 39 filledpolygon 777 777 1 0 0 w 0 w 24 0 24;
#X connect 1 0 0 0;
#X restore 8 228 pd guibar-template;
#X restore 9 247 pd guibar-template;
#N canvas 100 265 435 556 pager.logic 0;
#X obj 24 24 r \$0.pager.send;
#X msg 24 186 -1;
......@@ -1533,6 +1550,13 @@ num float nvis;
#X connect 21 0 22 0;
#X connect 22 0 3 1;
#X restore 212 198 pd pager.logic;
#N canvas 330 412 397 197 scroller-template 0;
#X obj 17 26 filledpolygon c c 1 0 0 10 0 5 dir;
#X obj 17 95 s \$0.scroller.send;
#X obj 17 61 struct \$0.scroller float x float y float c float dir
;
#X connect 2 0 1 0;
#X restore 9 220 pd scroller-template;
#X connect 4 0 15 0;
#X connect 6 0 9 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