From 0359c9a8c153daa95d00c187b131c41786f92e4c Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Sat, 20 Sep 2008 17:50:07 +0000 Subject: gop-edit now uses iemguts (one of the greatest things to happen to pd in a long time), list-value uses special s/r names to not interfere with vanilla s/r svn path=/trunk/abstractions/senderfruit/; revision=10304 --- core/gop-edit.pd | 65 +++++++++++++++++++++++++++++++----------------------- core/list-value.pd | 32 +++++++++++++-------------- 2 files changed, 54 insertions(+), 43 deletions(-) diff --git a/core/gop-edit.pd b/core/gop-edit.pd index 5fbe13c..01b6032 100644 --- a/core/gop-edit.pd +++ b/core/gop-edit.pd @@ -1,28 +1,39 @@ -#N canvas 356 354 1026 403 10; -#X obj 4 1 hsl 290 15 10 300 0 0 \$0.x-size-s \$0.x-size-r x-size 140 -7 0 10 -262144 -1 -1 9400 1; -#X obj 1 3 vsl 15 290 300 10 0 0 \$0.y-size-s \$0.y-size-r y 5 150 -0 10 -262144 -1 -1 22800 1; -#X obj 554 188 loadbang; -#X msg 554 213 10; -#X obj 554 242 s \$0.y-size-r; -#X obj 391 14 r \$0.y-size-s; -#X obj 362 -6 r \$0.x-size-s; -#X obj 17 17 nbx 3 14 0 1e+37 0 0 \$0.x-off-s \$0.x-off-r x 40 7 0 -10 -262144 -1 -1 425 256; -#X obj 17 31 nbx 3 14 0 1e+37 0 0 \$0.y-off-s \$0.y-off-r y 40 7 0 -10 -262144 -1 -1 100 256; -#X obj 362 78 hotpack f f f f; -#X obj 420 34 r \$0.x-off-s; -#X obj 449 54 r \$0.y-off-s; -#X msg 362 101 donecanvasdialog 1 -1 2 0 -1 1 1 \$1 \$2 \$3 \$4; -#X obj 362 133 s \$1; -#X connect 2 0 3 0; -#X connect 3 0 4 0; -#X connect 5 0 9 1; +#N canvas 356 354 434 358 10; +#X declare -lib iemlib; +#X declare -lib iemguts; +#X obj 284 188 loadbang; +#X msg 284 213 10; +#X obj 121 14 r \$0.y-size-s; +#X obj 92 -6 r \$0.x-size-s; +#X obj 1 1 nbx 3 14 0 1e+37 0 0 \$0.x-off-s \$0.x-off-r x-offs 40 7 +0 10 -262144 -1 -1 0 256; +#X obj 1 15 nbx 3 14 0 1e+37 0 0 \$0.y-off-s \$0.y-off-r y-offs 40 +7 0 10 -262144 -1 -1 0 256; +#X obj 92 78 hotpack f f f f; +#X obj 150 34 r \$0.x-off-s; +#X obj 179 54 r \$0.y-off-s; +#X msg 92 101 donecanvasdialog 1 -1 2 0 -1 1 1 \$1 \$2 \$3 \$4; +#X obj 325 55 import iemguts; +#X obj 92 133 sendcanvas 1; +#X obj 1 41 nbx 3 14 0 1e+37 0 0 \$0.x-size-s \$0.x-size-r x-size 40 +7 0 10 -262144 -1 -1 0 256; +#X obj 1 55 nbx 3 14 0 1e+37 0 0 \$0.y-size-s \$0.y-size-r y-size 40 +7 0 10 -262144 -1 -1 0 256; +#X obj 19 30 cnv 10 43 10 empty empty gop-edit 2 5 0 8 -260129 -262144 +0; +#X obj 284 302 s \$0.y-size-r; +#X obj 284 242 s \$0.x-off-r; +#X obj 284 262 s \$0.y-off-r; +#X obj 284 282 s \$0.x-size-r; +#X connect 0 0 1 0; +#X connect 1 0 16 0; +#X connect 1 0 17 0; +#X connect 1 0 18 0; +#X connect 1 0 15 0; +#X connect 2 0 6 1; +#X connect 3 0 6 0; #X connect 6 0 9 0; -#X connect 9 0 12 0; -#X connect 10 0 9 2; -#X connect 11 0 9 3; -#X connect 12 0 13 0; -#X coords 0 -1 1 1 297 297 2 0 0; +#X connect 7 0 6 2; +#X connect 8 0 6 3; +#X connect 9 0 11 0; +#X coords 0 -1 1 1 85 70 2 0 0; diff --git a/core/list-value.pd b/core/list-value.pd index b5f14bc..45e987a 100644 --- a/core/list-value.pd +++ b/core/list-value.pd @@ -1,27 +1,27 @@ #N canvas 536 378 450 300 10; #X obj 55 171 list; -#X obj 76 125 s \$1; -#X obj 76 145 r \$1; #X obj 55 197 outlet; #X obj 55 51 inlet; #X obj 244 73 loadbang; #X obj 244 163 list; -#X obj 265 138 r \$1; -#X obj 301 210 s \$1; #X obj 244 186 route bang; #X obj 244 95 s \$1.INIT-NEW; #X obj 244 116 r \$1.INIT-NEW; #X obj 55 73 route bang clear; #X obj 76 102 t b; -#X connect 0 0 3 0; -#X connect 2 0 0 1; -#X connect 4 0 12 0; -#X connect 5 0 10 0; -#X connect 6 0 9 0; -#X connect 7 0 6 1; -#X connect 9 1 8 0; -#X connect 11 0 6 0; -#X connect 12 0 0 0; -#X connect 12 1 13 0; -#X connect 12 2 1 0; -#X connect 13 0 1 0; +#X obj 76 125 s \$1.VALUE; +#X obj 76 145 r \$1.VALUE; +#X obj 265 138 r \$1.VALUE; +#X obj 301 210 s \$1.VALUE; +#X connect 0 0 1 0; +#X connect 2 0 8 0; +#X connect 3 0 6 0; +#X connect 4 0 5 0; +#X connect 5 1 13 0; +#X connect 7 0 4 0; +#X connect 8 0 0 0; +#X connect 8 1 9 0; +#X connect 8 2 10 0; +#X connect 9 0 10 0; +#X connect 11 0 0 1; +#X connect 12 0 4 1; -- cgit v1.2.1