chiark / gitweb /
sewing-table: NewEndProfile: rotate adj
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 6 Jun 2017 18:12:47 +0000 (19:12 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 6 Jun 2017 18:12:47 +0000 (19:12 +0100)
sewing-table.scad.m4

index c542c752822bc448b77a2dcd64b631281af2819c..f9b32af5aad5a697c87d7d42ea0e7e073cfb115a 100644 (file)
@@ -468,6 +468,8 @@ module Machine_NewEndProfile(){
                    [[50.3800,21.9578], [50.1933,14.4933]]]; // lines, Blue3
   baseline = 10 * [[8.4000,18.0822], [50.3000,17.6822]]; // line, Green2
 
+  rot_adj = -0.38;
+
   posbox = [min(posboxs[0][0],posboxs[1][0]),
            max(posboxs[0][1],posboxs[1][1])];
 
@@ -488,7 +490,8 @@ m4_define(`MNEP_ELP',
 //  rot = atan2(-sideline[0], sideline[1]);
 //  sc = scaleline_mm / scaleline;
   //echo("SH",sh,rot,sc);
-  scale(sc) rotate(rot) translate(-[sh[0],-sh[1]]){
+
+  scale(sc) rotate(rot + rot_adj) translate(-[sh[0],-sh[1]]){
 
     mirror([0,1]){
   //%translate(1 * (posboxs[0] - posbox)) square(50);