From 5a6bee4fe076e06514c6e4e538590dd3a2a5cdc3 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Fri, 6 Nov 2009 18:37:00 +0000 Subject: upgrade gridflow svn path=/trunk/; revision=12728 --- externals/gridflow/abstractions/#draw_hpgl.pd | 86 +++++++++++++++++++++++++++ 1 file changed, 86 insertions(+) create mode 100644 externals/gridflow/abstractions/#draw_hpgl.pd (limited to 'externals/gridflow/abstractions/#draw_hpgl.pd') diff --git a/externals/gridflow/abstractions/#draw_hpgl.pd b/externals/gridflow/abstractions/#draw_hpgl.pd new file mode 100644 index 00000000..763ff5ea --- /dev/null +++ b/externals/gridflow/abstractions/#draw_hpgl.pd @@ -0,0 +1,86 @@ +#N canvas 413 192 510 430 10; +#X obj 208 16 inlet command; +#X obj 18 17 inlet image; +#X obj 18 337 outlet image; +#X obj 109 17 inlet colour; +#X obj 142 36 loadbang; +#X obj 107 318 spigot 1; +#X text 167 319 pen; +#X msg 231 109 0; +#X msg 270 109 1; +#X obj 201 80 t a b; +#X obj 240 80 t a b; +#X obj 279 69 route bang; +#X obj 353 103 t a a; +#X msg 142 55 2 2 # -1; +#X obj 353 139 unpack; +#X obj 399 139 unpack; +#X obj 353 162 pack 0 0 0 0; +#X obj 107 337 outlet time_to_draw; +#X obj 353 200 t a a; +#X obj 353 219 #finished; +#X obj 40 55 #store; +#X obj 62 74 #dim; +#X obj 26 185 #reinterval; +#X obj 18 36 t a b a; +#X obj 353 239 inlet start; +#X obj 367 278 inlet end; +#X obj 62 93 #unpack 3; +#X obj 26 204 #reverse -1; +#X obj 18 290 #draw_polygon \, draw line; +#X obj 353 84 #to_list; +#X obj 208 35 route PU PD PA PR; +#X obj 367 297 #cast f; +#X obj 353 258 #cast f; +#X obj 353 181 #import (2 2) f; +#X obj 353 65 #import (2) f; +#X obj 43 163 #pack 2 f; +#X obj 112 163 #pack 2 f; +#X obj 26 223 #cast i; +#X connect 0 0 30 0; +#X connect 1 0 23 0; +#X connect 3 0 28 1; +#X connect 4 0 13 0; +#X connect 5 0 17 0; +#X connect 7 0 5 1; +#X connect 8 0 5 1; +#X connect 9 0 11 0; +#X connect 9 1 7 0; +#X connect 10 0 11 0; +#X connect 10 1 8 0; +#X connect 11 1 34 0; +#X connect 12 0 15 0; +#X connect 12 1 14 0; +#X connect 13 0 28 2; +#X connect 14 0 16 0; +#X connect 14 1 16 1; +#X connect 15 0 16 2; +#X connect 15 1 16 3; +#X connect 16 0 33 0; +#X connect 18 0 19 0; +#X connect 18 1 20 1; +#X connect 19 0 5 0; +#X connect 20 0 22 0; +#X connect 21 0 26 0; +#X connect 22 0 27 0; +#X connect 23 0 28 0; +#X connect 23 1 20 0; +#X connect 23 2 21 0; +#X connect 24 0 32 0; +#X connect 25 0 31 0; +#X connect 26 0 35 1; +#X connect 26 1 36 0; +#X connect 27 0 37 0; +#X connect 28 0 2 0; +#X connect 29 0 12 0; +#X connect 30 0 9 0; +#X connect 30 1 10 0; +#X connect 30 2 34 0; +#X connect 30 3 34 0; +#X connect 31 0 22 2; +#X connect 32 0 22 1; +#X connect 33 0 18 0; +#X connect 34 0 29 0; +#X connect 35 0 22 3; +#X connect 36 0 22 4; +#X connect 37 0 28 2; -- cgit v1.2.1