include <quacks-ingredients.scad>
+sandingframe_gap = 0.3; // to be added to radius
+sandingframe_nw = 5;
+sandingframe_nl = 6;
+sandingframe_th = thick*2/3;
+
module Demo(){ ////toplevel
$nspots = 3;
color("red") { Token_L3(); }
color("black") { Token_L2(); Token_L4(); }
}
+module SandingFrame(){ ////toplevel
+ 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 + stridel) * 0.5 * [-1,-1])
+ square([ stridel * (nl + 0.5),
+ stridew * nw + stridel * 0.5 ]);
+ for (j = [0 : nw-1]) {
+ eo = j % 2;
+ for (i = [0 : nl-1-0.5*eo]) {
+ translate([stridel * (i + 0.5 * eo),
+ stridew * j])
+ circle(r = token_dia/2 + sandingframe_gap);
+ }
+ }
+ }
+ }
+}