1 files changed, 205 insertions, 0 deletions

diff --git a/externals/gridflow/abstractions/hpgl_font_render.pd b/externals/gridflow/abstractions/hpgl_font_render.pd
new file mode 100644
index 00000000..bb31d888
--- /dev/null
+++ b/externals/gridflow/abstractions/hpgl_font_render.pd
@@ -0,0 +1,205 @@
+#N canvas 529 0 693 585 10;
+#X obj 11 11 inlet hpgl;
+#X obj 11 556 outlet hpgl;
+#X obj 85 11 inlet font_name;
+#X obj 85 30 symbol;
+#X obj 194 30 args font_name;
+#X msg 51 230 symbol \$1;
+#X obj 51 266 #import;
+#X obj 51 304 #to_float;
+#X obj 212 375 pack f s;
+#X obj 11 211 t a;
+#X obj 212 394 t a b;
+#X obj 492 96 hpgl_track_position;
+#X obj 242 486 f;
+#X obj 242 524 +;
+#X obj 242 543 +;
+#X obj 472 152 #unpack;
+#X obj 267 543 r \$0-char-width;
+#X obj 242 562 s \$0-char-pos;
+#X obj 72 155 s \$0-scaling;
+#X obj 334 96 route print_from_ascii;
+#X obj 267 96 route2 LB;
+#X obj 134 136 s \$0-rowheight;
+#X obj 535 189 f;
+#X obj 560 189 -;
+#X obj 585 189 r \$0-rowheight;
+#X obj 447 181 f;
+#X obj 11 96 route spacing scaling rowheight wrap;
+#X obj 196 117 s \$0-wrap;
+#X obj 51 364 t b;
+#X obj 57 343 r \$0-crlf;
+#X obj 242 505 shunt;
+#X msg 300 432 1;
+#X msg 261 432 0;
+#X obj 242 413 t b b b b;
+#X obj 51 383 f;
+#X obj 51 323 route 10 13;
+#X obj 132 323 t a a;
+#X obj 76 383 * -1;
+#X obj 531 215 s \$0-row-pos;
+#N canvas 418 66 489 534 draw_one_character 0;
+#X msg 132 58 open grid \$2/\$1.hpgl \, headerless \, type b;
+#X obj 51 137 until;
+#X obj 51 156 #in;
+#X obj 90 137 route bang;
+#X obj 82 296 hpgl_find_bbox;
+#X obj 51 58 t b b b b a;
+#X msg 300 125 1;
+#X msg 301 162 0;
+#X obj 52 277 shunt;
+#X msg 23 107 rewind;
+#X obj 110 455 #pack;
+#X obj 110 436 inv+;
+#X obj 82 357 inv+;
+#X obj 82 315 #redim (4);
+#X obj 52 194 route2 PA PU PD;
+#X obj 82 334 #unpack 4;
+#X obj 52 230 hpgl_op *;
+#X obj 52 474 hpgl_op +;
+#X obj 82 395 s \$0-char-width;
+#X obj 142 436 r \$0-char-pos;
+#X obj 119 230 r \$0-scaling;
+#X obj 82 376 max;
+#X obj 52 175 plotter_parser;
+#X obj 149 455 r \$0-row-pos;
+#X obj 51 39 inlet;
+#X obj 52 493 outlet;
+#X connect 0 0 2 0;
+#X connect 1 0 2 0;
+#X connect 2 0 22 0;
+#X connect 2 1 3 0;
+#X connect 3 0 1 1;
+#X connect 4 0 13 0;
+#X connect 5 0 1 0;
+#X connect 5 1 7 0;
+#X connect 5 1 9 0;
+#X connect 5 1 4 1;
+#X connect 5 2 1 0;
+#X connect 5 3 6 0;
+#X connect 5 4 0 0;
+#X connect 6 0 8 1;
+#X connect 7 0 8 1;
+#X connect 8 0 17 0;
+#X connect 8 1 4 0;
+#X connect 9 0 2 0;
+#X connect 10 0 17 1;
+#X connect 11 0 10 0;
+#X connect 12 0 21 0;
+#X connect 13 0 15 0;
+#X connect 14 0 16 0;
+#X connect 14 1 16 0;
+#X connect 14 2 16 0;
+#X connect 15 0 12 0;
+#X connect 15 0 11 0;
+#X connect 15 2 12 1;
+#X connect 16 0 8 0;
+#X connect 17 0 25 0;
+#X connect 19 0 11 1;
+#X connect 20 0 16 1;
+#X connect 21 0 18 0;
+#X connect 22 0 14 0;
+#X connect 23 0 10 1;
+#X connect 24 0 5 0;
+#X restore 62 533 pd draw_one_character;
+#N canvas 0 0 450 300 word-wrap 0;
+#X obj 27 125 -;
+#X obj 66 144 r \$0-wrap;
+#X obj 43 106 #unpack;
+#X obj 57 230 s \$0-crlf;
+#X obj 27 144 moses;
+#X obj 57 211 spigot;
+#X obj 103 211 == 32;
+#X obj 57 168 spigot 0;
+#X obj 117 168 !=;
+#X obj 103 192 inlet cur-char;
+#X obj 27 26 inlet cur-pos;
+#X obj 43 87 inlet orig-pos;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 1 0 8 0;
+#X connect 2 0 0 1;
+#X connect 4 1 7 0;
+#X connect 5 0 3 0;
+#X connect 6 0 5 1;
+#X connect 7 0 5 0;
+#X connect 8 0 7 1;
+#X connect 9 0 6 0;
+#X connect 10 0 0 0;
+#X connect 11 0 2 0;
+#X restore 453 293 pd word-wrap;
+#X obj 447 152 t b;
+#X obj 51 402 s \$0-char-width;
+#X obj 246 179 t b;
+#X obj 223 254 s \$0-char-width;
+#X msg 223 235 0;
+#X obj 51 285 t a b;
+#X obj 85 49 s \$0-font-name;
+#X obj 263 356 r \$0-font-name;
+#X obj 267 524 r \$0-spacing;
+#X obj 11 174 s \$0-spacing;
+#X obj 76 364 r \$0-spacing;
+#X connect 0 0 26 0;
+#X connect 2 0 3 0;
+#X connect 3 0 47 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 0;
+#X connect 6 0 46 0;
+#X connect 7 0 35 0;
+#X connect 8 0 10 0;
+#X connect 9 0 1 0;
+#X connect 10 0 39 0;
+#X connect 10 1 33 0;
+#X connect 11 0 15 0;
+#X connect 11 0 40 1;
+#X connect 12 0 30 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 1;
+#X connect 14 0 17 0;
+#X connect 15 0 25 0;
+#X connect 15 1 22 1;
+#X connect 15 1 38 0;
+#X connect 16 0 14 1;
+#X connect 19 0 6 0;
+#X connect 19 1 11 0;
+#X connect 19 1 9 0;
+#X connect 20 0 5 0;
+#X connect 20 1 19 0;
+#X connect 22 0 23 0;
+#X connect 23 0 22 1;
+#X connect 23 0 38 0;
+#X connect 24 0 23 1;
+#X connect 25 0 12 1;
+#X connect 26 0 50 0;
+#X connect 26 1 18 0;
+#X connect 26 2 21 0;
+#X connect 26 3 27 0;
+#X connect 26 4 20 0;
+#X connect 28 0 34 0;
+#X connect 28 0 41 0;
+#X connect 29 0 28 0;
+#X connect 30 0 13 0;
+#X connect 30 1 40 0;
+#X connect 31 0 30 1;
+#X connect 32 0 30 1;
+#X connect 33 0 12 0;
+#X connect 33 1 32 0;
+#X connect 33 2 12 0;
+#X connect 33 3 31 0;
+#X connect 34 0 42 0;
+#X connect 35 0 28 0;
+#X connect 35 2 36 0;
+#X connect 36 0 8 0;
+#X connect 36 1 40 2;
+#X connect 37 0 34 1;
+#X connect 39 0 1 0;
+#X connect 41 0 25 0;
+#X connect 41 0 22 0;
+#X connect 43 0 11 1;
+#X connect 43 0 45 0;
+#X connect 45 0 44 0;
+#X connect 46 0 7 0;
+#X connect 46 1 43 0;
+#X connect 48 0 8 1;
+#X connect 49 0 13 1;
+#X connect 51 0 37 0;