ar
/
3dparts
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

small update for the wheel, just cosmetics.

master
Robert "ar" Gerus 2013-06-06 19:32:56 +02:00
parent 9606e7364b
commit dc8ef1eb80
1 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
wheel.scad
View File

@ -1,12 +1,13 @@
$fn=100;
module wheel(radius, width, thickness, spokes) {
echo("axle width:", (radius-thickness)/(spokes));
union() {
difference() {
// basis for our wheel - a sphere
sphere(radius);
// upper cut-out
translate([0,0,width/2])
translate([0,0,(width/2)])
cylinder(radius-(width/2) +1, radius, radius, 0);
// lower cut-out
translate([0,0,-radius -1])
@ -16,14 +17,16 @@ module wheel(radius, width, thickness, spokes) {
removing 1 from z on translate and making the cylinder
higher by two to generate slightly more valid objects
*/
translate([0,0,-width/2 -1])
cylinder(width+2, radius-thickness, radius-thickness, 0);
translate([0,0,-(width/2) -1])
cylinder(width +2, radius-thickness, radius-thickness, 0);
}
// spokes
for (i = [0:(360/spokes):360]) {
rotate([0,0,i])
translate([-(radius-thickness),-(radius-thickness)/(spokes*2), -(width/2)])
cube([(radius-thickness), (radius-thickness)/(spokes), width]);
union() {
for (i = [0:(360/spokes):360]) {
rotate([0,0,i])
translate([-(radius-thickness),-(radius-thickness)/(spokes*2), -(width/2)])
cube([(radius-thickness), (radius-thickness)/(spokes), width]);
}
}
}
}
}