grey out scroll buttons when reaching boundary; add scrollup, scrolldown,...

grey out scroll buttons when reaching boundary; add scrollup, scrolldown, pageleft, pageright receives

unpunch.pd

@@ -1502,30 +1502,34 @@ num float nvis;
 #X obj 17 39 filledpolygon 777 777 1 0 0 w 0 w 24 0 24;
 #X connect 1 0 0 0;
 #X restore 9 247 pd guibar-template;
-#N canvas 100 265 435 556 pager.logic 0;
+#N canvas 100 265 539 437 pager.logic 0;
 #X obj 24 24 r \$0.pager.send;
-#X msg 24 186 -1;
-#X msg 53 187 1;
-#X obj 24 234 f 1;
-#X obj 24 263 +;
-#X obj 24 286 t a a;
-#X obj 24 209 t b a;
+#X msg 196 96 -1;
+#X msg 298 75 1;
+#X obj 196 144 f 1;
+#X obj 196 173 +;
+#X obj 196 196 t a a;
+#X obj 196 119 t b a;
 #X obj 24 110 get \$0.pager dir;
 #X obj 24 47 route click change;
-#X obj 156 91 get \$0.pager num;
-#X obj 139 209 != 1;
+#X obj 76 76 get \$0.pager num;
+#X obj 311 119 != 1;
 #X obj 24 133 sel 0 24;
-#X obj 24 156 spigot 1;
-#X obj 51 459 s \$0.page;
-#X obj 24 432 t b a;
-#X obj 24 481 s \$0.redraw;
-#X obj 24 309 - 1;
-#X obj 24 351 t b a;
-#X obj 24 374 del 0;
-#X obj 24 397 f;
-#X text 89 379 <- decoupler (does this work at all?);
-#X obj 131 269 r \$0.page;
-#X obj 131 292 + 1;
+#X obj 196 66 spigot 1;
+#X obj 223 369 s \$0.page;
+#X obj 196 342 t b a;
+#X obj 196 391 s \$0.redraw;
+#X obj 196 219 - 1;
+#X obj 196 261 t b a;
+#X obj 196 284 del 0;
+#X obj 196 307 f;
+#X text 261 289 <- decoupler (does this work at all?);
+#X obj 303 179 r \$0.page;
+#X obj 303 202 + 1;
+#X obj 46 160 s \$0.page.right;
+#X obj 24 188 s \$0.page.left;
+#X obj 298 19 r \$0.page.right;
+#X obj 196 18 r \$0.page.left;
 #X connect 0 0 8 0;
 #X connect 1 0 6 0;
 #X connect 2 0 6 0;
@@ -1539,8 +1543,8 @@ num float nvis;
 #X connect 8 0 7 0;
 #X connect 8 1 9 0;
 #X connect 10 0 12 1;
-#X connect 11 0 12 0;
-#X connect 11 1 2 0;
+#X connect 11 0 24 0;
+#X connect 11 1 23 0;
 #X connect 12 0 1 0;
 #X connect 14 0 15 0;
 #X connect 14 1 13 0;
@@ -1551,6 +1555,8 @@ num float nvis;
 #X connect 19 0 14 0;
 #X connect 21 0 22 0;
 #X connect 22 0 3 1;
+#X connect 25 0 2 0;
+#X connect 26 0 12 0;
 #X restore 212 198 pd pager.logic;
 #N canvas 330 412 397 197 scroller-template 0;
 #X obj 17 95 s \$0.scroller.send;
@@ -1559,7 +1565,7 @@ num float nvis;
 #X obj 17 26 filledpolygon c c 1 0 0 14 0 7 dir;
 #X connect 1 0 0 0;
 #X restore 9 220 pd scroller-template;
-#N canvas 100 265 396 336 scroller.logic 0;
+#N canvas 100 265 682 317 scroller.logic 0;
 #X obj 24 47 route click change;
 #X obj 24 110 get \$0.scroller dir;
 #X obj 24 133 sel -10 10;
@@ -1568,6 +1574,19 @@ num float nvis;
 #X obj 52 160 del 0;
 #X obj 24 186 del 0;
 #X obj 24 24 r \$0.scroller.send;
+#X obj 413 277 s \$0.pitchoffset;
+#X obj 363 123 r \$0.pitchdownshift;
+#X obj 334 122 f;
+#X obj 520 119 r \$0.pitchupshift;
+#X obj 490 120 f;
+#X obj 385 168 r \$0.pitchoffset;
+#X obj 334 200 +;
+#X obj 490 204 +;
+#X obj 307 76 t b b;
+#X obj 463 87 t b b;
+#X obj 257 121 s \$0.redraw;
+#X obj 307 39 r \$0.scroll.down;
+#X obj 463 46 r \$0.scroll.up;
 #X connect 0 0 1 0;
 #X connect 1 0 2 0;
 #X connect 2 0 6 0;
@@ -1575,6 +1594,20 @@ num float nvis;
 #X connect 5 0 4 0;
 #X connect 6 0 3 0;
 #X connect 7 0 0 0;
+#X connect 9 0 10 1;
+#X connect 10 0 14 0;
+#X connect 11 0 12 1;
+#X connect 12 0 15 0;
+#X connect 13 0 14 1;
+#X connect 13 0 15 1;
+#X connect 14 0 8 0;
+#X connect 15 0 8 0;
+#X connect 16 0 18 0;
+#X connect 16 1 10 0;
+#X connect 17 0 18 0;
+#X connect 17 1 12 0;
+#X connect 19 0 16 0;
+#X connect 20 0 17 0;
 #X restore 212 219 pd scroller.logic;
 #X connect 4 0 15 0;
 #X connect 6 0 9 0;
@@ -2554,27 +2587,16 @@ num float nvis;
 #X obj 219 324 s \$0.pitchdownshift;
 #X obj 219 248 min 12;
 #X obj 143 102 r \$0.pitchoffset;
-#X obj 463 248 s \$0.pitchoffset;
 #X obj 219 271 max 0;
-#X obj 143 125 t a a;
 #X msg 143 177 127 \$1;
 #X obj 143 200 -;
 #X obj 143 223 min 12;
 #X obj 143 246 max 0;
 #X obj 143 362 s \$0.pitchupshift;
 #X obj 219 294 * -1;
-#X obj 413 94 r \$0.pitchdownshift;
-#X obj 384 93 f;
-#X obj 570 90 r \$0.pitchupshift;
-#X obj 540 91 f;
-#X obj 435 139 r \$0.pitchoffset;
-#X obj 384 171 +;
-#X obj 540 175 +;
-#X obj 357 47 t b b;
-#X obj 513 58 t b b;
-#X obj 307 92 s \$0.redraw;
-#X obj 357 10 r \$0.scroll.down;
-#X obj 513 17 r \$0.scroll.up;
+#X obj 143 125 t a a a;
+#X obj 339 359 s \$0.pitchupperboundary;
+#X obj 338 296 s \$0.pitchlowerboundary;
 #X connect 1 0 5 0;
 #X connect 2 0 3 0;
 #X connect 3 0 4 0;
@@ -2586,31 +2608,19 @@ num float nvis;
 #X connect 8 0 9 0;
 #X connect 9 0 10 0;
 #X connect 10 0 13 0;
-#X connect 13 0 16 0;
-#X connect 14 0 17 0;
-#X connect 16 0 23 0;
+#X connect 10 1 24 0;
+#X connect 13 0 15 0;
+#X connect 14 0 22 0;
+#X connect 15 0 21 0;
+#X connect 16 0 17 0;
 #X connect 17 0 18 0;
-#X connect 17 1 6 0;
 #X connect 18 0 19 0;
 #X connect 19 0 20 0;
-#X connect 20 0 21 0;
-#X connect 21 0 22 0;
-#X connect 23 0 12 0;
-#X connect 24 0 25 1;
-#X connect 25 0 29 0;
-#X connect 26 0 27 1;
-#X connect 27 0 30 0;
-#X connect 28 0 29 1;
-#X connect 28 0 30 1;
-#X connect 29 0 15 0;
-#X connect 30 0 15 0;
-#X connect 31 0 33 0;
-#X connect 31 1 25 0;
-#X connect 32 0 33 0;
-#X connect 32 1 27 0;
-#X connect 34 0 31 0;
-#X connect 35 0 32 0;
-#X restore 96 236 pd pitchoffset.calculations;
+#X connect 21 0 12 0;
+#X connect 22 0 16 0;
+#X connect 22 1 23 0;
+#X connect 22 2 6 0;
+#X restore 14 197 pd pitchoffset.calculations;
 #X restore 19 95 pd converters;
 #N canvas 342 165 401 476 inspector 0;
 #X obj 42 89 t a a a a a a;