chiark
/
gitweb
/
~ianmdlvl
/
reprap-play.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
air-hockey-puck: wip
[reprap-play.git]
/
air-hockey-puck.scad
1
// -*- C -*-
2
3
main_dia = 34.0;
4
post_base_dia = 14;
5
post_top_dia = 11;
6
overall_height = 31;
7
rim_height = 5;
8
rim_wall_th = 2;
9
base_th = 2;
10
11
$fs= 0.1;
12
$fa = 3;
13
14
module Elevation(){
15
hull(){
16
translate([0, overall_height - post_top_dia/2])
17
circle(r = post_top_dia/2);
18
square([ post_base_dia/2, 0.1 ]);
19
}
20
difference(){
21
square([ main_dia/2, rim_height ]);
22
translate([ -rim_wall_th, base_th ])
23
square([ main_dia/2, rim_height ]);
24
}
25
}
26
27
module Bat(){
28
rotate_extrude(){
29
intersection(){
30
Elevation();
31
square([100, 100]);
32
}
33
}
34
}
35
36
Bat();