From: Ian Jackson Date: Tue, 30 Oct 2018 17:33:35 +0000 (+0000) Subject: ksafe-base: wip, AnchorWallProfile X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=c9dfc0f808695a8209f3f3daf75f608e4c362519;p=reprap-play.git ksafe-base: wip, AnchorWallProfile Signed-off-by: Ian Jackson --- diff --git a/ksafe-base.scad b/ksafe-base.scad index cc03267..08e92d8 100644 --- a/ksafe-base.scad +++ b/ksafe-base.scad @@ -73,10 +73,26 @@ module AnchorProfile(){ } } +module AnchorWallProfile(){ + UsualProfile(); + NearAnchorProfile(); + hull(){ + for (bev = [bevel, a_bevel]) { + upp_app_Vars(bev) { + polygon([ $xppE, + $xppF, + $xppI, + $xppJ ]); + } + } + } +} + module Demo(){ + translate([0,0,-2]) color("yellow") AnchorWallProfile(); color("red") AnchorProfile(); translate([0,0,2]) color("black") NearAnchorProfile(); - color("blue") UsualProfile(); + translate([0,0,4]) color("blue") UsualProfile(); } Demo();