.版本 2 .程序集 窗口程序集1 .程序集变量 x, 整数型, , , 圆的横坐标 .程序集变量 y, 整数型, , , 圆的纵坐标 .程序集变量 sx, 整数型, , , 圆的横步长 .程序集变量 sy, 整数型, , , 圆的纵步长 .程序集变量 圆直径, 整数型 .子程序 __启动窗口_创建完毕 圆直径 ＝ 20 .子程序 _时钟1_周期事件 画板1.清除 (, , , ) .如果真 (x ＋ 圆直径 ＋ sx ＞ 取用户区宽度 () 或 x － 圆直径 ＋ sx ＜ －圆直径) sx ＝ －sx .如果真结束 .如果真 (y ＋ 圆直径 ＋ sy ＞ 取用户区高度 () 或 y － 圆直径 ＋ sy ＜ －圆直径) sy ＝ －sy .如果真结束 x ＝ x ＋ sx y ＝ y ＋ sy 置随机数种子 () 画板1.刷子颜色 ＝ 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)) 画板1.画笔颜色 ＝ 画板1.刷子颜色 画板1.画椭圆 (x, y, x ＋ 圆直径, y ＋ 圆直径) .子程序 __启动窗口_尺寸被改变 画板1.左边 ＝ 0 画板1.顶边 ＝ 0 画板1.宽度 ＝ 取用户区宽度 () 画板1.高度 ＝ 取用户区高度 () x ＝ 30 y ＝ 30 sx ＝ 10 sy ＝ 10 时钟1.时钟周期 ＝ 100