旋转游戏

GeoGebra 命令及参数

1. Sequence(k, k, -4, 3) → Ln, {-4, -3, -2, -1, 0, 1, 2, 3}
2. Zip("prism" + (Text[k]), k, Lm) → Lname
3. Prism(Polygon[(4, -4, -4), (4, 4, -4), 4, xOyPlane], 1) → prism1, A, edge1, edge2, edge3, edge4, edgeAB, edgeBC, edgeCD, edgeAD, B, C, D, face1, face3, face4, face2, faceABCD
4. Prism(Polygon[(4, -4, -3), (4, 4, -3), 4, xOyPlane], 1) → prism2, E, edge5, edge6, edge7, edge8, edgeEF, edgeFG, edgeGH, edgeEH, F, G, H, face5, face7, face8, face6, faceEFGH
5. Prism(Polygon[(4, -4, -2), (4, 4, -2), 4, xOyPlane], 1) → prism3, I, edge9, edge10, edge11, edge12, edgeIJ, edgeJK, edgeKL, edgeIL, J, K, L, face9, face11, face12, face10, faceIJKL
6. Prism(Polygon[(4, -4, -1), (4, 4, -1), 4, xOyPlane], 1) → prism4, M, edge13, edge14, edge15, edge16, edgeMN, edgeNO, edgeOP, edgeMP, N, O, P, face13, face15, face16, face14, faceMNOP
7. Prism(Polygon[(4, -4, 0), (4, 4, 0), 4, xOyPlane], 1) → prism5, Q, edge17, edge18, edge19, edge20, edge41, edge42, edge43, edge44, R, S, T, face17, face18, face19, face20, face35
8. Prism(Polygon[(4, -4, 1), (4, 4, 1), 4, xOyPlane], 1) → prism6, U, edge21, edge22, edge23, edge24, edgeUV, edgeVW, edgeWZ, edgeUZ, V, W, Z, face21, face23, face24, face22, faceUVWZ
9. Prism(Polygon[(4, -4, 2), (4, 4, 2), 4, xOyPlane], 1) → prism7, A_1, edge25, edge26, edge27, edge28, edge29, edge31, edge32, edge30, B_1, C_1, D_1, face25, face27, face28, face26, face29
10. Prism(Polygon[(4, -4, 3), (4, 4, 3), 4, xOyPlane], 1) → prism8, E_1, edge33, edge34, edge35, edge36, edge37, edge39, edge40, edge38, F_1, G_1, H_1, face30, face32, face33, face31, face34
11. Rotate(prism1, (F1(t) * π), zAxis) → P1
12. Rotate(prism2, (F2(t) * π), zAxis) → P2
13. Rotate(prism3, (F3(t) * π), zAxis) → P3
14. Rotate(prism4, (F4(t) * π), zAxis) → P4
15. Rotate(prism5, (F5(t) * π), zAxis) → P5
16. Rotate(prism6, (F6(t) * π), zAxis) → P6
17. Rotate(prism7, (F7(t) * π), zAxis) → P7
18. Rotate(prism8, (F8(t) * π), zAxis) → P8