.程序集 窗口程序集1.程序集变量 数组, 整数型, , "3".程序集变量 冠军, 整数型.程序集变量 终点, 整数型.程序集变量 到终点个数, 整数型.子程序 显示物体动画物体.缩放比 ＝ 212动画物体.类型值 ＝ 0数组 [1] ＝ 动画框.创建物体 (动画物体, 10, 30, 真, “1”)动画框.置层次 (数组 [1], 1)动画框.置图片 (数组 [1], #兔子一号, )动画物体.缩放比 ＝ 500数组 [2] ＝ 动画框.创建物体 (动画物体, 10, 100, 真, “2”)动画框.置层次 (数组 [2], 1)动画框.置图片 (数组 [2], #乌龟一号, )数组 [3] ＝ 动画框.创建物体 (动画物体, 10, 170, 真, “3”)动画框.置层次 (数组 [3], 1)动画框.置图片 (数组 [3], #小猪一号, )动画物体.缩放比 ＝ 1500动画物体.类型值 ＝ 1终点 ＝ 动画框.创建物体 (动画物体, 666, -10, 假, “终点”)动画框.置图片 (终点, #终点线, 0)动画框.置层次 (终点, 1).子程序 __启动窗口_创建完毕显示物体 ().子程序 _按钮1_被单击冠军 ＝ 0终点 ＝ 0动画框.播放动画 (数组 [1], 0, , , )动画框.播放动画 (数组 [2], 0, , , )动画框.播放动画 (数组 [3], 0, , , )动画框.自动前进 (数组 [1], 到数值 (编辑框1.内容), 30, , , 真, , 真, , )动画框.自动前进 (数组 [2], 到数值 (编辑框2.内容), 30, , , 真, , 真, , )动画框.自动前进 (数组 [3], 到数值 (编辑框3.内容), 30, , , 真, , 真, , ).子程序 _按钮2_被单击动画框.销毁所有物体 ()显示物体 ().子程序 显示冠军.参数 冠军号, 整数型.局部变量 标识值_临时1, 整数型.局部变量 标识值_临时2, 整数型.判断开始 (冠军号 ＝ 数组 [1])标识值_临时1 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置图片 (标识值_临时1, #兔子一号, )动画框.播放动画 (标识值_临时1, 0, , , )标识值_临时2 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置文本 (标识值_临时2, “兔子赢了！”, , ).判断 (冠军号 ＝ 数组 [2])标识值_临时1 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置图片 (标识值_临时1, #乌龟一号, )动画框.播放动画 (标识值_临时1, 0, , , )标识值_临时2 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置文本 (标识值_临时2, “乌龟赢了！”, , ).判断 (冠军号 ＝ 数组 [3])标识值_临时1 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置图片 (标识值_临时1, #小猪一号, )动画框.播放动画 (标识值_临时1, 0, , , )标识值_临时2 ＝ 动画框.创建物体 (动画物体, 200, 200, 真, )动画框.置文本 (标识值_临时2, “小猪赢了！”, , ).默认.判断结束.子程序 _动画框_碰撞到物体.参数 碰撞物体标识值, 整数型.参数 碰撞前横坐标, 整数型.参数 碰撞前纵坐标, 整数型.参数 被碰撞物体标识值, 整数型到终点个数 ＝ 到终点个数 ＋ 1.如果真 (冠军 ＝ 0)冠军 ＝ 碰撞物体标识值.如果真结束.如果真 (到终点个数 ＝ 3)显示冠军 (冠军).如果真结束
