backup

sholder.scad

@@ -0,0 +1,37 @@
+
+module sholder_strap(strap_len = 400, blobs = [150, 200, 250], blob_d = 10, thikness = 0.5, width = 40, hole_d = 10) {
+    difference() {
+        union() {
+            linear_extrude(height=thikness)
+            hull() {
+                circle(d=width);
+                translate([strap_len, 0])
+                    circle(d=width);
+            }
+
+            for (i=blobs)
+            translate([i, 0, 0])
+                sholder_strap_blob(d=blob_d);
+        }
+        translate([0, 0, -thikness/2])
+            cylinder(h = thikness*2, d = hole_d);
+        translate([strap_len, 0, -thikness/2])
+            cylinder(h = thikness*2, d = hole_d);
+    }
+}
+module sholder_strap_blob(d) {
+    difference() {
+        sphere(d=d);
+        translate([0, 0, -d])
+            cube([2*d, 2*d, 2*d], center=true);
+    }
+}
+
+sholder_strap(
+    strap_len = 400,
+    blobs = [124, 200, 275],
+    blob_d = 10,
+    thikness = 0.4,
+    width = 40,
+    hole_d = 10
+);

skirt.scad

@@ -1,4 +1,4 @@
-PLOT = "ALL"; // [ALL,FLAPS,FLAP_A,FLAP_B,FLAP_C,SPIKES,SPIKE_A,SPIKE_B,SPIKE_C,SPIKE_D,SKULL]
+PLOT = "SKULL"; // [ALL,FLAPS,FLAP_A,FLAP_B,FLAP_C,SPIKES,SPIKE_A,SPIKE_B,SPIKE_C,SPIKE_D,SKULL]
 MODE = "PREVIW"; // [PREVIW,PLOT]
 
 // $fs = (MODE == "PLOT") ? 0.01 : 1;
@@ -199,16 +199,16 @@ function circle_path(r=[[1, 1], [1, 1], [1, 1]], p=90, d=45) =
             ]
     ];
 
-function skull_rx(h) = cos(asin(h*2-1))/2;
-function skull_ry(h) = cos(asin(h*2-1));
+function skull_rx(h) = cos(asin(h*2-0.5));
+function skull_ry(h) = cos(asin(h*2-0.5))*1.5;
 
 module skull_a()
 {
-    step = 0.1;
+    step = (MODE == "PLOT") ? 0.025 : 0.125;
     scale([1, 1, step])
     skull(
         path = [
-            for (r = [0:step:1])
+            for (r = [0:step:.75])
                 circle_path(
                     r=[
                         [skull_rx(r),               skull_ry(r)],