chiark / gitweb /
sewing-table: NewArm: make longer
[reprap-play.git] / sewing-table.scad.m4
index 660f84a1fddd056018435f3f4bf02d38dd184e4c..b5151ecb1fd192c5f5a57c5cdf59808203db189a 100644 (file)
@@ -484,7 +484,7 @@ module Machine_NewEndProfile(){
   sh = (0.5 * (endline[0] + endline[1])) - posbox;
 
   ellen = sc * dist2d(endline[0],endline[1]);
-  scy = cutout_l_end_y / ellen;
+  scy = cutout_l_end_y_total / ellen;
 
   scale([scy,1]) scale(sc) rotate(rot + rot_adj) translate(-[sh[0],-sh[1]]){
 
@@ -516,12 +516,14 @@ module Machine_NewEndProfileDemo(){ ////toplevel
 }
 
 module Machine_NewArm(){
-  translate(tile01_tr + [ -cutout_l_end_x + cutout_l_end_new_x_slop,
-                         (-cutout_tile01_y + cutout_tile11_y)/2 ]){
-    rotate(-90){
-      hull(){
-       for (d=[0,200]) 
-         translate([0,d]) Machine_NewEndProfile();
+  translate([0,0,-30]) linear_extrude(height=60) {
+    translate(tile01_tr + [ -cutout_l_end_x + cutout_l_end_new_x_slop,
+                           (-cutout_tile01_y + cutout_tile11_y)/2 ]){
+      rotate(-90){
+       hull(){
+         for (d=[0,400]) 
+           translate([0,d]) Machine_NewEndProfile();
+       }
       }
     }
   }