fix vertgrid and horizgrid to not allow resizing

pianorollseq.pd

@@ -176,19 +176,77 @@ certain period.;
 #X connect 18 0 5 0;
 #X connect 20 0 19 0;
 #X restore 612 418 pd create_horizgrid;
-#N canvas 75 102 410 167 horizgrid-template 0;
+#N canvas 64 134 618 459 horizgrid-template 0;
 #X obj 19 18 filledpolygon c c 1 0 0 0 h w h w 0;
 #X obj 20 44 struct \$0.horizgrid float x float y float w float h float
 c;
 #X obj 20 73 s \$0.horizgrid.send;
+#X obj 22 126 route change;
+#X obj 22 149 t p p, f 20;
+#X obj 79 357 - 1;
+#X obj 22 195 t b b, f 10;
+#X obj 22 103 r \$0.horizgrid.send;
+#X obj 22 388 set \$0.horizgrid w h;
+#X obj 79 335 f;
+#X obj 22 322 - 1;
+#X obj 22 299 *;
+#X obj 22 252 f;
+#X obj 37 224 r \$0.stepcount;
+#X obj 22 170 get \$0.horizgrid w;
+#X obj 37 276 r \$0.stepviswidth;
+#X obj 94 310 r \$0.stepvisheight;
 #X connect 1 0 2 0;
-#X restore 756 390 pd horizgrid-template;
-#N canvas 60 99 380 157 vertgrid-template 0;
+#X connect 3 0 4 0;
+#X connect 4 0 14 0;
+#X connect 4 1 8 2;
+#X connect 5 0 8 1;
+#X connect 6 0 12 0;
+#X connect 6 1 9 0;
+#X connect 7 0 3 0;
+#X connect 9 0 5 0;
+#X connect 10 0 8 0;
+#X connect 11 0 10 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 1;
+#X connect 14 0 6 0;
+#X connect 15 0 11 1;
+#X connect 16 0 9 1;
+#X restore 754 418 pd horizgrid-template;
+#N canvas 60 99 831 488 vertgrid-template 0;
 #X obj 19 18 filledpolygon 0 0 1 0 0 0 h w h w 0;
 #X obj 19 42 struct \$0.vertgrid float x float y float w float h;
 #X obj 19 66 s \$0.vertgrid.send;
+#X obj 92 310 r \$0.stepvisheight;
+#X obj 77 286 f;
+#X obj 77 335 *;
+#X obj 92 261 r \$0.pitchrange;
+#X obj 22 103 r \$0.vertgrid.send;
+#X obj 22 126 route change;
+#X obj 22 170 get \$0.vertgrid w;
+#X obj 22 149 t p p, f 19;
+#X obj 77 358 - 1;
+#X obj 22 388 set \$0.vertgrid w h;
+#X obj 37 223 r \$0.stepviswidth;
+#X obj 22 269 f;
+#X obj 37 246 - 1;
+#X obj 22 195 t b b, f 10;
 #X connect 1 0 2 0;
-#X restore 756 417 pd vertgrid-template;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 11 0;
+#X connect 6 0 4 1;
+#X connect 7 0 8 0;
+#X connect 8 0 10 0;
+#X connect 9 0 16 0;
+#X connect 10 0 9 0;
+#X connect 10 1 12 2;
+#X connect 11 0 12 1;
+#X connect 13 0 15 0;
+#X connect 14 0 12 0;
+#X connect 15 0 14 1;
+#X connect 16 0 14 0;
+#X connect 16 1 4 0;
+#X restore 754 390 pd vertgrid-template;
 #N canvas 133 127 401 394 create_vertgrid 0;
 #X obj 16 86 t a b;
 #X obj 16 109 until;
@@ -298,7 +356,7 @@ c;
 #X obj 19 42 struct \$0.vertline float x float y float h float c float
 n float nvis;
 #X connect 3 0 1 0;
-#X restore 756 444 pd vertline-template;
+#X restore 754 446 pd vertline-template;
 #N canvas 43 99 400 432 create_vertline 0;
 #X obj 16 116 t a b;
 #X obj 16 139 until;
@@ -1072,7 +1130,7 @@ hl float gid;
 #X connect 7 0 2 0;
 #X connect 10 0 3 1;
 #X restore 8 76 pd dur-template;
-#X restore 756 475 pd gui-templates;
+#X restore 754 475 pd gui-templates;
 #X obj 745 655 r \$0.vel.send;
 #X obj 745 701 get \$0.vel value;
 #X obj 745 726 s \$0.default.vel;