用Authorware解数学题

    在解析几何中大家经常遇到作图难的问题，比如我们遇到这样一个题目，已知方程是X2+Y2cosα=1，当α从0度到180度变化时，该方程分别表示什么曲线？这个进行抽象思维不就可以了。尽管你自己理解，但是有人请教你，那该怎么把抽象变具体呢？呵呵，咱可以用Authorware把各个角度的曲线画出来，那就没有抽象可言了！

    准备工作　

    1、首先在流程线上拖一个计算图标，命名为“初始化”，双击打开其输入窗口，输入如下的内容：

angle:=0

h:=300

k:=200

Line(1,h,k-300,h,k+300)

Line(1,h-300,k,h+300,k)　

Line(1,h-100,k-100,h+100,k-100)

Line(1,h-100,k+100,h+100,k+100)

Line(1,h-100,k-100,h-100,k+100)

Line(1,h+100,k-100,h+100,k+100)

2、拖第二个计算图标到流程线上，命名为“角度转换”，双击打开其输入窗口，输入如下的内容：

jiaodu:=Pi*angle/180

x:=-100

x1:=100

3、再拖一个显示图标放到流程线上，双击打开其演示窗口，在适当的位置输入“当前角度为{angle}值”。（要注意那对花括号哟，必须是在英文状态下输入。）然后点击菜单“Modify→Icon→Properties”，在打开的显示图标属性对话框中，选中“Update Display Variables”复选项。

好了，准备工作先做到这里，保存一下，好东西还在后头呢！

画曲线过程

1、先拖一个交互图标到流程线上，然后在其右侧放一个组图标，在弹出的“Response Type”对话框中，选择“Conditional”，并将该组图标命名为“angle=90”（也要在英文状态下输入）。双击组图标，在其流程线上放一个计算图标，命名为“画线”，双击打开，在其窗口中输入如下内容：

Line(2,h-100,k-200,h-100,k+200)

Line(2,h+100,k-200,h+100,k+200)

放一个等待图标在它的下方，双击，设置其属性为“限时1秒”。最后放一个计算图标，命名为“转回”，双击打开，在其窗口中输入如下内容：

if angle=90 then

angle:=angle+10

GoTo(IconID@"角度转换")

end if

现在双击组图标上方的小等号，打开“Properties:Response” 对话框，将“Automatic”的值选择为“When Ture”，并将“Response”标签中的“Erase”的值选择为“Don’t Erase”

（图1）。

2、再拖两个组图标到组图标“angle=90”的右侧，这样，这两个组图标的交互属性设置就与“angle=90”完全相同了，不需要您再动手了。新拖过来的组图标分别命名为“angle<90”、“angle>90”。这样，整个程序的框架基本上就搭建起来了（图2）。

3、打开“angle<90”组图标，在其流程线上拖放一个决策图标，在其右侧，放两个计算图标，分别命名为“画图象”和“频率”。双击“画图象”计算图标，在其输入窗口内输入如下内容：

y:=SQRT((1-(x/100)**2)/COS(jiaodu))*100+k

Circle(2,x+h-2,y-2,x+h+2,y+2)

y:=-SQRT((1-(x/100)**2)/COS(jiaodu))*100+k

Circle(2,x+h-2,y-2,x+h+2,y+2)

双击“频率”计算图标，在其输入窗口内输入如下内容：

x:=x+1

此外，双击决策图标，在打开的“Properties:Decision Icon”对话框中，将“Repeat”的值选为“Until True”，并在其下方的输入框中输入：x>=100。 对了，别忘了，还要双击“画图象”计算图标上方的小菱形，打开分支属性对话框，将“Erase Contents”的值选为“Don’t Erase”。

现在您可以在决策图标的下方加一个等待图标，双击打开，设置其属性为“限时1秒”。其下再放一个计算图标，双击，在其输入窗口内输入如下内容：

if angle<=180 then

angle:=angle+10

GoTo(IconID@"角度转换")

end if Quit()

好了，现在这个“angle<90”组图标内的设置就算是全部完成了。完成后的流程图如图3所示。

4、“angle>90”组图标内的程序设计与“angle<90”组图标完全相同。所不同的就是“画图象”和“频率”计算图标里的内容。

双击“画图象”计算图标，在其输入窗口内输入如下内容：　

y:=