旋转对称 by CRDO

GeoGebra 命令及参数

1. Sequence(Rotate[A, i°], i, 1, 360) → list1
2. Circle(O, A) → k
3. Point(list1) → B
4. Angle(B, O, A) → α
5. Segment(O, A) → j
6. Segment(O, B) → l
7. If(e ∨ h, 180°, If[i, 90°, If[a, 72°, If[m ∨ p, 120°, If[n, 45°, If[c, 60°, 0°]]]]]) → matchAngle
8. Textfield(UserInput) → InputBox1
9. Rotate(pic10, (-α), O) → pic10'
10. Rotate(pic12, (-α), O) → pic12'
11. Rotate(pic1, (-α), O) → pic1'
12. Rotate(pic2, (-α), O) → pic2'
13. Rotate(pic5, (-α), O) → pic5'
14. Rotate(pic7, (-α), O) → pic7'
15. Rotate(pic9, (-α), O) → pic9'
16. Rotate(pic8, (-α), O) → pic8'
17. Element(list2, 1) → Answer
18. Rotate(pic4, (-α), O) → pic4'
19. Rotate(pic6, (-α), O) → pic6'
20. Rotate(pic11, (-α), O) → pic11'
21. Rotate(pic3, (-α), O) → pic3'