diff options
| -rw-r--r-- | print.pd | 53 | ||||
| -rw-r--r-- | print_long.pd | 84 |
2 files changed, 122 insertions, 15 deletions
@@ -1,7 +1,7 @@ -#N canvas 546 406 371 345 10; +#N canvas 388 179 439 354 10; #X obj 169 48 inlet; #X obj 226 266 send \$0-pddp_print; -#X obj 226 138 zexy/list2symbol; +#X obj 226 140 zexy/list2symbol; #X text 239 225 reset to blank; #X obj 169 90 route bang; #N canvas 673 22 458 308 reset 0; @@ -26,7 +26,7 @@ #X msg 129 169 bang; #X obj 85 0 cnv 15 15 20 empty empty empty 2 7 0 14 -262144 -262144 0; -#X obj 1 3 cnv 15 98 15 empty \$0-pddp_print empty 2 7 0 14 -262144 +#X obj 1 3 cnv 15 98 15 empty \$0-pddp_print (gpointer) 2 7 0 14 -262144 -1 0; #X obj 226 170 list prepend label; #X obj 226 194 list trim; @@ -48,15 +48,58 @@ #X connect 6 0 4 0; #X restore 27 223 pd flash on input; #X msg 75 190 bang; +#N canvas 365 22 342 273 convert_pointer_to_anything 0; +#X obj 169 102 symbol; +#X obj 169 224 t a; +#X obj 104 177 spigot; +#X obj 137 147 0; +#X obj 232 169 b; +#X obj 232 192 1; +#X obj 104 8 inlet; +#X obj 104 246 outlet; +#X obj 104 35 t a a; +#X obj 169 58 list append foo; +#X obj 169 124 sel if(pointer); +#X msg 169 80 if\$1; +#X text 204 76 (hack to get pointer; +#X text 220 88 to substitute); +#X text 8 38 enormous; +#X text 14 60 hack; +#X text 15 84 to; +#X text 11 104 keep; +#X text 16 125 pointer; +#X text 14 144 from; +#X text 12 203 and crashing; +#X text 13 222 pd; +#X text 10 162 passing thru; +#X text 13 184 [route] and; +#X msg 169 146 (pointer); +#X connect 0 0 10 0; +#X connect 1 0 7 0; +#X connect 2 0 7 0; +#X connect 3 0 2 1; +#X connect 4 0 5 0; +#X connect 5 0 2 1; +#X connect 6 0 8 0; +#X connect 8 0 2 0; +#X connect 8 1 9 0; +#X connect 9 0 11 0; +#X connect 10 0 24 0; +#X connect 10 0 3 0; +#X connect 10 1 4 0; +#X connect 11 0 0 0; +#X connect 24 0 1 0; +#X restore 226 116 pd convert_pointer_to_anything; #X connect 0 0 4 0; -#X connect 0 0 11 0; #X connect 2 0 9 0; #X connect 4 0 5 0; -#X connect 4 1 2 0; +#X connect 4 1 11 0; +#X connect 4 1 13 0; #X connect 5 0 1 0; #X connect 6 0 5 0; #X connect 9 0 10 0; #X connect 10 0 1 0; #X connect 11 0 1 0; #X connect 12 0 11 0; +#X connect 13 0 2 0; #X coords 0 -1 1 1 100 20 1 0 0; diff --git a/print_long.pd b/print_long.pd index 42a063e..5693d25 100644 --- a/print_long.pd +++ b/print_long.pd @@ -1,12 +1,12 @@ -#N canvas 590 245 337 330 10; +#N canvas 590 245 429 345 10; #X obj 1 3 cnv 12 198 12 empty \$0-pddp_print empty 2 6 1 14 -262144 -33289 0; -#X obj 59 48 inlet; -#X obj 117 246 send \$0-pddp_print; -#X obj 116 138 zexy/list2symbol; -#X text 128 203 reset to blank; -#X obj 116 170 flatspace/prepend label; -#X obj 59 90 route bang; +#X obj 169 48 inlet; +#X obj 227 246 send \$0-pddp_print; +#X obj 226 138 zexy/list2symbol; +#X text 238 203 reset to blank; +#X obj 226 170 flatspace/prepend label; +#X obj 169 90 route bang; #N canvas 673 22 458 308 reset 0; #X obj 72 21 inlet; #X obj 69 264 outlet; @@ -25,13 +25,77 @@ #X connect 5 2 2 0; #X connect 6 0 4 0; #X connect 7 0 1 0; -#X restore 59 202 pd reset; -#X msg 19 169 bang; +#X restore 169 202 pd reset; +#X msg 129 169 bang; +#N canvas 365 22 342 273 convert_pointer_to_anything 0; +#X obj 169 102 symbol; +#X obj 169 224 t a; +#X obj 104 177 spigot; +#X obj 137 147 0; +#X obj 232 169 b; +#X obj 232 192 1; +#X obj 104 8 inlet; +#X obj 104 246 outlet; +#X obj 104 35 t a a; +#X obj 169 58 list append foo; +#X obj 169 124 sel if(pointer); +#X msg 169 80 if\$1; +#X text 204 76 (hack to get pointer; +#X text 220 88 to substitute); +#X text 8 38 enormous; +#X text 14 60 hack; +#X text 15 84 to; +#X text 11 104 keep; +#X text 16 125 pointer; +#X text 14 144 from; +#X text 12 203 and crashing; +#X text 13 222 pd; +#X text 10 162 passing thru; +#X text 13 184 [route] and; +#X msg 169 146 (pointer); +#X connect 0 0 10 0; +#X connect 1 0 7 0; +#X connect 2 0 7 0; +#X connect 3 0 2 1; +#X connect 4 0 5 0; +#X connect 5 0 2 1; +#X connect 6 0 8 0; +#X connect 8 0 2 0; +#X connect 8 1 9 0; +#X connect 9 0 11 0; +#X connect 10 0 24 0; +#X connect 10 0 3 0; +#X connect 10 1 4 0; +#X connect 11 0 0 0; +#X connect 24 0 1 0; +#X restore 226 113 pd convert_pointer_to_anything; +#N canvas 566 22 458 308 flash 0; +#X obj 35 38 inlet; +#X obj 69 264 outlet; +#X msg 35 200 color 0 22; +#X obj 35 129 delay 50; +#X msg 134 200 color 5 22; +#X obj 35 104 trigger bang bang; +#X obj 134 179 purepd/once; +#X connect 0 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 2 0; +#X connect 3 0 6 1; +#X connect 4 0 1 0; +#X connect 5 0 3 0; +#X connect 5 1 6 0; +#X connect 6 0 4 0; +#X restore 21 203 pd flash on input; +#X msg 27 162 bang; #X connect 1 0 6 0; #X connect 3 0 5 0; #X connect 5 0 2 0; #X connect 6 0 7 0; -#X connect 6 1 3 0; +#X connect 6 1 9 0; +#X connect 6 1 10 0; #X connect 7 0 2 0; #X connect 8 0 7 0; +#X connect 9 0 3 0; +#X connect 10 0 2 0; +#X connect 11 0 10 0; #X coords 0 -1 1 1 200 18 1 0 0; |