鼠标录制程序源码

部分代码：

.版本 2

.程序集 窗口程序集1, , , ' 本源码来自三叶资源网(www.sanye.cx)
.程序集变量 x, 整数型, , "0"
.程序集变量 y, 整数型, , "0"

.子程序 _时钟1_周期事件

加入成员 (x, 取鼠标水平位置 ())
加入成员 (y, 取鼠标垂直位置 ())

.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 1

.子程序 _按钮1_被单击

时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 1

.子程序 _时钟2_周期事件
.局部变量 a, 长整数型, 静态

a ＝ a ＋ 1
设置鼠标坐标 (x [a], y [a])
.如果真 (a ＝ 取数组成员数 (y))
    清除数组 (x)
    清除数组 (y)
    a ＝ 0
    时钟2.时钟周期 ＝ 0
.如果真结束
' 本源码来自三叶资源网(www.sanye.cx)

.子程序 _按钮3_被单击

销毁 ()

@易语言代码大全详解