From bc5c8ab25b60d6a549d0bba2ea0c2d8930cd501e Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Fri, 1 Aug 2008 19:12:40 +0000 Subject: latest batch of abs and helpfiles svn path=/trunk/abstractions/senderfruit/; revision=10228 --- core/btn.pd | 45 +++++++++++++++++ core/color.rgbset-help.pd | 19 +++++++ core/color.rgbset.pd | 18 +++---- core/countseq.pd | 103 ++++++++++++++++++++++++++++++++++++++ core/dynamic-gui-messages-help.pd | 10 ++++ core/ifspigot-help.pd | 11 ++++ core/ifspigot.pd | 18 +++++++ core/myifspigot-help.pd | 20 ++++++++ core/myifspigot.pd | 10 ++++ core/oscinify.pd | 8 +++ core/oscoutify.pd | 8 +++ core/rprint.pd | 4 ++ 12 files changed, 265 insertions(+), 9 deletions(-) create mode 100644 core/btn.pd create mode 100644 core/color.rgbset-help.pd create mode 100644 core/countseq.pd create mode 100644 core/dynamic-gui-messages-help.pd create mode 100644 core/ifspigot-help.pd create mode 100644 core/ifspigot.pd create mode 100644 core/myifspigot-help.pd create mode 100644 core/myifspigot.pd create mode 100644 core/oscinify.pd create mode 100644 core/oscoutify.pd create mode 100644 core/rprint.pd diff --git a/core/btn.pd b/core/btn.pd new file mode 100644 index 0000000..68d7797 --- /dev/null +++ b/core/btn.pd @@ -0,0 +1,45 @@ +#N canvas 361 196 433 465 10; +#X text -117 -87 at size 11 letters are 7px wide; +#X obj -50 348 hradio 15 1 0 4 \$0radio \$0radioR empty 0 -8 0 10 -262144 +-1 -1 3; +#X obj -49 349 cnv 13 118 13 empty \$0canvas boobies 3 6 0 11 -233017 +-66577 0; +#X text -118 -45 subtract difference add half to text xoffset; +#X text -117 -67 div result + 2 \, then add 1 extra radio; +#X obj -61 38 s2l-explode; +#X msg -61 -2 boobies; +#X obj -61 17 t a a; +#X obj 65 17 s \$0canvas; +#X obj -61 59 list-len; +#X obj -61 80 * 7; +#X obj -61 124 t a a; +#X obj -34 146 div 15; +#X obj -61 102 + 2; +#X obj -34 168 + 1; +#X msg 19 242 vis_size \$1 13; +#X obj 19 201 * 15; +#X obj 19 222 - 2; +#X obj 19 263 s \$0canvas; +#X obj -34 203 t a a; +#X obj -22 17 prepent label; +#X msg -34 291 number \$1; +#X obj -34 314 s \$0radioR; +#X floatatom 33 159 5 0 0 0 - - -; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 7 0 5 0; +#X connect 7 1 20 0; +#X connect 9 0 10 0; +#X connect 10 0 13 0; +#X connect 11 1 12 0; +#X connect 12 0 14 0; +#X connect 13 0 11 0; +#X connect 14 0 19 0; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 19 0 21 0; +#X connect 19 1 16 0; +#X connect 20 0 8 0; +#X connect 21 0 22 0; +#X connect 23 0 16 0; diff --git a/core/color.rgbset-help.pd b/core/color.rgbset-help.pd new file mode 100644 index 0000000..95cea80 --- /dev/null +++ b/core/color.rgbset-help.pd @@ -0,0 +1,19 @@ +#N canvas 0 22 483 336 10; +#X obj 59 101 color.rgbset; +#X msg 128 228; +#X msg 59 68 245 22 201; +#X text 57 50 Takes a triplet of 0-255 RGB values to set; +#X text 139 102 Orange bang re-outputs current values; +#X text 140 116 Radio-dial selects back \, front or label; +#X text 6 9 [color.rgbset] - Easily work with and set colors for GUI +objects; +#X obj 59 258 hradio 20 1 0 2 empty empty empty 0 -8 0 10 -262144 -1 +-1 0; +#X text 141 181 right outlet makes a "color # # #" message (connect +a message box to it) that you can cut and paste to dynamically set +your GUI colors; +#X text 58 284 Left outlet connects directly to GUI objects to change +their colors; +#X connect 0 0 7 0; +#X connect 0 1 1 0; +#X connect 2 0 0 0; diff --git a/core/color.rgbset.pd b/core/color.rgbset.pd index 480db7c..a93382f 100644 --- a/core/color.rgbset.pd +++ b/core/color.rgbset.pd @@ -1,5 +1,5 @@ #N canvas 185 89 559 602 10; -#X obj 30 183 cnv 15 18 15 empty \$0dispcol1 empty 20 12 0 14 -128992 +#X obj 30 173 cnv 15 18 15 empty \$0dispcol1 empty 20 12 0 14 -128992 -262144 0; #X obj 218 73 * -65536; #X obj 281 73 * -256; @@ -20,14 +20,14 @@ #X obj 225 337 t f b b; #X obj 279 473 pack f f f; #X obj 279 500 list prepend color; -#X obj 30 116 vsl 15 60 0 255 0 0 \$0red \$0redR empty 0 -8 0 8 -258049 +#X obj 30 106 vsl 15 60 0 255 0 0 \$0red \$0redR empty 0 -8 0 8 -258049 -1 -1 2938 1; -#X obj 50 116 vsl 15 60 0 255 0 0 \$0green \$0greenR empty 0 -8 0 8 +#X obj 50 106 vsl 15 60 0 255 0 0 \$0green \$0greenR empty 0 -8 0 8 -4033 -1 -1 2938 1; -#X obj 70 116 vsl 15 60 0 255 0 0 \$0blue \$0blueR empty 0 -8 0 8 -64 +#X obj 70 106 vsl 15 60 0 255 0 0 \$0blue \$0blueR empty 0 -8 0 8 -64 -1 -1 2938 1; #X obj 279 526 list trim; -#X obj 52 100 hradio 10 1 0 3 \$0layer \$0layerr back 0 -4 0 8 -1 -262144 +#X obj 52 90 hradio 10 1 0 3 \$0layer \$0layerr back 0 -4 0 8 -1 -262144 -1 0; #X obj 361 224 r \$0layer; #X obj 218 47 int; @@ -36,7 +36,7 @@ #X obj 218 21 r \$0red; #X obj 281 21 r \$0green; #X obj 351 21 r \$0blue; -#X obj 30 95 bng 15 250 50 0 \$0nullS \$0nullR empty 0 -6 0 8 -260033 +#X obj 30 85 bng 15 250 50 0 \$0nullS \$0nullR empty 0 -6 0 8 -260033 -1 -1; #X obj 35 288 r \$0layer; #X obj 35 313 sel 0 1 2; @@ -53,9 +53,9 @@ #X obj 295 442 s \$0dispcol2; #X msg 384 422 color \$1; #X obj 385 442 s \$0dispcol3; -#X obj 49 183 cnv 15 18 15 empty \$0dispcol2 empty 20 12 0 14 -1 -262144 +#X obj 49 173 cnv 15 18 15 empty \$0dispcol2 empty 20 12 0 14 -1 -262144 0; -#X obj 68 183 cnv 15 18 15 empty \$0dispcol3 empty 20 12 0 14 -1 -262144 +#X obj 68 173 cnv 15 18 15 empty \$0dispcol3 empty 20 12 0 14 -1 -262144 0; #X obj 421 500 list prepend set; #X obj 421 526 list trim; @@ -153,4 +153,4 @@ #X connect 55 0 20 0; #X connect 55 1 21 0; #X connect 55 2 22 0; -#X coords 0 -1 1 1 56 120 1 30 80; +#X coords 0 -1 1 1 56 109 2 30 80; diff --git a/core/countseq.pd b/core/countseq.pd new file mode 100644 index 0000000..28dc23a --- /dev/null +++ b/core/countseq.pd @@ -0,0 +1,103 @@ +#N canvas 974 303 373 390 10; +#X obj 26 159 f; +#X obj 81 83 sel restart; +#X msg 81 108 0; +#X obj 112 108 t b; +#X obj 28 10 inlet; +#X obj 163 40 inlet; +#X obj 130 159 mod \$1; +#X obj 232 147 dollarg; +#X obj 232 124 loadbang; +#X obj 232 171 list split 1; +#X obj 88 285 list-find; +#N canvas 712 115 568 364 split-symbols 0; +#X obj 160 159 route symbol float; +#X obj 84 159 list-filter; +#X obj 84 53 inlet; +#X obj 84 77 t a a; +#X msg 160 182 0; +#X msg 265 184 0; +#X msg 212 183 1; +#X obj 383 158 route symbol float; +#X obj 307 158 list-filter; +#X msg 488 183 0; +#X msg 383 181 1; +#X msg 435 182 0; +#X obj 307 288 outlet; +#X obj 84 249 outlet; +#X obj 307 252 list-map; +#X obj 384 233 s2l-explode; +#X obj 384 253 list split 1; +#X obj 418 274 list-l2s; +#X obj 418 295 atoi; +#X text 349 312 remove leading "accent" identifier; +#X connect 0 0 4 0; +#X connect 0 1 6 0; +#X connect 0 2 5 0; +#X connect 1 0 13 0; +#X connect 1 1 0 0; +#X connect 2 0 3 0; +#X connect 3 0 1 0; +#X connect 3 1 8 0; +#X connect 4 0 1 1; +#X connect 5 0 1 1; +#X connect 6 0 1 1; +#X connect 7 0 10 0; +#X connect 7 1 11 0; +#X connect 7 2 9 0; +#X connect 8 0 14 0; +#X connect 8 1 7 0; +#X connect 9 0 8 1; +#X connect 10 0 8 1; +#X connect 11 0 8 1; +#X connect 14 0 12 0; +#X connect 14 1 15 0; +#X connect 15 0 16 0; +#X connect 16 1 17 0; +#X connect 17 0 18 0; +#X connect 18 0 14 1; +#X restore 208 199 pd split-symbols; +#X obj 159 285 list-find; +#X obj 26 194 t a a a; +#X obj 26 312 sel 0; +#X obj 26 354 outlet; +#X obj 88 354 outlet; +#X obj 159 354 outlet; +#X obj 208 40 inlet; +#X obj 58 159 + 1; +#X obj 282 331 + 1; +#X obj 282 354 outlet; +#X obj 210 255 list-apply - 1; +#X obj 139 228 list-apply - 1; +#X obj 80 63 list; +#X obj 28 32 route bang seek; +#X connect 0 0 13 0; +#X connect 0 0 19 0; +#X connect 0 0 20 0; +#X connect 1 0 2 0; +#X connect 1 1 3 0; +#X connect 2 0 0 1; +#X connect 3 0 0 0; +#X connect 4 0 25 0; +#X connect 5 0 6 1; +#X connect 6 0 0 1; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 9 1 11 0; +#X connect 10 0 16 0; +#X connect 11 0 23 0; +#X connect 11 1 22 0; +#X connect 12 0 17 0; +#X connect 13 0 14 0; +#X connect 13 1 10 0; +#X connect 13 2 12 0; +#X connect 14 0 15 0; +#X connect 18 0 11 0; +#X connect 19 0 6 0; +#X connect 20 0 21 0; +#X connect 22 0 12 1; +#X connect 23 0 10 1; +#X connect 24 0 1 0; +#X connect 25 0 0 0; +#X connect 25 1 0 1; +#X connect 25 2 24 0; diff --git a/core/dynamic-gui-messages-help.pd b/core/dynamic-gui-messages-help.pd new file mode 100644 index 0000000..cf494f9 --- /dev/null +++ b/core/dynamic-gui-messages-help.pd @@ -0,0 +1,10 @@ +#N canvas 986 26 450 300 10; +#X msg 39 77 obj 10 10 vsl width height bottom top log/lin init send +receive label l-offsetX l-offsetY font fontsize bgcolor frontcolor +labelcolor init-to jumponclick \;; +#X msg 39 127 obj 10 10 vradio size 1(?) init number send receive label +l-offsetX l-offsetY font fontsize bgcolor frontcolor labelcolor init-to +\;; +#X msg 39 27 obj 10 10 tgl size init send receive label l-offsetX l-offsetY +font fontsize bgcolor frontcolor labelcolor init-to non-zero-value +\;; diff --git a/core/ifspigot-help.pd b/core/ifspigot-help.pd new file mode 100644 index 0000000..e9b1209 --- /dev/null +++ b/core/ifspigot-help.pd @@ -0,0 +1,11 @@ +#N canvas 630 151 498 250 10; +#X obj 26 74 ifspigot \$0test; +#X text 10 12 [ifspigot] - receiver-conditional spigot; +#X text 124 74 if test is 1 \, spigot is on \, else spigot is off; +#X obj 26 114 ifspigot \$0test false; +#X text 160 114 if test is 0 \, spigot is on \, else spigot is off +; +#X obj 26 157 ifspigot \$0test true 1; +#X text 167 152 last argument lets you set default state of internal +spigot \; with no argument \, it is 0; +#X text 369 224 2008 Luke Iannini; diff --git a/core/ifspigot.pd b/core/ifspigot.pd new file mode 100644 index 0000000..6dd3195 --- /dev/null +++ b/core/ifspigot.pd @@ -0,0 +1,18 @@ +#N canvas 0 22 293 288 10; +#X obj 29 37 inlet; +#X obj 29 243 outlet; +#X obj 80 88 r \$1; +#X obj 80 125 == 1; +#X obj 152 38 loadbang; +#X obj 152 59 list append \$2; +#X msg 152 108 0; +#X obj 152 84 sel false; +#X obj 29 156 spigot \$3; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 3 0 8 1; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 3 1; +#X connect 7 0 6 0; +#X connect 8 0 1 0; diff --git a/core/myifspigot-help.pd b/core/myifspigot-help.pd new file mode 100644 index 0000000..3d5882b --- /dev/null +++ b/core/myifspigot-help.pd @@ -0,0 +1,20 @@ +#N canvas 0 22 450 300 10; +#X text 35 28 [myifspigot] - choose your own comparison operator; +#X text 36 52 if "receiver" (\$1) is "==/>=//whatever" (\$2) than +\$3 then spigot is on. \$4 sets initial state of spigot.; +#X obj 76 165 myifspigot \$0test > 3; +#X obj 76 88 loadbang; +#X obj 76 114 metro 250; +#X obj 76 214 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 266 169 hradio 15 1 0 8 empty empty empty 0 -8 0 10 -262144 +-1 -1 0; +#X obj 266 209 s \$0test; +#X text 296 275 2008 Luke Iannini; +#X text 229 152 Set higher than 3 to turn on spigot; +#X floatatom 276 189 5 0 0 0 - - -; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; diff --git a/core/myifspigot.pd b/core/myifspigot.pd new file mode 100644 index 0000000..3bfdb06 --- /dev/null +++ b/core/myifspigot.pd @@ -0,0 +1,10 @@ +#N canvas 248 356 164 276 10; +#X obj 29 37 inlet; +#X obj 29 243 outlet; +#X obj 80 92 r \$1; +#X obj 29 156 spigot \$4; +#X obj 80 125 \$2 \$3; +#X connect 0 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 1 0; +#X connect 4 0 3 1; diff --git a/core/oscinify.pd b/core/oscinify.pd new file mode 100644 index 0000000..0976372 --- /dev/null +++ b/core/oscinify.pd @@ -0,0 +1,8 @@ +#N canvas 594 98 149 115 10; +#X obj 21 74 s PDOSC; +#X obj 21 21 r \$2; +#X obj 21 45 list prepend \$1; +#X obj 21 0 inlet; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X connect 3 0 0 0; diff --git a/core/oscoutify.pd b/core/oscoutify.pd new file mode 100644 index 0000000..ad53ca8 --- /dev/null +++ b/core/oscoutify.pd @@ -0,0 +1,8 @@ +#N canvas 594 98 149 115 10; +#X obj 21 84 s PDOSC; +#X obj 21 31 r \$2; +#X obj 21 55 list prepend \$1; +#X obj 21 0 inlet; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X connect 3 0 2 0; diff --git a/core/rprint.pd b/core/rprint.pd new file mode 100644 index 0000000..c7a56fb --- /dev/null +++ b/core/rprint.pd @@ -0,0 +1,4 @@ +#N canvas 674 156 132 106 10; +#X obj 26 24 r \$1; +#X obj 26 56 print \$1; +#X connect 0 0 1 0; -- cgit v1.2.1