From cc38eee4ed1f2f83f2c272a69628850fb10395eb Mon Sep 17 00:00:00 2001
From: Justin Lin <caterpillar@openhome.cc>
Date: Thu, 18 Jul 2019 17:27:23 +0800
Subject: [PATCH] add chrome_dino

---
 examples/chrome_dino.scad | 240 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 240 insertions(+)
 create mode 100644 examples/chrome_dino.scad

diff --git a/examples/chrome_dino.scad b/examples/chrome_dino.scad
new file mode 100644
index 00000000..7c67c3da
--- /dev/null
+++ b/examples/chrome_dino.scad
@@ -0,0 +1,240 @@
+include <pixel/px_circle.scad>;
+include <in_shape.scad>;
+include <pixel/px_line.scad>;
+include <pixel/px_polyline.scad>;
+include <pixel/px_polygon.scad>;
+
+w = 5;
+merged_dino = false;
+eye_spacing = 0.4;
+base_x_blocks = 10;
+base_y_blocks = 6;
+
+part = "DEMO"; // [DINO, EYE, CACTUS, BASE, DEMO]
+
+module chrome_dino(w, merged = false) {
+    module body(w) {
+        difference() {
+            polygon([
+                [0, 0],
+                [0, w],
+                [-3 * w, w],
+                [-3 * w, 2 * w],
+                [-4 * w, 2 * w],
+                [-4 * w, 3 * w],
+                [-5 * w, 3 * w],
+                [-5 * w, 9 * w],
+                [-4 * w, 9 * w],
+                [-4 * w, 7 * w],
+                [-3 * w, 7 * w],
+                [-3 * w, 6 * w],
+                [-2 * w, 6 * w],
+                [-2 * w, 5 * w],
+                [0, 5 * w],
+                [0, 6 * w],
+                [w, 6 * w],
+                [w, 7 * w],
+                [3 * w, 7 * w],
+                [3 * w, 8 * w],
+                [4 * w, 8 * w],
+                [4 * w, 9 * w],
+                [5 * w, 9 * w],
+                [5 * w, 15 * w],
+                [6 * w, 15 * w],
+                [6 * w, 16 * w],
+                [14 * w, 16 * w],
+                [14 * w, 15 * w],
+                [15 * w, 15 * w],
+                [15 * w, 11 * w],
+                [11 * w, 11 * w],
+                [11 * w, 10 * w],
+                [13 * w, 10 * w],
+                [13 * w, 9 * w],
+                [10 * w, 9 * w],
+                [10 * w, 3 * w],
+                [9 * w, 3 * w],
+                [9 * w, 2 * w],
+                [8 * w, 2 * w],
+                [8 * w, w],
+                [7 * w, w],
+                [7 * w, 0],
+            ]); 
+        
+          translate([7 * w, 14 * w]) square(w, center = true);
+        }
+    }
+
+    module hand(w) {
+        polygon([
+            [10 * w, 7 * w],
+            [12 * w, 7 * w],
+            [12 * w, 5 * w],
+            [11 * w, 5 * w],
+            [11 * w, 6 * w],
+            [10 * w, 6 * w]
+        ]);
+    }
+
+    module leg_l(w) {
+        polygon([
+            [5 * w, 0],
+            [5 * w, -w],
+            [6 * w, -w],
+            [6 * w, -4 * w],
+            [8 * w, -4 * w],
+            [8 * w, -3 * w],
+            [7 * w, -3 * w],
+            [7 * w, 0],
+        ]);
+    }
+
+    module leg_r(w) {
+        polygon([
+            [w, 0],
+            [w, -4 * w],
+            [3 * w, -4 * w],
+            [3 * w, -3 * w],
+            [2 * w, -3 * w],
+            [2 * w, -2 * w],
+            [3 * w, -2 * w],
+            [3 * w, -w],
+            [4 * w, -w],
+            [4 * w, 0]
+        ]);
+    }
+
+    module dino_left(w) {      
+        linear_extrude(w * 2.5) body(w);
+        linear_extrude(w * 2) {
+            hand(w);
+            leg_l(w);
+        }
+    }
+
+    module dino_right(w) {
+        linear_extrude(w * 2.5) mirror([1, 0, 0]) body(w);
+        linear_extrude(w * 2) mirror([1, 0, 0]) {
+            hand(w);
+            leg_r(w);
+        }
+    }
+    
+    if(merged) {
+        dino_left(w);
+        translate([0, 0, w * 5]) rotate([0, 180, 0]) dino_right(w);
+    } else {
+        translate([w * 6, 0, 0]) dino_left(w);
+        translate([w * -6, 0, 0]) dino_right(w);
+    }
+}
+
+module cactus(w) {
+    linear_extrude(w * 3) {
+        translate([2 * w, w * 7]) scale(w) 
+        for(pt = px_polygon([
+            [0, 2],
+            [3, 2],
+            [5, 4],
+            [5, 10],
+            [5, 10],
+            [3, 10],
+            [3, 6],
+            [0, 4],
+            
+        ], filled = true)) {
+            translate(pt) square(1);
+        }
+        translate([-2 * w, w * 5]) scale(w) 
+        for(pt = px_polygon([
+            [-1, 0],
+            [-3, 0],
+            [-6, 2],
+            [-6, 6],
+            [-6, 6],
+            [-4, 6],
+            [-4, 4],
+            [-1, 2],
+            
+        ], filled = true)) {
+            translate(pt) square(1);
+        }
+        scale(w) 
+        for(pt = px_polygon([
+            [-2, 0],
+            [2, 0],
+            [2, 20],
+            [1, 22],
+            [0, 22],
+            [-1, 22],
+            [-2, 20]
+        ], filled = true)) {
+            translate(pt) square(1);
+        }
+    }
+}
+
+module base(w, base_x_blocks, base_y_blocks) {
+   linear_extrude(w) {
+       translate([0, -w]) 
+           square([base_x_blocks * w, base_y_blocks * w + 2 * w]);
+       translate([0, base_y_blocks * w / 2]) scale(w)
+       for(p = px_circle(base_y_blocks / 2, filled = true)) {
+           translate(p)
+               square(1, center = true);
+       }
+       translate([base_x_blocks * w, base_y_blocks * w / 2]) scale(w)
+       for(p = px_circle(base_y_blocks / 2, filled = true)) {
+           translate(p)
+               square(1, center = true);
+       }
+   }   
+}
+
+module eye(w, eye_spacing) {
+    translate([0, 0, -eye_spacing]) 
+        rotate([0, -90, 0]) 
+            linear_extrude(w * 5) 
+                offset(delta = -eye_spacing) square(w);
+}
+
+if(part == "DINO") {
+    chrome_dino(w, merged_dino);
+}
+else if(part == "EYE") {
+    eye(w, eye_spacing);
+}
+else if(part == "CACTUS") {
+    cactus(w);
+}
+else if(part == "BASE") { 
+   base(w, base_x_blocks, base_y_blocks);
+}
+else if(part == "DEMO") {
+    wd = 5;
+    translate([0, wd * 5.5, wd * 5]) rotate([90, 0, 0])  {
+        color("DimGray") chrome_dino(wd, true);
+        color("white") 
+            linear_extrude(wd * 5)
+                translate([7 * wd, 14 * wd]) square(wd, center = true);
+    }
+    color("white") base(wd, 10, 6);
+    
+    translate([wd * 25, wd * 10, 0]) {
+        translate([wd * 4.25, wd * 4.25, 0]) color("SlateGray") rotate([90, 0, 0])  
+            cactus(wd);
+        color("white") base(wd, 10, 6);
+    }
+    
+    translate([-wd * 35, wd * 10, 0]) {
+        color("SlateGray") {
+            translate([wd * 4.25, wd * 4, 0]) rotate([90, 0, 0])  
+                mirror([1, 0, 0]) cactus(wd);
+                
+             scale(0.75)
+                 translate([wd * 30, wd * 5, 0]) rotate([90, 0, 0])  
+                    cactus(wd);       
+        }
+         color("white") base(wd, 30, 6);                
+    }
+    
+}