diff options
author | Luke Iannini <lukeiannini@users.sourceforge.net> | 2009-04-03 10:49:10 +0000 |
---|---|---|
committer | Luke Iannini <lukeiannini@users.sourceforge.net> | 2009-04-03 10:49:10 +0000 |
commit | f2d477e14d21180016ec022f1edf7a2dbec34a1c (patch) | |
tree | cc246f7c967a608131ac05e3c1f9eb87049dde0c /ds-abs | |
parent | bd09e605c80507a2e6f805ac41916054004b1ef1 (diff) |
sketching out some pointer-passing objects
svn path=/trunk/abstractions/sfruit/; revision=10954
Diffstat (limited to 'ds-abs')
-rw-r--r-- | ds-abs/ds-create-help.pd | 25 | ||||
-rw-r--r-- | ds-abs/ds-create.pd | 44 | ||||
-rw-r--r-- | ds-abs/ds-rset.pd | 16 | ||||
-rw-r--r-- | ds-abs/ds-rsetsize.pd | 16 |
4 files changed, 101 insertions, 0 deletions
diff --git a/ds-abs/ds-create-help.pd b/ds-abs/ds-create-help.pd new file mode 100644 index 0000000..0c2a441 --- /dev/null +++ b/ds-abs/ds-create-help.pd @@ -0,0 +1,25 @@ +#N canvas 727 43 450 300 10; +#N canvas 207 710 450 300 \$0-thing 0; +#X obj 63 114 struct \$0-thing float x float y symbol name; +#X obj 62 182 drawpolygon -x 515 5 0 0 50 50; +#X obj 61 224 drawsymbol name 10 0 151 this=; +#X restore 316 179 pd \$0-thing; +#X obj 92 170 ds-create pd-\$0-data \$0-thing; +#X obj 92 263 set -symbol \$0-thing name; +#X obj 92 209 t b a; +#N canvas 0 22 450 300 \$0-data 1; +#X restore 316 156 pd \$0-data; +#X msg 92 123 25 80; +#X text 51 23 [ds-create] creates an instance of a template with default +x and y float parameters (in the inlet); +#X obj 62 97 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X text 93 282 use [set] to set any other parameters; +#X msg 92 235 symbol a-great-thing; +#X text 79 97 or just bang for [0 0( (or last coords); +#X connect 1 0 3 0; +#X connect 3 0 9 0; +#X connect 3 1 2 1; +#X connect 5 0 1 0; +#X connect 7 0 1 0; +#X connect 9 0 2 0; diff --git a/ds-abs/ds-create.pd b/ds-abs/ds-create.pd new file mode 100644 index 0000000..11d1d75 --- /dev/null +++ b/ds-abs/ds-create.pd @@ -0,0 +1,44 @@ +#N canvas 774 452 450 300 10; +#X obj 98 229 outlet; +#X obj 98 56 inlet; +#X obj 98 112 t a b; +#X obj 98 167 append \$2 x y; +#N canvas 0 22 251 214 ds-begin 0; +#X obj 48 65 list append traverse \$1; +#X obj 48 88 list trim; +#X obj 21 13 inlet; +#X obj 21 36 t b b; +#X obj 21 156 outlet; +#X obj 21 120 pointer; +#X connect 0 0 1 0; +#X connect 1 0 5 0; +#X connect 2 0 3 0; +#X connect 3 0 5 0; +#X connect 3 1 0 0; +#X connect 5 0 4 0; +#X restore 172 133 pd ds-begin; +#X obj 98 83 pack 0 0; +#X text 155 83 gives us default 0 0; +#X obj 98 195 t a a; +#X obj 165 235 s \$2-pointer; +#X obj 256 183 r \$2-get-pointer; +#X obj 164 205 pointer; +#X obj 256 206 b; +#X obj 310 75 loadbang; +#X obj 310 96 ds-first \$1 \$2; +#X obj 321 126 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X connect 1 0 5 0; +#X connect 2 0 3 0; +#X connect 2 1 4 0; +#X connect 3 0 7 0; +#X connect 4 0 3 2; +#X connect 5 0 2 0; +#X connect 7 0 0 0; +#X connect 7 1 10 0; +#X connect 9 0 11 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 10 0; +#X connect 14 0 13 0; diff --git a/ds-abs/ds-rset.pd b/ds-abs/ds-rset.pd new file mode 100644 index 0000000..d17f19a --- /dev/null +++ b/ds-abs/ds-rset.pd @@ -0,0 +1,16 @@ +#N canvas 987 44 385 232 10; +#X obj 80 154 set \$1 \$2; +#X obj 80 99 inlet; +#X obj 158 25 loadbang; +#X obj 185 158 iem_receive; +#X msg 185 133 set \$1; +#X obj 185 109 list-onearg \$3 \$1-pointer; +#X obj 158 51 t b b; +#X obj 158 76 s \$1-get-pointer; +#X connect 1 0 0 0; +#X connect 2 0 6 0; +#X connect 3 0 0 1; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 6 0 7 0; +#X connect 6 1 5 0; diff --git a/ds-abs/ds-rsetsize.pd b/ds-abs/ds-rsetsize.pd new file mode 100644 index 0000000..80c128b --- /dev/null +++ b/ds-abs/ds-rsetsize.pd @@ -0,0 +1,16 @@ +#N canvas 149 310 450 300 10; +#X obj 80 99 inlet; +#X obj 158 25 loadbang; +#X obj 185 158 iem_receive; +#X msg 185 133 set \$1; +#X obj 185 109 list-onearg \$3 \$1-pointer; +#X obj 80 154 setsize \$1 \$2; +#X obj 158 51 t b b; +#X obj 158 76 s \$1-get-pointer; +#X connect 0 0 5 0; +#X connect 1 0 6 0; +#X connect 2 0 5 1; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 6 0 7 0; +#X connect 6 1 4 0; |