鼠标连点器（易语言）

'**************************************************************************************************
' 鼠标连点器
' 功能：调节连点速度和控制连点次数
'**************************************************************************************************

' 定义常量
Const WM_LBUTTONDOWN = &H201
Const WM_LBUTTONUP = &H202
Const WM_MOUSEMOVE = &H200
Const VK_ESCAPE = 27

' 定义变量
Dim nInterval, nCount, nMaxCount, bCountEnabled

' 初始化变量
nInterval = 100
nCount = 0
nMaxCount = 0
bCountEnabled = False

' 创建窗口
CreateWindow "鼠标连点器", 0, 0, 300, 200, WS_CAPTION Or WS_SYSMENU, 0

' 创建控件
CreateLabel "连点速度（毫秒）：", 20, 20, 120, 20
CreateEdit nInterval, 150, 20, 120, 20
CreateLabel "连点次数：", 20, 60, 120, 20
CreateEdit nMaxCount, 150, 60, 120, 20
CreateCheckBox "启用连点次数", bCountEnabled, 20, 100, 120, 20
CreateButton "开始连点", 20, 140, 120, 30, 1
CreateButton "