+++ /dev/null
-// -*- C -*-
-
-include <commitid.scad>
-include <utils.scad>
-
-pxp6012_rad = 22.5 / 2 + 0.5; // make circular hole this size in outer wall
-pxp6012_rad_outer = 32.0 / 2 - 0.5;
-
-s1930_y = 30.2 + 0.2;
-s1930_x = 22 + 0.2;
-s1930_y_outer = 36.4 + 0.2;
-s1930_x_outer = 27.6 + 0.2;
-
-s1930_recess = 3;
-s1930_around = 3;
-s1930_behind = 3;
-
-wallthick = 2.5;
-
-// origin is at centre on outer face wall
-// outside is towards positive x
-// mounting is vertical
-module S1930_Positive(){
- d = s1930_recess + s1930_behind;
- translate([-d/2, 0,0])
- cube([d,
- s1930_x_outer + s1930_around,
- s1930_y_outer + s1930_around], center=true);
-}
-module S1930_Negative(){
- cube([60, s1930_x, s1930_y],
- center=true);
- translate([1, 0,0])
- cube([s1930_recess*2+2, s1930_x_outer, s1930_y_outer],
- center=true);
-}
-
-module TestWall(){ ////toplevel
- sw_ctr = [25, wallthick, 25];
-
- rotate([0,0,-90]){
- difference(){
- union(){
- cube([50, wallthick, 42]);
- }
-
- translate([30, -1, 20])
- rotate([-90,0,0])
- cylinder(r = pxp6012_rad, h=10, $fn=60);
-
- rotate([90,0,0])
- Commitid_BestCount([15,40]);
- }
- }
-
- difference(){
- union(){
- cube([50, wallthick, 50]);
- translate(sw_ctr)
- rotate([0,0,90])
- S1930_Positive();
- }
-
- translate(sw_ctr) {
- rotate([0,0,90])
- S1930_Negative();
- }
- }
-}
-
-floorth = 2.5;
-ceilth = 2.5;
-innertube = 1.0 + 0.2;
-lidoverlap = 1.5;
-lidoverhang = 6;
-tubesealrad = 2.0;
-
-ts_xbox = 30;
-ts_ybox = 25;
-ts_cnrrad = 10;
-ts_zbox = 8;
-
-include <sealing-box.scad>
-
-module TestSealBox(){ ////toplevel
- TestSealBoxBox();
- translate(ts_cidoff)
- Commitid_BestCount([ts_xbox,ts_ybox] - 2*ts_cidoff);
-}
-
-module TestSealLid(){ ////toplevel
- difference(){
- TestSealBoxLid();
-
- translate([ts_xbox * .75, ts_ybox/2, 0])
- cylinder(h=100, r=5);
-
- translate([-wallthick + ts_cnrrad*.5,
- ts_cnrrad*.5 - wallthick,
- ts_zbox + ceilth])
- Commitid_BestCount([ts_xbox * .75 - 2.5 - (ts_cnrrad*.5),
- ts_ybox - (ts_cnrrad*.5 - wallthick)*2]);
- }
-}
-
-module TestSealLidPrint(){ ////toplevel
- rotate([180,0,0]) TestSealLid();
-}
-
-module ProfileDemos(){
- WallProfile();
- color("blue") FloorProfile();
- LidProfile();
- color("blue") CeilProfile();
-}
-
-//TestWall();
-//ProfileDemos();
-//TestSealBox();
-//TestSealLid();
-//FArcSegment_mask(350);