}
}
-module RoundCornerCut(ci) {
- // ci should be [this_cnr, right_cnr]
- // where right_cnr is to the right (ie, anticlockwise)
+m4_define(`ROUNDCORNER_VARS',`
this_cnr = ci[0];
right_cnr = ci[1];
- offr= round_cnr_rad - round_edge_rad;
+ left_cnr = ci[2];
+ bigr= round_cnr_rad - round_edge_rad
+')
+
+module RoundCorner_selector(ci, adj) {
+ r = round_cnr_rad - round_edge_rad;
+ cube(r*2 + adj, center=true);
+}
+
+module RoundCornerCut(ci) {
+ // ci should be [this_cnr, right_cnr, left_cnr]
+ // where right_cnr is to the right (ie, anticlockwise)
+ ROUNDCORNER_VARS;
INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
difference(){
- cube(offr*2 - 0.1, center=true);
- translate([offr, offr, 0])
- cylinder(center=true, h=20, r= offr);
+ RoundCorner_selector(ci, -0.1);
+ translate([bigr, bigr, 0])
+ cylinder(center=true, h=20, r= bigr);
}
}
}
module RoundCornerAdd(ci) {
- this_cnr = ci[0];
- right_cnr = ci[1];
- bigr = round_cnr_rad - round_edge_rad;
+ ROUNDCORNER_VARS;
INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
intersection(){
- cube(bigr*2 + 0.1, center=true);
+ RoundCorner_selector(ci, +0.1);
translate([bigr, bigr, 0])
rotate_extrude(convexity=10, $fn=50)
translate([bigr, 0])
rcs = [R_EDGE(c,1)];
difference(){
union(){
- Rectangle_TileBase(c);
- Posts(posts);
- RoundEdge(R_EDGE(c,0));
- RoundEdge(R_EDGE(c,1));
- InterlockEdge(tile_01_00_cnr, c[0]);
+ difference(){
+ union(){
+ Rectangle_TileBase(c);
+ Posts(posts);
+ RoundEdge(R_EDGE(c,0));
+ RoundEdge(c[1], c1bis);
+ InterlockEdge(tile_01_00_cnr, c[0]);
+ }
+ RoundCornerCut(rcs);
+ translate([0,0,-20]) linear_extrude(height=40) {
+ polygon([ c1bis, c1bis + [50,0], c2bis + [50,0], c2bis ]);
+ }
+ }
+ RoundEdge(c1bis, c2bis);
}
- RoundCornerCut(rcs);
Machine();
- translate([0,0,-20]) linear_extrude(height=40) {
- polygon([ c1bis, c1bis + [50,0], c2bis + [50,0], c2bis ]);
- }
}
RoundCornerAdd(rcs);
+ RoundCornerAdd([c1bis,c2bis,c[1]]);
}
module FitTest_FrontCurve(){ ////toplevel
}
}
+module RoundCornerDemo_plat(cnr){
+ mirror([0,0,1]) linear_extrude(height=1) polygon(cnr);
+}
+
+module RoundCornerDemo(){ ////toplevel
+ cnr = [ [0,0], [15,0], [-10,10] ];
+ translate([0,25,0]) RoundCornerDemo_plat(cnr);
+ translate([25,0,0]) RoundCornerAdd(cnr);
+ translate([-25,0,0]) RoundCornerCut(cnr);
+ difference(){
+ RoundCornerDemo_plat(cnr);
+ RoundCornerCut(cnr);
+ }
+ RoundCornerAdd(cnr);
+}
+
module Demo(){ ////toplevel
translate(demo_slop*[-2,1]) color("blue") Tile12();
translate(demo_slop*[-2,0]) color("red") Tile02();