用Authorware解数学题

用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:=SQRT((1-(x/100)**2)/COS(jiaodu))*100+k
Circle(2,h+x-2,y-2,h+x+2,y+2)
y:=-SQRT((1-(x/100)**2)/COS(jiaodu))*100+k
Circle(2,h+x-2,y-2,h+x+2,y+2)
y1:=SQRT((1-(x1/100)**2)/COS(jiaodu))*100+k
Circle(2,h+x1-2,y1-2,h+x1+2,y1+2)
y1:=-SQRT((1-(x1/100)**2)/COS(jiaodu))*100+k
Circle(2,h+x1-2,y1-2,h+x1+2,y1+2)
双击“频率”计算图标，在其输入窗口内输入如下内容：
x:=x-1
x1:=x1+1
此外，双击这个组图标流程线上决策图标，其“Repeat”的值选为“Until True”，并在其下方的输入框中输入：x<=-200。

好了完成!执行一下，不同角度情况下的各种曲线清清楚楚、曲线随角度的变化也可以看得明明白白。

嘿嘿，这种感觉如何？快在你的“学生”面前显露一番吧！。