纸艺模型3D演示
几何画板及绘图内容加载中,请稍等……
①这个范例演示了从书籍《Action Modular Origami》中折叠的纸艺模型的动画过程;②涉及的核心数学概念包括立体几何、向量运算、几何变换等;③作图要点提炼了OrthogonalLine, Dilate, Intersect, Line, Vector, Translate, Polygon, Midpoint, Rotate, Mirror, Sequence等GeoGebra命令和对象的使用;④适合高中及以上学段学习立体几何、几何作图及空间想象能力的学生。
GeoGebra 命令及参数
OrthogonalLine(OOO, xOyPlane) → sDilate(C, ribbonCut, B) → C'_1Intersect(xAxis, yAxis) → ALine(B, A) → qVector(A, B) → vTranslate(A, u) → DPolygon(A, D, nSides, xOyPlane) → poly2, f, F, G, H, I, J, g, h, i, j, k, l, m, EMidpoint(D, H) → OOVector(OO, OOO) → wRotate(B, rot, OO) → B'Polygon(A, B, C) → poly1, c, a, bOrthogonalLine(K, a, xOyPlane) → nIntersect(n, b) → LRotate(L, 180°, A) → L'Rotate(L', rot, OO) → L''OrthogonalLine(L', n, xOyPlane) → pIntersect(p, q) → MRotate(M, rot, OO) → M'Mirror(K, c) → K'Rotate(K', rot, OO) → K''Polygon(K'', L'', M', B') → base', k'', l'', m', b'Polygon(K', L', M, B) → base, k', l', m_1, b_1Intersect(k', k'') → PVector(A, A'') → eTranslate(B, e_2) → B'_2Translate(B, e_0) → B'_3Translate(K', e_0) → K''_2Translate(K', e_2) → K''_1Translate(C'_1, e_0) → C_1Translate(C'_1, e_2) → B_1Dilate(C, topCut, K) → C'Translate(C', e_0) → C''_1Translate(C', e_2) → C''Sequence(Polygon[Rotate[A, (n * rot), OO], Rotate[B, (n * rot), OO], Rotate[C, (n * rot), OO]], n, 0, nSides, 1) → list1Polygon(A, L, K, B) → ribbon, a_1, l_1, k_1, b_2OrthogonalLine(N, a, xOyPlane) → rIntersect(r, b) → OPolygon(K, L, O, N) → top, k_2, l_2, o, n_1Sequence(Polygon[Rotate[K', (n * rot), OO], Rotate[L', (n * rot), OO], Rotate[M, (n * rot), OO], Rotate[B, (n * rot), OO]], n, 0, nSides, 1) → list2Sequence(Polygon[Rotate[A, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[K, (n * rot), OO], Rotate[B, (n * rot), OO]], n, 0, nSides, 1) → list3Rotate(A, rot, OO) → A'Rotate(L, rot, OO) → L'_1Rotate(K, rot, OO) → K'_1Rotate(B, rot, OO) → B'_1Polygon(A', L'_1, K'_1, B'_1) → ribbon', a', l'_1, k'_1, b'_1Rotate(K, rot, OO) → K'_2Rotate(L, rot, OO) → L'_2Rotate(O, rot, OO) → O'Rotate(N, rot, OO) → N'Polygon(K'_2, L'_2, O', N') → top', k'_2, l'_2, o', n'Polygon(B, D, M', L'', A, L, K) → ribbonCut_1, b_3, d, m'_1, l''_1, a_2, l_3, k_3Polygon(P, L', M, L'') → baseCut, p_1, l'_3, m_2, l''_2Intersect(b, a_1) → QIntersect(m', d) → RIntersect(b, a_1) → SIntersect(m', d) → TIntersect(m', d) → UIntersect(b, l_2) → VIntersect(m', d) → WIntersect(b, l_2) → ZIntersect(b, m') → A_1Polygon(B, D, A_1, L, C'_1) → ribbonLong, b_4, d_1, a_3, l_4, c'_1Translate(Sequence[Polygon[Rotate[B, (n * rot), OO], Rotate[D, (n * rot), OO], Rotate[A_1, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[C'_1, (n * rot), OO]], n, 0, nSides, 1], w) → listRibbonLongRotate(Translate[Sequence[Polygon[Rotate[B, (n * rot), OO], Rotate[D, (n * rot), OO], Rotate[M', (n * rot), OO], Rotate[L'', (n * rot), OO], Rotate[A, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[K, (n * rot), OO]], n, 0, nSides, 2], w], α, s) → listRibbonCutRotate(Translate[Sequence[Polygon[Rotate[K, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[O, (n * rot), OO], Rotate[N, (n * rot), OO]], n, 0, nSides, 2], w], α, s) → listTopRotate(Translate[Translate[Sequence[Polygon[Rotate[P, (n * rot), OO], Rotate[L', (n * rot), OO], Rotate[M, (n * rot), OO], Rotate[L'', (n * rot), OO]], n, 1, nSides, 2], w], Vector[(-3 * e_0)]], α, s) → listBaseCut2Rotate(Translate[Translate[Sequence[Polygon[Rotate[B, (n * rot), OO], Rotate[D, (n * rot), OO], Rotate[M', (n * rot), OO], Rotate[L'', (n * rot), OO], Rotate[A, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[K, (n * rot), OO]], n, 1, nSides, 2], Vector[(-e_0)]], w], α, s) → listRibbonCut2Rotate(Translate[Sequence[Polygon[Rotate[K, (n * rot), OO], Rotate[L, (n * rot), OO], Rotate[O, (n * rot), OO], Rotate[N, (n * rot), OO]], n, 1, nSides, 2], w], α, s) → listTop2Translate(listTop2, e) → listTop2'Translate(listTop, e) → listTop'Polygon(C''_1, C_1, B_1, C'') → SideTop, t, f_1, g_1, h_1Polygon(B_1, B'_2, B'_3, C_1) → SideRibbon, i_1, j_1, q_1, r_1Translate(O, e_2) → O'_1Polygon(O, C', C'', O'_1) → SideCut, o_1, c'_3, c''_1, o'_1Polygon(B'_2, K''_1, K''_2, B'_3) → SideBase, s_1, t_1, c_1, e_1Translate(Sequence[Rotate[SideCut, (n * rot), OO], n, 0, nSides, 2], w) → listSideCutTranslate(Sequence[Rotate[SideCut, (n * rot), OO], n, 1, nSides, 2], w) → listSideCut2Rotate(Translate[Translate[Sequence[Polygon[Rotate[P, (n * rot), OO], Rotate[L', (n * rot), OO], Rotate[M, (n * rot), OO], Rotate[L'', (n * rot), OO]], n, 0, nSides, 2], w], Vector[(-2 * e_0)]], α, s) → listBaseCutTranslate(listRibbonCut2, Vector[e + (2 * e_0)]) → listRibbonCut2'Rotate(Translate[Sequence[Rotate[SideTop, (n * rot), OO], n, 0, nSides, 2], w], α, s) → listSideTopRotate(Translate[Sequence[Rotate[SideTop, (n * rot), OO], n, 1, nSides, 2], w], α, s) → listSideTop2Rotate(Translate[Sequence[Rotate[SideRibbon, (n * rot), OO], n, 0, nSides, 2], w], α, s) → listSideRibbonRotate(Translate[Sequence[Rotate[SideBase, (n * rot), OO], n, 0, nSides, 2], w], α, s) → listSideBaseRotate(Translate[Sequence[Rotate[SideRibbon, (n * rot), OO], n, 1, nSides, 2], w], α, s) → listSideRibbon2Rotate(Translate[Sequence[Rotate[SideBase, (n * rot), OO], n, 1, nSides, 2], w], α, s) → listSideBase2Translate(listRibbonCut, e) → listRibbonCut'Translate(listBaseCut, Vector[e + (6 * e_0)]) → listBaseCut'Translate(listBaseCut2, Vector[e + (5 * e_0)]) → listBaseCut2'
AI 绘图提示语参考
绘制一个由纸折叠而成的三维模型动画,展示其展开和折叠的过程。模型基于《Action Modular Origami》一书中的描述,包含多个几何面和边,通过旋转和镜像操作形成。动画展示模型从平面图形逐渐折叠成立体形态,过程中涉及多个几何变换,如平移、旋转和镜像,以及向量运算和几何构造。
以上提示语为根据原始绘图命令整理而来,仅供参考。