From 108c7c2f64b9254ea599073bd737f5e5a8b8d9c3 Mon Sep 17 00:00:00 2001
From: Luke Iannini <lukeiannini@users.sourceforge.net>
Date: Fri, 6 Feb 2009 11:16:06 +0000
Subject: adding jonathan wilkes lovely 'pal' editor, continued work and
 upgrades to ds-designer, and the start of ds-choice-list, a context-menu-ish
 gui element (with icons thanks to ds-designer)

svn path=/trunk/abstractions/ds-gui/; revision=10748
---
 pal/pslider.pd | 243 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 243 insertions(+)
 create mode 100755 pal/pslider.pd

(limited to 'pal/pslider.pd')

diff --git a/pal/pslider.pd b/pal/pslider.pd
new file mode 100755
index 0000000..b215228
--- /dev/null
+++ b/pal/pslider.pd
@@ -0,0 +1,243 @@
+#N canvas 0 0 1004 682 12;
+#X obj 20 -14 inlet;
+#N canvas 219 -11 269 90 show-sym 0;
+#X obj -366 14 inlet;
+#X obj -366 39 showsym \$1 \$2 SET-SLIDER-COLOR;
+#X connect 0 0 1 0;
+#X restore 875 153 pd show-sym;
+#N canvas 0 0 296 250 label-tgl 0;
+#X obj 122 94 sel 0 1;
+#X obj 122 66 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 11 20 loadbang;
+#X msg 11 46 0;
+#X obj 122 194 outlet;
+#X msg 122 119 symbol empty;
+#X msg 148 148 symbol LABEL;
+#X obj 122 28 r \$1-label-tgl;
+#X connect 0 0 5 0;
+#X connect 0 1 6 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 5 0 4 0;
+#X connect 6 0 4 0;
+#X connect 7 0 1 0;
+#X restore 122 531 pd label-tgl;
+#X obj 148 507 r \$1-patchname;
+#X obj 45 507 loadbang;
+#X obj 45 531 symbol \$2;
+#X obj 572 291 constrain \$1 \$2;
+#X obj 578 319 getGUIsize \$3 \$4 \$5 \$6;
+#X obj 217 205 pack;
+#X obj 36 338 t b a;
+#X obj 217 175 +;
+#X obj 258 175 +;
+#X obj 36 313 unpack f f f f;
+#N canvas 0 0 700 277 swap 0;
+#X obj 23 241 outlet;
+#X obj 123 238 outlet;
+#X obj 23 166 spigot 1;
+#X obj 123 166 spigot 0;
+#X obj 23 11 inlet;
+#X obj 196 11 r \$2-color-swap;
+#X obj 214 166 spigot 0;
+#X obj 196 37 t a b;
+#X obj 196 63 pack f 1;
+#X msg 275 63 0;
+#X obj 196 89 route 0 1 2;
+#X obj 214 238 outlet;
+#X connect 2 0 0 0;
+#X connect 3 0 1 0;
+#X connect 4 0 2 0;
+#X connect 4 0 3 0;
+#X connect 4 0 6 0;
+#X connect 5 0 7 0;
+#X connect 6 0 11 0;
+#X connect 7 0 8 0;
+#X connect 7 1 9 0;
+#X connect 8 0 10 0;
+#X connect 9 0 2 1;
+#X connect 9 0 3 1;
+#X connect 9 0 6 1;
+#X connect 10 0 2 1;
+#X connect 10 1 3 1;
+#X connect 10 2 6 1;
+#X restore 202 313 pd swap;
+#X obj 36 289 spigot;
+#X obj 202 289 spigot;
+#X obj 202 266 r \$1-rgb-value;
+#X obj 36 266 r \$1-label-posNsize;
+#X obj 93 290 r \$2-lock;
+#X obj 266 381 loadbang;
+#X obj 266 405 symbol \$2;
+#X obj 217 234 s \$1-helper-xy;
+#X obj 537 326 t a;
+#X msg 352 460 \; \$3\$2 label \$1;
+#X obj 352 435 pack s f s;
+#X obj 450 405 loadbang;
+#X obj 450 435 symbol \$2;
+#X obj 834 356 t b a;
+#X obj 834 387 set \$2 xsize ysize;
+#X obj 854 179 linORlog;
+#X obj 537 153 get \$2 id x0 y0 x y min max soc init lin;
+#X obj 783 179 == 0;
+#X obj 537 95 t a a a;
+#X obj 563 265 if-numscroll \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 36 405 pack 0 22 22 f 20 12 10 0 s;
+#X msg 36 430 \; \$9\$4 color \$1 \$2 \$3 \; \$9\$4 label_pos \$5 \$6
+\; \$9\$4 label_font \$8 \$7;
+#X obj 273 337 t b a;
+#X obj 219 337 t b a;
+#X obj 268 507 loadbang;
+#X obj 268 534 symbol \$9;
+#X obj 20 562 pack f s \$3 \$4 s s \$7 \$8 s;
+#X msg 20 590 \; \$6 obj 10 10 \$9 \$3 \$4 \$7 \$8 0 0 \$9 \$2\$1 empty
+0 -9 0 10 -262144 -1 -1 0 1;
+#X obj 352 405 label \$1 \$2;
+#X obj 822 -10 clean \$1 \$2;
+#X obj 675 124 get \$2 id;
+#X obj 20 11 pappend \$1 \$2 \$3 \$4 \$5 \$6;
+#X obj 82 122 set \$2 min max;
+#X obj 82 97 \$7;
+#X obj 117 97 \$8;
+#X obj 82 69 t b b a;
+#X obj 390 329 t a;
+#X obj 217 121 get \$2 x0 y0 x y;
+#X obj 576 415 pack f f f f f f f s s;
+#X obj 760 391 loadbang;
+#X obj 760 414 symbol \$2;
+#X msg 576 445 \; \$9\$1 size \$2 \$3 \; \$9\$1 range \$4 \$5 \; \$9\$1
+\$8 \; \$9\$1 steady \$6 \; \$9\$1 init \$7;
+#N canvas 0 0 191 238 (subpatch) 0;
+#X obj 14 20 inlet;
+#X obj 85 22 inlet;
+#X obj 14 183 outlet;
+#X obj 85 184 outlet;
+#X connect 0 0 2 0;
+#X connect 1 0 3 0;
+#X restore 612 366 pd;
+#X obj 875 116 t a;
+#X obj 20 164 t a;
+#X obj 442 223 symbol \$2;
+#X obj 442 198 loadbang;
+#X obj 337 223 pack f f f s;
+#X msg 337 250 \; \$4\$3 pos \$1 \$2;
+#X obj 360 121 get \$2 x y id;
+#X obj 360 146 + 10;
+#X obj 410 146 + 10;
+#X obj 537 16 lock \$1 \$2;
+#X obj 537 42 route change displace deselect select click pappend;
+#X obj 863 213 shownum \$1 \$2;
+#X obj 537 -9 pstruct \$1 \$2 min max soc init lin;
+#X connect 0 0 45 0;
+#X connect 2 0 40 4;
+#X connect 3 0 40 5;
+#X connect 4 0 5 0;
+#X connect 5 0 40 1;
+#X connect 6 0 7 0;
+#X connect 6 1 7 1;
+#X connect 7 0 28 0;
+#X connect 7 0 33 1;
+#X connect 7 0 56 0;
+#X connect 7 1 27 0;
+#X connect 7 1 33 2;
+#X connect 7 1 56 1;
+#X connect 8 0 21 0;
+#X connect 9 0 34 0;
+#X connect 9 1 34 4;
+#X connect 10 0 8 0;
+#X connect 11 0 8 1;
+#X connect 12 0 9 0;
+#X connect 12 1 34 5;
+#X connect 12 2 34 6;
+#X connect 12 3 34 7;
+#X connect 13 0 34 0;
+#X connect 13 1 37 0;
+#X connect 13 2 36 0;
+#X connect 14 0 12 0;
+#X connect 15 0 13 0;
+#X connect 16 0 15 0;
+#X connect 17 0 14 0;
+#X connect 18 0 14 1;
+#X connect 18 0 15 1;
+#X connect 19 0 20 0;
+#X connect 20 0 34 8;
+#X connect 22 0 24 1;
+#X connect 22 0 34 3;
+#X connect 22 0 52 0;
+#X connect 24 0 23 0;
+#X connect 25 0 26 0;
+#X connect 26 0 24 2;
+#X connect 27 0 28 0;
+#X connect 27 1 28 1;
+#X connect 29 0 52 7;
+#X connect 30 0 22 0;
+#X connect 30 1 6 0;
+#X connect 30 2 6 1;
+#X connect 30 5 52 3;
+#X connect 30 6 52 4;
+#X connect 30 7 31 0;
+#X connect 30 8 52 6;
+#X connect 30 9 29 0;
+#X connect 31 0 52 5;
+#X connect 32 0 30 0;
+#X connect 32 1 33 0;
+#X connect 32 2 57 0;
+#X connect 34 0 35 0;
+#X connect 36 0 34 0;
+#X connect 36 1 34 2;
+#X connect 37 0 34 0;
+#X connect 37 1 34 1;
+#X connect 38 0 39 0;
+#X connect 39 0 40 8;
+#X connect 40 0 41 0;
+#X connect 42 0 24 0;
+#X connect 44 0 50 0;
+#X connect 45 0 58 0;
+#X connect 45 1 49 0;
+#X connect 45 1 51 0;
+#X connect 47 0 46 0;
+#X connect 48 0 46 1;
+#X connect 49 0 47 0;
+#X connect 49 1 48 0;
+#X connect 49 2 46 2;
+#X connect 50 0 24 1;
+#X connect 50 0 34 3;
+#X connect 51 0 10 0;
+#X connect 51 1 11 0;
+#X connect 51 2 10 1;
+#X connect 51 3 11 1;
+#X connect 52 0 55 0;
+#X connect 53 0 54 0;
+#X connect 54 0 52 8;
+#X connect 56 0 52 1;
+#X connect 56 1 52 2;
+#X connect 57 0 28 2;
+#X connect 57 0 1 0;
+#X connect 58 0 40 0;
+#X connect 58 0 34 3;
+#X connect 58 0 24 1;
+#X connect 59 0 61 3;
+#X connect 60 0 59 0;
+#X connect 61 0 62 0;
+#X connect 63 0 64 0;
+#X connect 63 1 65 0;
+#X connect 63 2 61 2;
+#X connect 64 0 61 0;
+#X connect 65 0 61 1;
+#X connect 66 0 67 0;
+#X connect 67 0 32 0;
+#X connect 67 0 51 0;
+#X connect 67 0 68 0;
+#X connect 67 1 51 0;
+#X connect 67 1 63 0;
+#X connect 67 3 44 0;
+#X connect 67 3 51 0;
+#X connect 67 3 57 0;
+#X connect 67 3 68 1;
+#X connect 67 4 32 0;
+#X connect 67 4 68 1;
+#X connect 67 4 51 0;
+#X connect 67 5 32 0;
+#X connect 69 0 66 0;
-- 
cgit v1.2.1