《第06章-主题动画典例简析》由会员分享，可在线阅读，更多相关《第06章-主题动画典例简析（43页珍藏版）》请在金锄头文库上搜索。
1、Maple 的图形动画技术用 Maple(69)制作数学动画课件1第六章第六章 主题动画典例简析主题动画典例简析图图 6-1 单位圆上的三角函数线单位圆上的三角函数线图 6- 1 单位圆上的三角函数线（连环画） restart:with(plots): r:=1: M:=11:x:=t-r*cos(t):y:=t-r*sin(t):u:=i*2*Pi/M+0.001: f:=u-r*cos(u):g:=u-r*sin(u):z:=t-t*tan(u): plot(x(t),y(t),t=02*Pi,v,z(v),v=- 22,scaling=constrained,view=-22,- 22,
2、color=green,magenta):; plot(0,0,f(u),0,f(u),0,f(u),g(u),r,0,r,r*ta n(u),0,r,r*cot(u),r,scaling=constrained,view=-22,- 22,color=red,blue,black,navy,thickness=3):; Q1:=display(seq(plot(x(t),y(t),t=02*Pi,v,z(v),v=- 22,view=-22,- 22,color=blue,magenta),i=0M),insequence=true,scaling= constrained): Q2:=di
3、splay(seq(plot(0,0,f(u),0,f(u),0,f(u),g(u), r,0,r,r*tan(u),0,r,r*cot(u),r,view=-22,- 22,color=red,blue,black,khaki,thickness=3),i=0M),inse quence=true,scaling=constrained): display(Q1,Q2);下面的一段，是额外附加的语句段落。作用是把所完成的主题动画用最清晰的 形式显示为分帧图形，以便送进本书稿做成图 6.1 所示的连环画（参见 5.5 命题第编第 6 章 主题动画典例简析231） 。 QQ:=display(Q
4、1,Q2): for i from 1 to M do PLOT(op(op(i,op(1,QQ),AXESTICKS(0,0),SCALING(CONSTRAINED) od;restart:with(plots):M:=6: r:=1:f:=u-r*cos(u):g:=u-r*sin(u): plot(f(u),g(u),u=02*Pi,color=green):P:=%: animate(plot,0,0,f(u),0,f(u),0,f(u),g(u),r,0, r,r*tan(u),0,r,r*cot(u),r,color=red,blue,black,go ld,thickness=
5、3,u=0.0012*Pi,frames=M):QQ1:=%: animate(plot,t,t*tan(u),t=- 22,u=0.0012*Pi,color=magenta,frames=M):QQ2:=%: display(QQ1,QQ2,P,scaling=constrained,view=-22,-22);图图 6-2 正弦曲线的生成正弦曲线的生成图 6- 2 正弦曲线的生成（连环画） restart:with(plots): N:=12:M:=72: Q0:=plotsanimatecurve(x+3/2,sin(x),x=02*Pi,frames=N+1, color=blue,
6、thickness=2):; v:=2*Pi*i/N:Maple 的图形动画技术用 Maple(69)制作数学动画课件3u:=2*Pi*i/M: Q1:=plot(cos(t),sin(t),t=02*Pi,scaling=constrained):; Q2:=display(seq(plot(0,0,cos(v),sin(v),cos(v),0,cos( v),sin(v),v+3/2,sin(v),v+3/2,0,color=blue,thickness=1),i =0N),scaling=constrained,insequence=true):; Q3:=plot(3/2,- 2,3/
7、2,2,scaling=constrained,color=black,thickness=1):; F:=i-evalf(u+3/2,0,u+3/2,sin(u): FF:=n-CURVES(seq(F(i),i=0M/N*n): Q4:=display(seq(FF(n),n=0N),scaling=constrained,insequence =true,color=green):display(Q0,Q1,Q2,Q3,Q4,tickmarks=0,0,title=“Zhengxianquxia n de xingchengn Sheji:ZYC如果使用高版本的 animate，下面是实
8、现方案之一。 restart:with(plottools):with(plots): P:=display(plot(t,sin(t),t=02*Pi,color=green,linestyle=3), plot(cos(t)-2,sin(t),t=02*Pi),plot(t,0,t=- 3.22*Pi+.2,color=black),plot(-2,s,s=- 1.21.2,color=black),plot(0,s,s=-2.22.2,color=black): F := proc(t) display(line(-2,0,cos(t)-2,sin(t),color=blue), lin
9、e(cos(t)-2,sin(t),t,sin(t),color=blue), point(cos(t)- 2,sin(t),symbol=circle,symbolsize=12,color=black), point(t,sin(t),symbol=circle,symbolsize=12,color=black), plot(sin(x),x=0t,view=-37,-55,thickness=3);end: animate(F,t,t=02*Pi,background=P,scaling=constrained,axe s=box,tickmarks=0,0,frames=12,axe
10、s=none);图图 6-3 位相变化着的正弦曲线位相变化着的正弦曲线第编第 6 章 主题动画典例简析4图 6- 3 位相变化着的正弦曲线（连环画）restart:with(plots):with(plottools): a:=proc(i,N) if i=N and i=2.5*N then Pi/4 fi; end:;N:=20: display(seq(plot(x,sin(x- a(i,N),x=a(i,N)2*Pi+a(i,N),thickness=2),i=04*N),inseq uence=true);Q:=%:QA1:=plot(x,sin(x),x=02*Pi,color=b
11、lue,thickness=3):Q1:=plot(x,sin(x+Pi/3),x=-Pi/32*Pi- Pi/3,color=blue,thickness=3): Q2:=display(point(0,0): F:=proc(Q1,Q2,i,k) if i=k then Q1; else Q2 fi; end:;Maple 的图形动画技术用 Maple(69)制作数学动画课件5QF1:=display(seq(F(Q1,Q2,i,20),i=04*N),insequence=true,vie w=-1.27.4,-1.21.2):;Q21:=plot(x,sin(x- Pi/4),x=Pi
12、/42*Pi+Pi/4,color=blue,thickness=3): Q22:=display(point(0,0):QF2:=display(seq(F(Q21,Q22,i,50),i=04*N),insequence=true,v iew=-1.27.4,-1.21.2):;display(Q,QA1,QF1,QF2);图图 6-4 角频变化着的正弦曲线连环画面角频变化着的正弦曲线连环画面图 6- 4 角频变化着的正弦曲线（连环画）restart:with(plots):with(plottools): w:=proc(i,N) if iN and i2*N then 2 fi; en
13、d:;N:=20: plotsdisplay(seq(plot(x,sin(w(i,N)*x),x=02*Pi/w(i,N), thickness=2),i=04*N),insequence=true);Q:=plotsdisplay(seq(plot(x,sin(w(i,N)*x),x=02*Pi/w(i,N) ,thickness=2),i=04*N),insequence=true):第编第 6 章 主题动画典例简析6QA1:=plot(x,sin(x),x=02*Pi,color=blue,thickness=3):Q1:=plot(x,sin(x/2),x=02*Pi*2,color
14、=blue,thickness=3): Q2:=display(point(0,0): F:=proc(Q1,Q2,i,k) if i=k then Q1; else Q2 fi; end:;QF1:=display(seq(F(Q1,Q2,i,20),i=04*N),insequence=true,vie w=-14*Pi,-1.21.2):;Q21:=plot(x,sin(2*x),x=0Pi,color=blue,thickness=3): Q22:=display(point(0,0):QF2:=display(seq(F(Q21,Q22,i,40),i=04*N),insequenc
15、e=true,v iew=-14*Pi,-1.21.2):;display(Q,QA1,QF1,QF2,title=“Jiaopin bianhua de Zhengxian quxian nSheji:ZXD图图 6-5 不同底的指数函数不同底的指数函数*图 6- 5 不同底的指数函数（连环画） with(plots): N:=16: animate(4-t)x,x=-44,t=03.75,frames=N,view=-44,- .58,thickness=3,color=blue):Maple 的图形动画技术用 Maple(69)制作数学动画课件7Q1:=animate(4-t)x,x=- 44,t=03.75,frames=N,thickness=3,color=blue,view=-44,- .58):Q2:=textplot(0.1,9,“a=“,align=LEFT,font=TIMES,BOLD,16,co lor=blue,view=-44,-.511): Q3:=textplot(0,11,“y=ax de tuxiang“,font=TIMES, BOLD,14,color=b
