chiark / gitweb /
38efdd964008512bba7e3d769ce07085dad3b2ed
[reprap-play.git] / wardrobe-hook.scad
1 // -*- C -*-
2
3 module FArcSegment_mask(beta) {
4   for (i=[0 : 0.75 : 3]) {
5     rotate(i*beta/4)
6       polygon([[0, 0],
7                [1, 0],
8                [cos(beta/4), sin(beta/4)]]);
9   }
10 }
11
12 module FArcSegment(xc,yc,inrad,outrad,alpha,delta) {
13   translate([xc,yc]) {
14     intersection() {
15       difference() {
16         circle(r=outrad);
17         circle(r=inrad);
18       }
19       rotate(alpha) scale(outrad*2) {
20         FArcSegment_mask(delta);
21       }
22     }
23   }
24 }
25
26 FArcSegment(10,10, 20,30, 20,10);