sewing-table: Machine_NewRearProfile wip

[reprap-play.git] / sewing-table.scad.m4

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 2baad77a57b7ef1534d6ac73fb135e1a56087adb..2bb8f7af1af1513b1c8135437276de0023d585c1 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -423,7 +423,16 @@ module Machine_Profile(){
 }
 
 module Machine_NewRearProfile(){ ////toplevel
-  import("sewing-table-rear-profile.dxf", convexity=10);
+  // figures copied out of xfig edit boxes
+  // best not to edit the posbox size if poss - just move it
+  posbox = 10 * ([7.2333,-14.1267] - [-16.2289,40.0289]);
+  sideline = -10 * ([-6.2400,13.5600] - [-2.4467,28.2556]);
+  sh = -[abs(posbox[0]), abs(posbox[1])];
+  rot = atan2(-sideline[0], sideline[1]);
+  echo("SH",sh,rot);
+  rotate(rot) translate(sh){
+    import("sewing-table-rear-profile.dxf", convexity=10);
+  }
 }
 
 module Machine_RearProfile(){ ////toplevel