1029動畫步驟指令
1029動畫步驟指令
k1=If[k ≤ 0, 0, If[k ≥ 1, 1, k - 0]]
k2=If[k ≤ 1, 0, If[k ≥ 2, 1, k - 1]]
k3=If[k ≤ 2, 0, If[k ≥ 3, 1, k - 2]]
k4=If[k ≤ 3, 0, If[k ≥ 4, 1, k - 3]]
k5=If[k ≤ 4, 0, If[k ≥ 5, 1, k - 4]]
k6=If[k ≤ 5, 0, If[k ≥ 6, 1, k - 5]]
k7=If[k ≤ 6, 0, If[k ≥ 7, 1, k - 6]]
k8=If[k ≤ 7, 0, If[k ≥ 8, 1, k - 7]]
k9=If[k ≤ 8, 0, If[k ≥ 9, 1, k - 8]]
k10=If[k ≤ 9, 0, If[k ≥ 10, 1, k - 9]]
Translate[物件,向量]
Vector[起點，終點]
Rotate[物件,角度,中心點]
Angle[起始邊,頂點,終止邊]
Translate[Rotate[poly1,k2*pi/2,A],k2*Vector[A,F]]
A+0*(J-E)+k2*(K-A)+k3*(L-K)
C+0*(J-E)+0*(K-A)+k3*(L-K)
D+k1*(J-E)+0*(K-A)+k3*(L-K)
E+k1*(J-E)+k2*(K-A)+k3*(L-K)
A+0*(J-F)+k2*(K-A)+k3*(L-K)
C+0*(J-F)+0*(K-A)+k3*(L-K)
D+k1*(J-F)+0*(K-A)+k3*(L-K)
E+k1*(J-F)+k2*(K-A)+k3*(L-K)