From 108c7c2f64b9254ea599073bd737f5e5a8b8d9c3 Mon Sep 17 00:00:00 2001 From: Luke Iannini 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/showsym.pd | 71 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 71 insertions(+) create mode 100755 pal/showsym.pd (limited to 'pal/showsym.pd') diff --git a/pal/showsym.pd b/pal/showsym.pd new file mode 100755 index 0000000..822827a --- /dev/null +++ b/pal/showsym.pd @@ -0,0 +1,71 @@ +#N canvas 0 0 1004 682 12; +#X obj -243 32 inlet; +#X obj -341 440 symbol; +#X msg -111 372 SET-BG-COLOR; +#X obj -111 201 spigot; +#X obj -111 461 bang; +#X obj -376 192 set \$2 color-flag; +#X obj -341 490 set -symbol \$2 color; +#X obj -200 164 r \$1-global-tgl; +#X obj -97 313 s \$2-color-swap; +#X obj -111 490 s \$2-show-sym; +#X obj -376 32 r \$2-show-sym; +#X obj -111 250 f; +#X obj -76 250 + 1; +#X obj -111 276 % 3; +#X obj -111 337 sel 0 1 2; +#X msg -65 420 SET-LABEL-COLOR; +#X obj -111 225 b; +#X obj -376 65 t b b; +#X msg -339 95 1; +#X msg -298 96 stop; +#X obj -188 7 r \$2-pappend; +#X obj -188 32 unpack s p; +#X msg -376 153 0; +#X obj -376 128 del 1750; +#X obj -66 163 r \$2-lock; +#X obj 124 426 outlet; +#X obj 186 426 outlet; +#X obj 248 426 outlet; +#X text 109 449 outlets to trigger bang animation; +#X obj -243 57 t a; +#X obj 418 422 outlet; +#X text 410 444 the pointer; +#X obj -88 396 symbol \$3; +#X connect 0 0 29 0; +#X connect 1 0 6 0; +#X connect 2 0 1 0; +#X connect 2 0 4 0; +#X connect 3 0 16 0; +#X connect 4 0 9 0; +#X connect 7 0 3 0; +#X connect 10 0 17 0; +#X connect 11 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 11 1; +#X connect 13 0 8 0; +#X connect 13 0 14 0; +#X connect 14 0 2 0; +#X connect 14 0 25 0; +#X connect 14 1 26 0; +#X connect 14 1 32 0; +#X connect 14 2 15 0; +#X connect 14 2 27 0; +#X connect 15 0 4 0; +#X connect 15 0 1 0; +#X connect 16 0 11 0; +#X connect 17 0 23 0; +#X connect 17 1 18 0; +#X connect 17 1 19 0; +#X connect 18 0 5 0; +#X connect 19 0 23 0; +#X connect 20 0 21 0; +#X connect 21 1 29 0; +#X connect 22 0 5 0; +#X connect 23 0 22 0; +#X connect 24 0 3 1; +#X connect 29 0 5 1; +#X connect 29 0 6 1; +#X connect 29 0 30 0; +#X connect 32 0 4 0; +#X connect 32 0 1 0; -- cgit v1.2.1