Authorware中怎么绘制动态抛物线

来源:网络时间:2011-05-11 11:11:20

  我们在制作CAI数学课件过程中,往往会用变量和函数来绘制动态的抛物线,让课件的内容更加丰富,加强课件的功能!笔者在此通过关于抛物线的绘制和抛物线性质的一个实例,来展现函数和变量在课件设计中的作用。当然设计更复杂、更符合教学要求的课件,需要熟练掌握Authorware函数和变量。本次制作的具体步骤如下:

  1、先在流程图上放入图1的内容(可不要说明)。

Authorware高级教程之绘制动态抛物线

图1

  2、在画坐标系群组中放入图2的内容,其中:

Authorware高级教程之绘制动态抛物线

图2

  setfill是图形内部填充颜色函数;

  SetFrame是线的颜色设置,SetLine是线段的样式设置;

  box、line是按参数在屏幕指定的位置绘制固定图形函数。

  (1)在坐标系的初值计算图标中写入:  SX:=320  SY:=240   

(2)坐标轴内容为:

  SetFill(1,RGB(150,255,200))  Box(0,5,5,635,475)  SetLine(2)  SetFrame(1,RGB(0,0,0))  Line(4,SX+(X-1)*KD,SY,SX-(X-1)*KD,SY)  Line(4,SX,SY-(Y-1)*KD,SX,SY+(Y-1)*KD)  (3)X轴上刻度标记内容为:

  SetLine(0)

  repeat while X〈7  Line(2,SX+X*KD,SY,SX+X*KD,SY-BJ)  X:=X+1  end repeat  (4)Y轴上刻度标记为:

  SetLine(0)  repeat while Y〈7  Line(2,SX,SY+Y*KD,SX+BJ,SY+Y*KD)  Y:=Y+1  end repeat

  3、交互图标内输入:

“请输入参数P:”

  4、在交互中的计算图标中输入:  “p:=NumEntry”必须命名为“*”

  5、在设置初值中写入:  y1:=-6  x1:=6  zl:=0.005  SetLine(0)

  6、在确定X、Y的取值范围中输入  repeat while y1*y1/2/p〉=x1  y1:=y1+zl  end repeat  x1:=y1*y1/2/p  Y:=y1

  7、在抛物线中输入:  repeat while y1〈-Y  y2:=y1+zl  x2:=y2*y2/2/p  Line(2,SX+x1*KD,SY+y1*KD,SX+x2*KD,SY+y2*KD)  x1:=x2  y1:=y2  end repeat  运行它,是不是可以用你输入的数据来画出抛物线呀!很有趣吧!还不快试试!

文章内容来源于网络,不代表本站立场,若侵犯到您的权益,可联系我们删除。(本站为非盈利性质网站) 联系邮箱:rjfawu@163.com
多特网友 2013-11-30 14:14:37 回复
有没有做出来的,?
多特网友 2013-11-30 14:14:37 回复
有没有做出来的,?