基于扭棱正方形镶嵌的平铺动画

GeoGebra 命令及参数

1. Rotate(B, ((-q_1(a)) * 30°)) → B'
2. Midpoint(A, B') → C
3. Midpoint(O, B') → D
4. Midpoint(O, A) → E
5. Mirror(O, C) → O'
6. Polygon(O, A, O', B') → q1, o, a_1, o', b'
7. Polygon(O, B', 4) → poly1, f, g, h, i, F, G
8. Midpoint(B', O') → H
9. Midpoint(O', A) → I
10. Midpoint(G, O) → J
11. Midpoint(G, F) → K
12. Midpoint(D, K) → L
13. Polygon(B', O', 4) → poly2, j, k, l, m, M, N
14. Midpoint(F, N) → P
15. Mirror(B', P) → B''
16. Polygon(F, B', N, B'') → q2, f_1, n, n_1, b''
17. Midpoint(E, D) → Q
18. Midpoint(I, H) → R
19. Polygon(B', D, S, E, A, I, T, H) → poly3, p, d, s, e, a_2, i_1, t, h_1
20. Midpoint(B', F) → U
21. Polygon(O, J, U, F, K, D) → poly4, o_1, j_1, u, f_2, k_1, d_1
22. Midpoint(B', N) → V
23. Midpoint(O', M) → W
24. Midpoint(U, V) → Z
25. Midpoint(N, B'') → A_1
26. Midpoint(B'', F) → B_1
27. Midpoint(N, M) → C_1
28. Polygon(O', H, C_1, N, V, W) → poly5, q, h_2, c_1, n_2, v, w
29. Midpoint(B_1, A_1) → D_1
30. Polygon(U, F_1, V, B') → q3, u_1, r, v_1, b
31. Polygon(B_1, E_1, A_1, B'') → q4, b_1, e_1, c, g_1
32. Polygon(B'', F, G, O, A, O', M, N) → poly6, l_1, f_3, g_2, o_2, a_3, m_1, m_2, n_3
33. Vector(G, B'') → w_1
34. Vector(G, A) → p_1
35. Sequence(Sequence[Polygon[Translate[B'', Vector[(i * p_1) + (j * w_1)]], Translate[F, Vector[(i * p_1) + (j * w_1)]], Translate[G, Vector[(i * p_1) + (j * w_1)]], Translate[O, Vector[(i * p_1) + (j * w_1)]], Translate[A, Vector[(i * p_1) + (j * w_1)]], Translate[O', Vector[(i * p_1) + (j * w_1)]], Translate[M, Vector[(i * p_1) + (j * w_1)]], Translate[N, Vector[(i * p_1) + (j * w_1)]]], i, -3, 3], j, -3, 3) → l2
36. Sequence(Sequence[Translate[Lpo, Vector[(i * p_1) + (j * w_1)]], i, -3, 3], j, -3, 3) → l1