chiark / gitweb /
b247bd0bcdb20c02986af33e949ad48aefbf3eec
[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), sin(beta)]]);
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);