chiark / gitweb /
pin-hinge: wip
[reprap-play.git] / pin-hinge.scad
1 // -*- C -*-
2
3 $hinge_pin_dia = 0.795 + 0.35;
4 $hinge_main_dia = 4.0;
5 $hinge_inter_gap = 0.50;
6 $hinge_noncrit_gap = 1.0;
7
8 $fa = 3;
9 $fs = 0.05;
10
11 module HingePinPlan(){
12   circle(r= $hinge_pin_dia/2);
13 }
14
15 module HingeProngPlan(behind){
16   difference(){
17     hull(){
18       circle(r= $hinge_main_dia/2);
19       polygon([[0,0],
20                [-$hinge_main_dia/2, -behind],
21                [+$hinge_main_dia/2, -behind]]);
22     }
23     HingePinPlan();
24   }
25 }
26
27 module HingeGapPlan() {
28   circle(r = $hinge_main_dia/2 + $hinge_inter_gap);
29 }
30
31 module PlanDemo(){
32   HingeProngPlan(5);
33   %HingeGapPlan();
34 }
35
36 PlanDemo();