chiark / gitweb /
brompton-computer-guard: wip pbase
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 27 May 2014 21:39:34 +0000 (22:39 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 27 May 2014 21:39:34 +0000 (22:39 +0100)
brompton-computer-guard.scad

index 709ee11..050ba97 100644 (file)
@@ -10,6 +10,9 @@ arch_breadth = 25;
 
 hole_dia = 3 + 0.5;
 
+pbase_tab = 15;
+pbase_thick = 2;
+
 // computed
 
 arch_alpha = atan(arch_height / (arch_width/2));
@@ -28,7 +31,7 @@ module ArchCircle(rad){
     circle(rad, $fa=0.1);
 }
 
-module ArchProfile(){
+module ArchProfile(pbase){
   intersection(){
     translate([-200,0])
       square([400,200]);
@@ -38,7 +41,7 @@ module ArchProfile(){
        for (m=[0,1])
          mirror([m,0])
            translate([arch_width/2,0])
-           square([end_width, end_thick]);
+           square([end_width, pbase ? pbase_tab : end_thick]);
       }
       ArchCircle(arch_in_rad);
     }
@@ -59,8 +62,10 @@ module Holes(){
 
 module Arch(){
   difference(){
-    rotate([0,0,180])
-      linear_extrude(height=arch_breadth) ArchProfile();
+    rotate([0,0,180]) union(){
+      linear_extrude(height=arch_breadth) ArchProfile(false);
+      linear_extrude(height=pbase_thick) ArchProfile(true);
+    }
     Holes();
   }
 }