.版本 2 .程序集 窗口程序集1 .程序集变量 i, 整数型 .子程序 __启动窗口_创建完毕 圆角化窗口 (画板2.取窗口句柄 (), 15) ' ' 本源码来自三叶资源网(www.sanye.cx) .子程序 子程序 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 画板1.标记 ＝ 到文本 (横向位置) ' ' 本源码来自三叶资源网(www.sanye.cx) 画板1.清除 (, , , ) 画板1.画渐变矩形 (0, 0, 横向位置, 画板1.高度 ÷ 2, 1, #白色, #橙黄) 画板1.画渐变矩形 (0, 10, 横向位置, 画板1.高度 ÷ 2, 1, #橙黄, #白色) 画板1.复制 (0, 0, , , 画板2, , , ) 画板2.定位写出 (90, 5, “位置：” ＋ 到文本 (横向位置) ＋ “%”) ' ' 本源码来自三叶资源网(www.sanye.cx) .子程序 _时钟1_周期事件 i ＝ i ＋ 1 子程序 (i, 0, 0)