易语言DNF连发工具源码拜托各位大神

.版本 2 .程序集 窗口程序集1 .程序集变量 按键 .子程序 __启动窗口_创建完毕 HOOK.安装键盘钩子 (&连发开关) .子程序 连发开关 .参数 键代码, 整数型 .参数 状态, 整数型 .如果真 (选择框1.选中 ＝真) .如果真 (状态 ≠ 257 且 键代码 ＝ 按键) .如果真 (时钟1.时钟周期 ≠ 到整数 (编辑框1.内容)) 时钟1.时钟周期 ＝ 到整数 (编辑框1.内容) .如果真结束 .如果真结束 .如果真 (状态 ＝ 257 且 键代码 ＝ 按键) 时钟1.时钟周期 ＝ 0 .如果真结束 .如果真结束 .子程序 __启动窗口_将被销毁 HOOK.卸载键盘钩子 () .子程序 _时钟1_周期事件 按键(按键, 3) 超级延时 (100, 0) 按键(按键, 4) .子程序 _按钮1_被单击 信息框 (“请点击确定后，按下需要连发的按键”, 0, ) .子程序 __启动窗口_按下某键, 逻辑型 .参数 键代码, 整数型 .参数 功能键状态, 整数型 按键＝ 键代码 信息框 (“设置成功！”, 0, ) .子程序 _按钮1_按下某键, 逻辑型 .参数 键代码, 整数型 .参数 功能键状态, 整数型 按键＝ 键代码 信息框 (“设置成功！”, 0, ) .子程序 _选择框1_按下某键, 逻辑型 .参数 键代码, 整数型 .参数 功能键状态, 整数型 按键＝ 键代码 信息框 (“设置成功！”, 0, ) .子程序 _编辑框1_获得焦点 编辑框1.内容 ＝“” .子程序 _选择框1_被单击 .如果真 (按键 ＝ 0) 信息框 (“请设置按键！”, 0, ) 选择框1.选中 ＝假 返回() .如果真结束 .如果真 (到整数 (编辑框1.内容) ＜ 1) 信息框 (“请输入正确速度！”, 0, ) .如果真结束 .如果 (选择框1.选中 ＝真) 编辑框1.禁止 ＝真 .否则 编辑框1.禁止 ＝假 ------------------------------------------------------------------------------- 组件： 编辑框1 （速度） 按钮1 （确定） 选择框1 （开始连发）