quacks-ingredients: actual frame wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/quacks-ingredients-demos.scad b/quacks-ingredients-demos.scad
index ecd031c6f537b1c065bb6bb9d283b78cdaedb22e..dfcdd52d85b3b82fb59bd584089e70ef4d66603c 100644 (file)
--- a/quacks-ingredients-demos.scad
+++ b/quacks-ingredients-demos.scad
@@ -15,18 +15,24 @@ module Demo(){ ////toplevel
 }
 
 module SandingFrame(){ ////toplevel
-  stride = token_dia + 5;
+  stridel = token_dia + 5;
   nl = sandingframe_nl;
   nw = sandingframe_nw;
+  stridew = stridel * cos(30);
+  stride = [stridel,stridew];
 
   linear_extrude(height = sandingframe_th) {
     difference(){
-      translate((token_dia/2 + stride) * 0.5 * [-1,-1])
-       square([ stride * (nl + 0.5),
-                stride * 1.5 ]);
-      for (i = [0 : nl-1]) {
-       translate([ stride*i, 0 ])
-         circle(r = token_dia/2 + sandingframe_gap);
+      translate((token_dia/2 + stridel) * 0.5 * [-1,-1])
+       square([ stridel * (nl + 0.5),
+                stridew * (nw + 0.5) ]);
+      for (j = [0 : nw-1]) {
+       eo = j % 2;
+       for (i = [0 : nl-1-eo]) {
+         translate([stridel * (i + 0.5 * eo),
+                    stridew * j])
+           circle(r = token_dia/2 + sandingframe_gap);
+       }
       }
     }
   }