Authorware高级教程之做个闪闪红星

来源：网络时间：2011-05-11 11:11:49

　　做多媒体作品，总是希望能有一个不错的效果。这不，又想起小时候看电影时，八一电影制作厂片头上那光芒四射的红五星了。这也算是那个时代一个经典的效果吧。要是在咱们的多媒体作品中也能放上这么一个效果，呵呵，您想想，肯定够酷。现在，咱们就用Authorware来实现这个目标？

　　实现原理

　　假定有两个同心圆，让一个角的顶点就与这个圆心重合，那么它与两个同心圆必然都会有交点。我们可以利用Authorware的计算功能来计算出这两个点在屏幕上的坐标位置，然后用线段进行连接。这样，就得到一条线段，就用它来做光芒吧。

Authorware高级教程之做个闪闪红星
图1

　　改变角度，就会得到另一个线段。做满一周，就会得到一圈光芒。改变大小圆的直径，就会得到另一圈光芒。而这种改变，用一个循环语句岂不是很容易就可以做到？怎么样？原理是够简单吧？

　　实现过程

　　实现的过程非常简单，用到的图标只有三个：

　　1、在主流程线上放一个显示图标，导入一个五角星的图片。这就是那个红五星了。

　　2、在主流程线上再放一个决策图标，双击打开其属性对话框，将“Repeat”的值改为“Until Click/Keypress”。

　　3、最后放一个计算图标到决策图标的右侧，双击打开其输入窗口，输入如下内容：

　　h:=320
　　k:=240〖指定中心点的坐标〗
　　r1:=100
　　r2:=92〖指定大小两个圆的半径〗
　　repeat while r1〈=400〖指定大圆的范围。以上这些数据是可以根据实际需要自行改变的〗
　　SetFrame(1,RGB(255,0,0)) 〖指定光芒的颜色，此外为红色〗
　　angle:=-0.5*Pi　〖指定角度的初始值〗
　　repeat while angle〈=1.5*Pi　〖使角度正好完成一周〗
　　x1:=r1*COS(angle)+h
　　y1:=r1*SIN(angle)+k〖计算当前角终边与大圆交点的坐标值〗
　　x2:=r2*COS(angle)+h
　　y2:=r2*SIN(angle)+k〖计算当前角终边与小圆交点的坐标值〗
　　Line(3,x1,y1,x2,y2) 〖用线连接大圆交点与小圆交点〗
　　angle:=angle+Pi/18〖设置角度差〗
　　end repeat〖完成当前大小圆内的全部线段〗
　　r1:=r1+20
　　r2:=r2+20〖大小圆的半径各自增加20象素〗
　　end repeat