was successful but rotate to use less support

[reprap-play.git] / treefoil.scad.pl

diff --git a/treefoil.scad.pl b/treefoil.scad.pl
index 28e840e01dfc77a510c64c6ada8a7312ce7994a4..f206f2ea669b87a9d36aa96b4ef96c46346889db 100755 (executable)
--- a/treefoil.scad.pl
+++ b/treefoil.scad.pl
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+# Trying now with:
+#   - support X/Y dist 0.5mm
+
 use strict;
 
 our $shape = <<'END';
@@ -37,7 +40,7 @@ while (<DATA>) { o $_ }
 
 __DATA__
 
-thick = 7;
+thick = 6;
 edgeu = 10;
 
 // calculated
@@ -63,7 +66,8 @@ module TraceEdge(p,q) {
     }
 }
 
-rotate([-45,0,0])
+rotate([0,0,90])
+  rotate([0,90,0])
   Trace();