aboutsummaryrefslogtreecommitdiff
path: root/core
diff options
context:
space:
mode:
Diffstat (limited to 'core')
-rw-r--r--core/ds-dump-array.pd17
-rw-r--r--core/ds-get-list.pd67
-rw-r--r--core/guilink-help.pd15
-rw-r--r--core/guilink.pd9
4 files changed, 108 insertions, 0 deletions
diff --git a/core/ds-dump-array.pd b/core/ds-dump-array.pd
new file mode 100644
index 0000000..3920336
--- /dev/null
+++ b/core/ds-dump-array.pd
@@ -0,0 +1,17 @@
+#N canvas 1004 477 263 225 10;
+#X obj 81 29 inlet;
+#X obj 81 78 getsize \$1 \$2;
+#X obj 81 50 t p p;
+#X obj 81 156 element \$1 \$2;
+#X obj 81 185 outlet;
+#X obj 81 106 list-range;
+#X obj 81 131 list-drip;
+#X obj 132 185 outlet;
+#X connect 0 0 2 0;
+#X connect 1 0 5 0;
+#X connect 2 0 1 0;
+#X connect 2 1 3 1;
+#X connect 3 0 4 0;
+#X connect 5 0 6 0;
+#X connect 6 0 3 0;
+#X connect 6 1 7 0;
diff --git a/core/ds-get-list.pd b/core/ds-get-list.pd
new file mode 100644
index 0000000..8048067
--- /dev/null
+++ b/core/ds-get-list.pd
@@ -0,0 +1,67 @@
+#N canvas 539 101 566 566 10;
+#N canvas 936 317 494 366 builder 1;
+#X obj 182 56 dollarg;
+#X obj 182 30 initbang;
+#X obj 209 277 s \$0self;
+#N canvas 381 63 155 275 makepack 0;
+#X obj 11 26 inlet;
+#X obj 32 99 until;
+#X obj 32 155 list-extend;
+#X msg 95 100 pack;
+#X msg 32 127 f;
+#X obj 11 182 list;
+#X obj 11 73 t b a b;
+#X obj 11 208 list prepend obj 10 200;
+#X obj 11 238 list trim;
+#X obj 11 269 outlet;
+#X connect 0 0 6 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 1;
+#X connect 3 0 2 1;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 5 0;
+#X connect 6 1 1 0;
+#X connect 6 2 3 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X restore 131 164 pd makepack;
+#X msg 221 114 obj 10 10 inlet;
+#X msg 111 185 obj 10 300 outlet;
+#X obj 126 104 - 1;
+#X text 304 73 first arg is template;
+#X obj 126 82 f;
+#X obj 92 141 t a b a;
+#X obj 182 82 t b a b;
+#X msg -10 168 connect 2 0 3 0;
+#X obj 34 200 list-range;
+#X obj 34 221 list-drip;
+#X msg 34 252 connect 3 \$1 4 \$1;
+#X msg -6 282 connect 4 0 5 0;
+#X obj 202 158 list trim;
+#X obj 202 135 list prepend obj 10 100 get;
+#X connect 0 0 10 0;
+#X connect 0 1 8 1;
+#X connect 1 0 0 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 0;
+#X connect 5 0 2 0;
+#X connect 6 0 9 0;
+#X connect 8 0 6 0;
+#X connect 9 0 12 0;
+#X connect 9 0 11 0;
+#X connect 9 0 15 0;
+#X connect 9 1 5 0;
+#X connect 9 2 3 0;
+#X connect 10 0 8 0;
+#X connect 10 1 17 0;
+#X connect 10 2 4 0;
+#X connect 11 0 2 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 16 0;
+#X restore 311 39 pd builder;
+#X obj 310 16 namecanvas \$0self;
diff --git a/core/guilink-help.pd b/core/guilink-help.pd
new file mode 100644
index 0000000..2d16905
--- /dev/null
+++ b/core/guilink-help.pd
@@ -0,0 +1,15 @@
+#N canvas 36 238 450 300 10;
+#X obj 54 95 guilink \$0 frequency;
+#X obj 241 61 vsl 15 128 1 20000 1 0 \$0frequency \$0frequencyR empty
+0 -9 0 10 -203904 -1 -1 0 1;
+#X obj 269 114 nbx 5 14 1 20000 1 0 \$0frequencyD \$0frequencyDR empty
+0 -8 0 10 -203904 -1 -1 1 256;
+#X text 18 9 guilink: link two gui elements so that they reflect each
+other's settings;
+#X obj 71 146 r \$0parameter;
+#X floatatom 71 177 6 0 0 0 - - -;
+#X text 14 217 Uses a uniform naming scheme. The "master" control is
+uses \$0parameter as its sendname and \$0parameterR as its receivename.
+The "slave" control uses \$0parameterD (for Display) as its sendname
+and \$0paramterDR for its receivename;
+#X connect 4 0 5 0;
diff --git a/core/guilink.pd b/core/guilink.pd
new file mode 100644
index 0000000..11e3f8d
--- /dev/null
+++ b/core/guilink.pd
@@ -0,0 +1,9 @@
+#N canvas 469 180 164 138 10;
+#X obj 23 21 r \$1\$2;
+#X obj 23 101 s \$1\$2R;
+#X obj 93 21 r \$1\$2D;
+#X obj 91 101 s \$1\$2DR;
+#X msg 23 53 set \$1;
+#X connect 0 0 4 0;
+#X connect 2 0 1 0;
+#X connect 4 0 3 0;