纸艺翻转模型动画

GeoGebra 命令及参数

1. Intersect(yAxis, xAxis) → Q
2. Line(N, O) → n
3. Line(L, M) → m
4. Vector((0, 0, (-offset))) → v
5. Translate(n, v) → n'
6. Rotate(E, (-α), m) → E'
7. Polygon(E', P, Q, F) → poly4, e'_1, p, q, f_1
8. Translate(poly4, Vector[v / 2]) → poly4'
9. Rotate(poly4', (-β), n') → poly4''
10. Translate(Rotate[poly4'', (-γ), Translate[m, Vector[(3 * v)]]], Vector[(v * (γ / 180)°)]) → poly4'''
11. Polygon(A, B, C, D) → poly1, a, b, c, d
12. Translate(m, Vector[(4 * v)]) → m'
13. Rotate(poly1, (-α), m) → poly1'
14. Rotate(F, (-α), m) → F'
15. Rotate(G, (-α), m) → G'
16. Polygon(E', F', G') → poly2', g', e', f'
17. Polygon(E, F, G) → poly2, g, e, f
18. Translate(Polygon[H, I, J, K], Vector[(0 * v)]) → poly3
19. Rotate(poly2', (-β), Translate[n, v]) → poly2''
20. Translate(Rotate[Rotate[poly3, (-β), Translate[n, v]], (-δ), Translate[n, Vector[(5 * v)]]], Vector[((5 * v) * (δ / 180)°)]) → poly3'
21. Rotate(poly1', (-γ), Translate[m, Vector[(3 * v)]]) → poly1''
22. Translate(Rotate[poly2'', (-γ), Translate[m, Vector[(3 * v)]]], Vector[((3 * v) * (γ / 180)°)]) → poly2'''
23. Translate(Rotate[poly4''', (-δ), Translate[n, Vector[(4 * v)]]], Vector[((4 * v) * (δ / 180)°)]) → poly6
24. Translate(Rotate[poly2''', (-δ), Translate[n, Vector[(4 * v)]]], Vector[((4 * v) * (δ / 180)°)]) → poly5
25. Point(xAxis) → R
26. Point(yAxis) → S
27. Point(zAxis) → T
28. Plane(Q, R, T) → l
29. Plane(S, T, Q) → o
30. Mirror(poly1'', l) → poly1'''
31. Mirror(poly3', o) → poly3''
32. Mirror(poly6, o) → poly6'
33. Mirror(poly6, l) → poly6'_1
34. Mirror(poly6', l) → poly6''
35. Mirror(poly5, l) → poly5'
36. Mirror(poly5, o) → poly5'_1
37. Mirror(poly5', o) → poly5''