如何在3D中绘制向量（视觉动画）

GeoGebra 命令及参数

1. Textfield(x1) → ChampTexte1
2. Textfield(y1) → ChampTexte2
3. Textfield(z1) → ChampTexte3
4. Translate(O, Vector[(If[a ∧ b ∧ c ∧ 0 < o < 4, o / 4, 1] * Vector[O, O + (x1, 0, 0)])]) → O'
5. Vector(O, O') → u
6. Translate(OO, Vector[(If[a ∧ b ∧ c ∧ 0 < o < 4, 0, If[4 < o < 8, (o - 4) / 4, 1]] * Vector[OO, B])]) → A
7. Vector(O', A) → v
8. Translate(B, Vector[(If[a ∧ b ∧ c ∧ 0 < o < 8, 0, If[8 < o < 12, (o - 8) / 4, 1]] * Vector[B, C])]) → B'
9. Vector(A, B') → w
10. Translate(O, Vector[(If[a ∧ b ∧ c ∧ 0 < o < 12, 0, If[12 < o < 16, (o - 12) / 4, 1]] * Vector[O, C])]) → O'_1
11. Vector(O, O'_1) → d
12. Midpoint(O, OO) → D
13. Midpoint(OO, B) → E
14. Midpoint(B, C) → F
15. Midpoint(O, O'_1) → K
16. Segment(G, B) → f
17. Segment(OO, B) → g
18. Segment(B, C) → h
19. Segment(C, J) → i
20. Segment(C, H) → j
21. Segment(H, OO) → k
22. Segment(J, G) → l
23. Segment(G, O) → m
24. Segment(O, OO) → n
25. Segment(I, J) → p
26. Segment(H, I) → q
27. Segment(I, O) → r