From 819a76d81c19dc9d209e6ad54983758d1a38da64 Mon Sep 17 00:00:00 2001
From: Justin Lin <justin.sdk@gmail.com>
Date: Thu, 9 Dec 2021 21:31:49 +0800
Subject: [PATCH] update tail

---
 examples/dragon/torus_knot_dragon.scad | 68 +++++++++++++++++++++++++-
 1 file changed, 66 insertions(+), 2 deletions(-)

diff --git a/examples/dragon/torus_knot_dragon.scad b/examples/dragon/torus_knot_dragon.scad
index 4d94c69d..c389cf5e 100644
--- a/examples/dragon/torus_knot_dragon.scad
+++ b/examples/dragon/torus_knot_dragon.scad
@@ -43,8 +43,9 @@ module torus_knot_dragon() {
 	
 	translate([2.09, 1.56, -.8])
 	rotate([0, t_angy_angz[0], t_angy_angz[1]])
-	rotate([0, -95, -75])
+	rotate([0, -98, -70])
 	scale([0.038, 0.038, 0.065])
+    rotate([0, 0, 200])
 	    tail();
 }
 
@@ -70,8 +71,71 @@ module one_segment(body_r, body_fn, one_scale_data) {
 
 module tail() {
     $fn = 8;
-    tail_scales(75, 2.5, 5, -4, 1.25);
+    tail_scales(75, 2.5, 4.25, -4, 1.25);
     tail_scales(100, 1.25, 4.5, -7, 1);
     tail_scales(110, 1.25, 3, -9, 1);
     tail_scales(120, 2.5, 2, -9, 1);   
+    translate([3, 0, -2.5])
+    rotate([0, 0, 0])
+    scale([.8, .8, 1])
+    hair();
+
+    module hair() {
+        tail_hair = [
+            [3, -1],
+            [5, -1.5],
+            [8, -1],
+            [9.5, 0],
+            [8, -0.4],
+            [6.5, -0.3],
+            [8, 0],
+            [10, 1],
+            [14, 5],
+            [17, 10],
+            [14, 8],
+            [12, 7],
+            [9, 6],
+            [11.5, 10],
+            [13, 12],
+            [16, 14],
+            [12, 13],
+            [8, 11],
+            [10, 14],
+            [5, 11],
+            [3, 8.5],
+            [-1, 3]
+        ];
+
+        rotate([-2.5, 0, 0])
+        translate([-1, .5, 5.5])
+        scale([1.1, 1, 1.3]) {
+            translate([2, 0, -3])
+            scale([2, 1, .8])
+            rotate([-90, 70, 15])
+            linear_extrude(.75, center = true)
+                polygon(tail_hair);
+
+            scale([.8, .9, .6])
+            translate([2, 0, -5])
+            scale([1.75, 1, .8])
+            rotate([-90, 70, 15]) {
+                linear_extrude(1.5, scale = 0.5)
+                    polygon(tail_hair);
+                mirror([0, 0, 1])
+                linear_extrude(1.5, scale = 0.5)
+                    polygon(tail_hair);
+            }
+
+            scale([.6, .7, .9])
+            translate([2, 0, -4])
+            scale([2, 1, .85])
+            rotate([-90, 70, 15]) {
+                linear_extrude(3.5, scale = 0.5)
+                    polygon(tail_hair);
+                mirror([0, 0, 1])
+                linear_extrude(3.5, scale = 0.5)
+                    polygon(tail_hair);
+            }
+        }    
+    }
 }
\ No newline at end of file