灯罩设计器

GeoGebra 命令及参数

1. Intersect(xAxis, yAxis) → A
2. Point(Circle[A, botrad]) → B
3. Segment(A, B) → f
4. Circle(A, height) → c
5. Intersect(c, yAxis, 2) → C
6. Point(Circle[C, toprad]) → D
7. Segment(C, D) → g
8. Ray(B, D) → h
9. Segment(B, D) → i
10. Intersect(h, yAxis) → E
11. Circle(E, A) → d
12. Point(d) → F
13. Rotate(F, α, E) → F'
14. Rotate(F, (-α), E) → F'_1
15. CircleArc(E, F'_1, F') → e
16. Segment(E, F'_1) → j
17. Segment(E, F') → k
18. Circle(E, inrad) → p
19. Intersect(p, j, 1) → H
20. Intersect(p, k, 1) → I
21. Angle(F'_1, E, F') → β
22. Rotate(F'_1, γ, E) → G
23. Rotate(G, γ, E) → G'
24. Segment(E, G) → l
25. Segment(E, G') → m
26. Intersect(p, l, 1) → J
27. Intersect(p, m, 1) → K
28. Rotate(F'_1, -2°, E) → L
29. Segment(C, A) → n