aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--core/clearconsole.pd17
-rw-r--r--core/cursormon.pd18
-rw-r--r--core/ds-raise-help.pd7
-rw-r--r--core/ds-raise.pd11
-rw-r--r--core/hotpack-help.pd27
-rw-r--r--core/if-help.pd37
-rw-r--r--core/if.pd29
-rw-r--r--core/instance-help.pd30
-rw-r--r--core/keynamedown-help.pd9
-rw-r--r--core/pausetimer.pd71
-rw-r--r--core/trimdirs-help.pd24
-rw-r--r--core/trimdirs.pd40
-rw-r--r--core/vmetro-help.pd23
13 files changed, 284 insertions, 59 deletions
diff --git a/core/clearconsole.pd b/core/clearconsole.pd
deleted file mode 100644
index 90b4184..0000000
--- a/core/clearconsole.pd
+++ /dev/null
@@ -1,17 +0,0 @@
-#N canvas 765 341 576 286 10;
-#X obj 150 100 cnv 19 19 19 empty empty empty 20 12 0 14 -115257 -66577
-0;
-#X obj 66 168 print;
-#X msg 66 81 30;
-#X obj 66 110 until;
-#X obj 66 44 loadbang;
-#X obj 152 102 bng 15 250 50 0 \$0 \$0r empty 0 -6 0 8 -259744 -154956
--1;
-#X msg 66 139 ....................((&&&&&&&&&&&&&))......................
-;
-#X connect 2 0 3 0;
-#X connect 3 0 6 0;
-#X connect 4 0 2 0;
-#X connect 5 0 2 0;
-#X connect 6 0 1 0;
-#X coords 0 -1 1 1 19 19 2 150 100;
diff --git a/core/cursormon.pd b/core/cursormon.pd
deleted file mode 100644
index a90591d..0000000
--- a/core/cursormon.pd
+++ /dev/null
@@ -1,18 +0,0 @@
-#N canvas 854 281 450 300 10;
-#X obj 107 91 route motion;
-#X msg 65 40 capture 1;
-#X obj 65 17 loadbang;
-#X floatatom 102 202 5 0 0 0 - - -;
-#X obj 107 118 unpack f f f;
-#X floatatom 141 202 5 0 0 0 - - -;
-#X floatatom 181 202 5 0 0 0 - - -;
-#X text 221 13 make a cursor icon for the GOP;
-#X obj 65 62 tot .parent;
-#X connect 0 0 4 0;
-#X connect 1 0 8 0;
-#X connect 2 0 1 0;
-#X connect 4 0 3 0;
-#X connect 4 1 5 0;
-#X connect 4 2 6 0;
-#X connect 8 2 0 0;
-#X coords 0 -1 1 1 115 20 2 100 200;
diff --git a/core/ds-raise-help.pd b/core/ds-raise-help.pd
new file mode 100644
index 0000000..224b183
--- /dev/null
+++ b/core/ds-raise-help.pd
@@ -0,0 +1,7 @@
+#N canvas 796 410 318 141 10;
+#X obj 23 104 ds-raise pd-myData myTemplate;
+#X text 7 4 [ds-raise] - hack to bring the first template in a datastructure
+to the top;
+#X obj 23 83 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X connect 2 0 0 0;
diff --git a/core/ds-raise.pd b/core/ds-raise.pd
new file mode 100644
index 0000000..c51b952
--- /dev/null
+++ b/core/ds-raise.pd
@@ -0,0 +1,11 @@
+#N canvas 814 246 126 152 10;
+#X obj 12 58 t p p;
+#X obj 12 34 ds-first \$1 \$2;
+#X obj 12 82 get \$2 x;
+#X obj 12 107 set \$2 x;
+#X obj 12 10 inlet;
+#X connect 0 0 2 0;
+#X connect 0 1 3 1;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 4 0 1 0;
diff --git a/core/hotpack-help.pd b/core/hotpack-help.pd
new file mode 100644
index 0000000..6cc3b1c
--- /dev/null
+++ b/core/hotpack-help.pd
@@ -0,0 +1,27 @@
+#N canvas 727 260 394 293 10;
+#X text 9 8 [hotpack] works just like [pack] \, except that it all
+of its inlets are "hot". Inlets will remember whatever they were last
+sent.;
+#X msg 29 90 vegetables;
+#X msg 109 90 with;
+#X msg 149 90 cheese;
+#X msg 39 120 if;
+#X msg 111 120 you;
+#X msg 151 120 please;
+#X obj 29 215 prepent set;
+#X obj 29 180 hotpack s s s;
+#X obj 66 156 symbol;
+#X obj 104 156 symbol;
+#X text 268 241 2008 Luke Iannini;
+#X text 267 255 proyekto.net;
+#X msg 29 252;
+#X connect 1 0 8 0;
+#X connect 2 0 9 0;
+#X connect 3 0 10 0;
+#X connect 4 0 8 0;
+#X connect 5 0 9 0;
+#X connect 6 0 10 0;
+#X connect 7 0 13 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 1;
+#X connect 10 0 8 2;
diff --git a/core/if-help.pd b/core/if-help.pd
new file mode 100644
index 0000000..0fdd366
--- /dev/null
+++ b/core/if-help.pd
@@ -0,0 +1,37 @@
+#N canvas 623 253 399 403 10;
+#X text 19 20 [if f x] - if f(x) is true \, output from left outlet
+\, else output from right outlet.;
+#X text 19 60 ...where ["f"] is an object that outputs 0 or 1 (like
+[<] or [==]) \, and x is an argument for f.;
+#X text 19 99 Example: to recreate [moses]:;
+#X obj 20 152 if < 5;
+#X floatatom 20 122 5 0 0 0 - - -;
+#X floatatom 20 192 5 0 0 0 - - -;
+#X floatatom 53 192 5 0 0 0 - - -;
+#X obj 20 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 53 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X text 17 240 Or route (for floats only):;
+#X floatatom 20 342 5 0 0 0 - - -;
+#X floatatom 65 342 5 0 0 0 - - -;
+#X obj 20 366 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 65 366 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 20 302 if == 11;
+#X msg 20 264 11;
+#X msg 51 264 12;
+#X text 254 370 2008 Luke Iannini;
+#X text 254 385 proyekto.net;
+#X connect 3 0 5 0;
+#X connect 3 1 6 0;
+#X connect 4 0 3 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 10 0 12 0;
+#X connect 11 0 13 0;
+#X connect 14 0 10 0;
+#X connect 14 1 11 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 0;
diff --git a/core/if.pd b/core/if.pd
new file mode 100644
index 0000000..2ab54b1
--- /dev/null
+++ b/core/if.pd
@@ -0,0 +1,29 @@
+#N canvas 542 305 149 282 10;
+#X obj 71 23 \$1 \$2;
+#X obj 98 -41 inlet;
+#X obj 24 -41 inlet;
+#X obj 24 186 outlet;
+#X obj 71 186 outlet;
+#X obj 24 154 spigot;
+#X obj 71 154 spigot;
+#X obj 71 105 unpack;
+#X obj 71 48 sel 0;
+#X obj 24 -11 t a a;
+#X obj 24 124 t a a;
+#X msg 71 80 0 1;
+#X msg 98 80 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 0 1;
+#X connect 2 0 9 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 5 1;
+#X connect 7 1 6 1;
+#X connect 8 0 11 0;
+#X connect 8 1 12 0;
+#X connect 9 0 10 0;
+#X connect 9 1 0 0;
+#X connect 10 0 5 0;
+#X connect 10 1 6 0;
+#X connect 11 0 7 0;
+#X connect 12 0 7 0;
diff --git a/core/instance-help.pd b/core/instance-help.pd
new file mode 100644
index 0000000..8333a17
--- /dev/null
+++ b/core/instance-help.pd
@@ -0,0 +1,30 @@
+#N canvas 688 443 594 298 10;
+#X obj 9 96 instance Higgins;
+#X floatatom 9 122 5 0 0 0 - - -;
+#X obj 9 146 instance Higgins;
+#X floatatom 9 172 5 0 0 0 - - -;
+#X obj 9 196 instance Higgins;
+#X floatatom 9 222 5 0 0 0 - - -;
+#X obj 9 246 instance Higgins;
+#X floatatom 9 272 5 0 0 0 - - -;
+#X obj 180 120 v HigginsInst;
+#X obj 180 94 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 180 145 5 0 0 0 - - -;
+#X text 13 11 [instance] keeps track of how many times it has been
+created with the same name. If you have [closebang] \, it will also
+detect when an instance is deleted.;
+#X text 226 140 create a [v <Name>Inst] to find out how many <Name>
+instances currently exist.;
+#X text 373 255 2008 Luke Iannini;
+#X text 373 271 proyekto.net;
+#X text 168 186 Put [instance] inside of your abstractions to assign
+each one a unique number. They will number themselves according to
+their creation order (you can copy and paste abstractions to manipulate
+this \, if desired).;
+#X connect 0 0 1 0;
+#X connect 2 0 3 0;
+#X connect 4 0 5 0;
+#X connect 6 0 7 0;
+#X connect 8 0 10 0;
+#X connect 9 0 8 0;
diff --git a/core/keynamedown-help.pd b/core/keynamedown-help.pd
new file mode 100644
index 0000000..f291038
--- /dev/null
+++ b/core/keynamedown-help.pd
@@ -0,0 +1,9 @@
+#N canvas 889 330 358 158 10;
+#X text 11 17 [keynamedown] outputs the [keyname] pressed only on the
+press \, not the release.;
+#X obj 36 111 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 36 85 keynamedown a;
+#X text 181 122 2008 Luke Iannini;
+#X text 180 137 proyekto.net;
+#X connect 2 0 1 0;
diff --git a/core/pausetimer.pd b/core/pausetimer.pd
new file mode 100644
index 0000000..1c2a986
--- /dev/null
+++ b/core/pausetimer.pd
@@ -0,0 +1,71 @@
+#N canvas 424 138 374 392 10;
+#X obj -1 23 inlet;
+#X obj 217 230 timer;
+#X obj 217 287 f;
+#X obj 245 287 +;
+#X obj 217 254 t b a;
+#X obj 245 312 s \$0pausedTime;
+#X msg 296 254 0;
+#X obj 70 298 r \$0pausedTime;
+#X obj 55 323 -;
+#X obj 55 233 timer;
+#X obj 217 174 r \$0pause;
+#X obj 244 200 r \$0getPauseLength;
+#X obj 55 275 f;
+#X obj 69 174 f;
+#X obj 69 196 sel 1 0;
+#X obj -1 57 route reset pause resume;
+#X obj -1 178 s \$0reset;
+#X obj 296 231 r \$0reset;
+#X msg 182 141 0;
+#X msg 98 174 1;
+#X obj 220 118 s \$0getPauseLength;
+#X obj 55 369 outlet;
+#X obj 46 88 once;
+#X obj 163 88 once;
+#X obj 163 108 t b b b;
+#X obj 46 108 t b b b;
+#X obj 96 118 s \$0pause;
+#X obj 94 139 route bang;
+#X obj 55 347 +;
+#X obj 121 341 r \$0reset;
+#X msg 88 342 0;
+#X connect 0 0 15 0;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 2 1;
+#X connect 3 0 5 0;
+#X connect 4 0 2 0;
+#X connect 4 1 3 1;
+#X connect 6 0 2 1;
+#X connect 6 0 5 0;
+#X connect 7 0 8 1;
+#X connect 8 0 28 0;
+#X connect 9 0 12 0;
+#X connect 10 0 1 0;
+#X connect 11 0 1 1;
+#X connect 12 0 8 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 1 9 1;
+#X connect 15 0 9 0;
+#X connect 15 0 16 0;
+#X connect 15 1 22 0;
+#X connect 15 2 23 0;
+#X connect 15 3 27 0;
+#X connect 17 0 6 0;
+#X connect 18 0 13 1;
+#X connect 19 0 13 1;
+#X connect 22 0 25 0;
+#X connect 23 0 24 0;
+#X connect 24 0 22 1;
+#X connect 24 1 18 0;
+#X connect 24 2 20 0;
+#X connect 25 0 23 1;
+#X connect 25 1 19 0;
+#X connect 25 2 26 0;
+#X connect 27 0 13 0;
+#X connect 27 1 28 1;
+#X connect 28 0 21 0;
+#X connect 29 0 30 0;
+#X connect 30 0 28 1;
diff --git a/core/trimdirs-help.pd b/core/trimdirs-help.pd
new file mode 100644
index 0000000..7fa1027
--- /dev/null
+++ b/core/trimdirs-help.pd
@@ -0,0 +1,24 @@
+#N canvas 0 22 496 364 10;
+#X msg 91 47 /Users/Me/Pd/Synths;
+#X obj 91 163 prepent set;
+#X obj 171 163 prepent set;
+#X text 26 251 Trims the last [n] directories from the end of a path.
+;
+#X text 27 265 With [trimdirs 1] \, /Users/Me/Pd/Synths becomes /Users/Me/Pd
+;
+#X text 26 279 Handles spaces just fine.;
+#X text 351 309 Luke Iannini 2008;
+#X text 351 321 proyekto.net;
+#X text 26 293 No/0 argument passes input through unchanged;
+#X obj 91 130 trimdirs 1;
+#X obj 171 130 trimdirs 2;
+#X obj 136 91 symbol;
+#X msg 171 195;
+#X msg 91 195;
+#X connect 0 0 11 0;
+#X connect 1 0 13 0;
+#X connect 2 0 12 0;
+#X connect 9 0 1 0;
+#X connect 10 0 2 0;
+#X connect 11 0 9 0;
+#X connect 11 0 10 0;
diff --git a/core/trimdirs.pd b/core/trimdirs.pd
index 4a9c804..28028cd 100644
--- a/core/trimdirs.pd
+++ b/core/trimdirs.pd
@@ -1,4 +1,4 @@
-#N canvas 694 125 474 478 10;
+#N canvas 694 125 471 382 10;
#X obj 185 137 symbol2list /;
#X obj 185 176 list-splat -1;
#X obj 156 282 list2symbol /;
@@ -16,13 +16,6 @@
#X obj 344 109 * -1;
#X obj 402 21 inlet;
#X obj 185 20 inlet;
-#X text 32 376 Trims the last [n] directories from the end of a path.
-;
-#X text 33 390 With [trimdirs 1] \, /Users/Me/Pd/Synths becomes /Users/Me/Pd
-;
-#X text 32 404 Handles spaces just fine.;
-#X text 357 434 Luke Iannini 2008;
-#X text 357 446 proyekto.net;
#X obj 156 343 outlet;
#X obj 344 137 sel 0;
#X obj 185 87 demultiplex;
@@ -32,10 +25,9 @@
#X obj 185 110 s \$0passthrough;
#X obj 170 314 r \$0passthrough;
#X obj 344 82 abs;
-#X text 32 418 No/0 argument passes input through unchanged;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
-#X connect 2 0 22 0;
+#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 1 11 1;
#X connect 4 0 5 0;
@@ -46,18 +38,18 @@
#X connect 9 0 6 1;
#X connect 10 0 9 0;
#X connect 11 0 2 0;
-#X connect 12 0 30 0;
+#X connect 12 0 25 0;
#X connect 13 0 12 0;
-#X connect 14 0 23 0;
-#X connect 15 0 30 0;
-#X connect 16 0 24 0;
-#X connect 23 0 27 0;
-#X connect 23 1 25 0;
-#X connect 24 0 28 0;
-#X connect 24 1 0 0;
-#X connect 25 0 1 1;
-#X connect 25 1 26 0;
-#X connect 26 0 24 1;
-#X connect 27 0 24 1;
-#X connect 29 0 22 0;
-#X connect 30 0 14 0;
+#X connect 14 0 18 0;
+#X connect 15 0 25 0;
+#X connect 16 0 19 0;
+#X connect 18 0 22 0;
+#X connect 18 1 20 0;
+#X connect 19 0 23 0;
+#X connect 19 1 0 0;
+#X connect 20 0 1 1;
+#X connect 20 1 21 0;
+#X connect 21 0 19 1;
+#X connect 22 0 19 1;
+#X connect 24 0 17 0;
+#X connect 25 0 14 0;
diff --git a/core/vmetro-help.pd b/core/vmetro-help.pd
new file mode 100644
index 0000000..3190883
--- /dev/null
+++ b/core/vmetro-help.pd
@@ -0,0 +1,23 @@
+#N canvas 803 193 370 290 10;
+#X obj 71 115 vmetro;
+#X obj 71 74 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
+;
+#X floatatom 122 48 5 0 0 0 - - -;
+#X obj 122 69 / 100;
+#X floatatom 122 91 5 0 0 0 - - -;
+#X text 15 5 [vmetro] works just like [metro] \, except that it can
+take fractional values to go faster than 1 millisecond.;
+#X text 15 215 original idea by IOhannes M Zmoelnig \, I think.;
+#X obj 71 137 t b b;
+#X obj 71 160 timer;
+#X floatatom 71 183 5 0 0 0 - - -;
+#X text 253 244 2008 Luke Iannini;
+#X text 254 259 proyekto.net;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 1;
+#X connect 7 0 8 0;
+#X connect 7 1 8 1;
+#X connect 8 0 9 0;