chiark / gitweb /
sewing-table: RoundCorner rework: switch to new model
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 3 Jun 2017 20:28:13 +0000 (21:28 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 3 Jun 2017 20:28:13 +0000 (21:28 +0100)
sewing-table.scad.m4

index 57f9f3d..76fda5d 100644 (file)
@@ -255,25 +255,29 @@ m4_define(`ROUNDCORNER_VARS',`
 module RoundCorner_selector(ci, adj) {
   ROUNDCORNER_VARS;
   echo("RCS",l_uvec,ctr);
-  union(){
+  %union(){
     INREFFRAME(this_cnr, right_cnr) {
       cube(bigr*2 + adj, center=true);
     }
   }
-  %translate(concat(ctr,[0])) circle(1);
-  if(0){
-  union(){
-    INREFFRAME(this_cnr, right_cnr) {
-//      %translate([ -bigr,-bigr,0 ])
-//     cube([bigr*2 + adj, bigr*3, bigr*2]);
+  intersection(){
+    union(){
+      INREFFRAME(ctr3,concat(lp1,[4])){
+       translate([0,0,-bigr]) linear_extrude(height=bigr*2) {
+         translate([-bigr*2 + adj, -bigr])
+           square([bigr*2, bigr*3]);
+       }
+      }
     }
-  }
-  union(){
-    INREFFRAME(this_cnr, left_cnr) {
-      %translate([ -bigr,-bigr,0 ])
-      cube(bigr*2 + adj);
+    union(){
+      INREFFRAME(ctr3,concat(lp4,[0])){
+       translate([0,0,-bigr]) linear_extrude(height=bigr*2) {
+         translate([-bigr*2, -bigr*2])
+           square([bigr*2 + adj, bigr*3]);
+       }
+      }
     }
-  }}
+  }
 }
 
 module RoundCornerCut(ci) {