|
Tennisball challenge March 28, 2016 06:20AM |
Registered: 14 years ago Posts: 862 |
|
Re: Tennisball challenge March 28, 2016 04:29PM |
Registered: 11 years ago Posts: 590 |
module tennisball(
r, // radius of tennis ball
s, // width of seem
d, // deepening of seem
a, // skew angle
){
ca=cos(a);
f=sqrt(2-ca*ca)/ca;
difference(){
sphere(r);
for(a1=[[0,0,0],[0,90,180]])rotate(a1)
for(sz=[-1,1])scale([1,1,sz])
difference(){
rotate([a,0,0])cylinder(r1=0,r2=(r+1)*f+s/2*f,h=r+1);
rotate([a,0,0])cylinder(r1=0,r2=(r+1)*f-s/2*ca,h=r+1);
translate([-r,0,0])cube([2*r,2*r,2*r]);
}
}
color("red")sphere(r-d);
}
tennisball(r=50,s=10,d=1,a=25);
|
Re: Tennisball challenge March 29, 2016 09:04AM |
Registered: 14 years ago Posts: 862 |
|
Re: Tennisball challenge March 30, 2016 01:13PM |
Registered: 14 years ago Posts: 862 |