added version numbers into the catears model

scad/base/binary.scad

@@ -0,0 +1,31 @@
+module lcyl(size, depth){
+  translate([size/2,depth/2,size/2])
+    rotate([90,0,0])
+      cylinder(h = depth, d = size, center = true, $fn = 32);
+}
+
+module binary(n, size, depth = size, sep = size/2){
+  cube([sep,depth,size]);
+  translate([0,0,-size/4])
+    lcyl(size = sep, depth = depth);
+  translate([0,0,3*size/4])  
+    lcyl(size = sep, depth = depth);
+  translate([2*sep,0,0])  
+    binary_rec(n = n, size = size, depth = depth, sep = sep);  
+}
+
+module binary_rec(n, size, depth, sep){
+  if(n != 0){
+    if(n % 2 == 0){
+      translate([size+sep,0,0])
+        binary_rec(n = n/2, size = size, depth = depth, sep = sep);
+    }
+    else{
+      lcyl(size = size, depth = depth);
+      translate([size+sep,0,0])
+        binary_rec(n = (n-1)/2, size = size, depth = depth, sep = sep);
+    }
+  }
+} 
+
+binary(n = 23, size = 2, depth = 2, sep = 1);

scad/base/headband.scad

@@ -1,6 +1,7 @@
 use <bezier_extrusion.scad>;
+use <binary.scad>
 
-module headband(thickness, height){
+module headband(thickness, height, vers = false, vers_number = 0){
   rake_length = 3;
 
   shape_band = [[thickness/2,height/2-0.4],
@@ -29,7 +30,14 @@ module headband(thickness, height){
   ctrl_rake = [[-52,86],[-40,139.5],[40,139.5],[52,86]];
 
   union(){
-    bezier_extrude(ctrl = ctrl_band, shape = shape_band, sections = 64);
+    difference(){
+      bezier_extrude(ctrl = ctrl_band, shape = shape_band, sections = 64);
+      if(vers){
+        translate([23,-1,-1])
+          rotate([0,0,49])
+            binary(n = vers_number, size = 2, depth = 1.5, sep = 1);
+      }
+    }
     mirror([1,0,0]) bezier_extrude(ctrl = ctrl_band, shape = shape_band, sections = 64);
     bezier_extrude(ctrl = ctrl_end, shape = shape_band, sections = 16);
     translate([17,-8]){
@@ -43,4 +51,5 @@ module headband(thickness, height){
   }
 }
 
+
 headband(thickness = 2.7, height = 5.5);

scad/catears.scad

@@ -7,6 +7,10 @@ height = 5.5;
 epsilon = 0.001; //needs to be small but greater 0 so that the model doesn't break
 smoothing = true;
 
+vers_number = 1;
+vers = false;
+
+
 module catear(){
 
   ctrl_ear1 = [[49,96],[58,112],[63,137],[61.5,141]];
@@ -55,7 +59,7 @@ module catear(){
 
 module catears(){
   union(){
-    headband(thickness = thickness, height = height);
+    headband(thickness = thickness, height = height, vers = vers, vers_number = vers_number);
     catear();
     mirror([1,0,0]) catear();
   }