网站 › 『编程语言讨论求助区』 › 求大神帮我看看为什么我的子程序无限循环无法使用F8停止

皇朝兵哥哥 发表于 2019-9-15 19:48

求大神帮我看看为什么我的子程序无限循环无法使用F8停止

本帖最后由 皇朝兵哥哥 于 2019-9-15 19:49 编辑

.版本 2
.支持库 eAPI
.支持库 shellEx

.程序集 窗口程序集_启动窗口
.程序集变量 F7, 整数型
.程序集变量 F8, 整数型

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


.判断循环首 (取启动时间 () ≠ 0)
    子程序1 ()
    子程序2 ()
    子程序3 ()
    子程序4 ()
    子程序5 ()
    子程序6 ()
    子程序7 ()
    子程序8 ()
    子程序9 ()
    子程序10 ()
    子程序11 ()
.判断循环尾 ()




子程序1 ()

.子程序 子程序1

.如果真 (宗门宝库.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1189, 489, 0)
    延时 (1000)
    模拟鼠标点击 (1154, 533, 0)
    延时 (1000)
    模拟鼠标点击 (1104, 339, 0)
    延时 (1000)
    模拟鼠标点击 (1105, 438, 0)
    延时 (1000)
    模拟鼠标点击 (865, 772, 0)
    延时 (1000)
    模拟鼠标点击 (1104, 339, 0)
    延时 (1000)
    模拟鼠标点击 (1105, 438, 0)
    延时 (1000)
    模拟鼠标点击 (1177, 216, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 宗门宝库
.如果真结束

子程序2 ()

.子程序 子程序2

.如果真 (宗门救助.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    模拟鼠标点击 (1082, 733, 0)
    延时 (1000)
    模拟鼠标点击 (960, 855, 0)
    延时 (1000)
    模拟鼠标点击 (1176, 214, 0)
    延时 (1000)
    ' 功能代码 宗门救助
.如果真结束

子程序3 ()

.子程序 子程序3

.如果真 (宗门任务.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1216, 487, 0)
    延时 (1000)
    模拟鼠标点击 (929, 729, 0)
    延时 (1000)
    模拟鼠标点击 (845, 470, 0)
    延时 (1000)
    ' 接取/领奖 重复两次01
    模拟鼠标点击 (844, 625, 0)
    延时 (1000)
    ' 放弃任务操作取消
    模拟鼠标点击 (845, 470, 0)
    延时 (1000)
    ' 接取/领奖 重复两次02
    模拟鼠标点击 (895, 468, 0)
    延时 (1000)
    模拟鼠标点击 (955, 625, 0)
    延时 (1000)
    模拟鼠标点击 (1174, 213, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 宗门任务
.如果真结束

子程序4 ()

.子程序 子程序4

.如果真 (宗门御敌.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1216, 487, 0)
    延时 (1000)
    模拟鼠标点击 (1130, 945, 0)
    延时 (1000)
    ' 宗门界面选择进入宗门御敌
    模拟鼠标点击 (960, 500, 0)
    延时 (1000)
    ' 进入菊斗罗月光
    模拟鼠标点击 (960, 600, 0)
    延时 (1000)
    ' 选择千仞雪
    模拟鼠标点击 (960, 622, 0)
    延时 (1000)
    ' 进入千仞雪
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 宗门御敌
.如果真结束

子程序5 ()

.子程序 子程序5

.如果真 (魂兽森林.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1284, 536, 0)
    延时 (1000)
    模拟鼠标点击 (1158, 639, 0)
    延时 (1000)
    ' 这里魂兽森林的BOSS为1900年
    模拟鼠标点击 (959, 698, 0)
    延时 (1000)
    ' 确认 开始挑战
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 判断 若BOOS已死亡，则关闭该界面
    ' 功能代码 魂兽森林
.如果真结束

子程序6 ()

.子程序 子程序6

.如果真 (世界首领.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1284, 536, 0)
    延时 (1000)
    模拟鼠标点击 (1041, 951, 0)
    延时 (1000)
    ' 这里切换BOSS界面为 世界首领
    模拟鼠标点击 (963, 759, 0)
    延时 (1000)
    ' 进入 开始挑战
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 判断 若BOOS已死亡，则关闭该界面
    ' 功能代码 世界首领
.如果真结束

子程序7 ()

.子程序 子程序7

.如果真 (神界大陆.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1076, 478, 0)
    延时 (1000)
    模拟鼠标点击 (958, 860, 0)
    延时 (1000)
    ' 这里进入 2.3万年BOSS
    模拟鼠标点击 (1294, 970, 0)
    延时 (20000)
    ' 进入地图移动到BOOS处 延迟20秒BOSS已死点击退出
    模拟鼠标点击 (1077, 629, 0)
    延时 (1000)
    ' BOSS已死退出确认
    模拟鼠标点击 (1294, 970, 0)
    延时 (1000)
    ' 进入地图移动到BOOS处 延迟20秒BOSS已死点击退出 重复操作
    模拟鼠标点击 (1077, 629, 0)
    延时 (1000)
    ' BOSS已死退出确认重复操作
    ' 功能代码 神界大陆
.如果真结束

子程序8 ()

.子程序 子程序8

.如果真 (装备熔炼.选中)
    模拟鼠标点击 (907, 1002, 0)
    延时 (1000)
    模拟鼠标点击 (959, 856, 0)
    延时 (1000)
    模拟鼠标点击 (959, 856, 0)
    延时 (1000)
    模拟鼠标点击 (959, 856, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 装备熔炼
.如果真结束


子程序9 ()

.子程序 子程序9

.如果真 (斗魂场.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1288, 690, 0)
    延时 (1000)
    模拟鼠标点击 (958, 868, 0)
    延时 (1000)
    模拟鼠标点击 (1050, 707, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 斗魂场
.如果真结束

子程序10 ()

.子程序 子程序10

.如果真 (唐门绝学.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1216, 628, 0)
    延时 (1000)
    模拟鼠标点击 (958, 859, 0)
    延时 (1000)
    模拟鼠标点击 (958, 859, 0)
    延时 (1000)
    模拟鼠标点击 (1177, 213, 0)
    延时 (1000)
    模拟鼠标点击 (1195, 113, 0)
    延时 (1000)
    ' 功能代码 唐门绝学
.如果真结束

子程序11 ()

.子程序 子程序11

.如果真 (宴会传功.选中)
    模拟鼠标点击 (1286, 417, 0)
    延时 (1000)
    模拟鼠标点击 (1215, 485, 0)
    延时 (1000)
    模拟鼠标点击 (769, 694, 0)
    延时 (1000)
    模拟鼠标点击 (1076, 852, 0)
    延时 (1000)
    模拟鼠标点击 (1071, 427, 0)
    延时 (10000)
    ' 移动到坐标1244.324延迟10秒
    模拟鼠标点击 (1071, 427, 0)
    延时 (10000)
    ' 移动到坐标1244.324延迟10秒
    模拟鼠标点击 (1146, 538, 0)
    延时 (10000)
    ' 移动到坐标1146.538延迟10秒
    模拟鼠标点击 (1143, 446, 0)
    延时 (600000)
    ' 移动到坐标1143.446延迟10秒
    模拟鼠标点击 (1269, 213, 0)
    延时 (1000)
    ' 退出界面 延迟10分钟
    ' 功能代码 宴会传功
.如果真结束


.子程序 _时钟1_周期事件
.局部变量 现在时间, 文本型

现在时间 ＝ 取文本左边 (取文本右边 (到文本 (取现行时间 ()), 12), 6)
' 判断是否运行第一个子程序   执行神界大陆脚本时间0代表凌晨3点，右边5是到凌晨5点，这是一个时间段
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 3 且 到整数 (取文本左边 (现在时间, 2)) ≤ 5)' 判断小时
    .如果真 (到整数 (取文本左边 (现在时间, 2)) ＝ 0)
    .如果真结束
    .如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 0 且 到整数 (取文本右边 (现在时间, 2)) ≤ 0)
      子程序7 ()
      返回 ()
    .如果真结束

.如果真结束
' 判断是否运行第二个子程序   执行 宗门御敌菊斗罗月光 时间12代表中午12点，下面的30是分钟，右边也是这样理解
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 12 且 到整数 (取文本左边 (现在时间, 2)) ≤ 12)' 判断小时

.如果真结束
.如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 30 且 到整数 (取文本右边 (现在时间, 2)) ≤ 31)
    子程序4 ()
    返回 ()
.如果真结束
' 判断是否运行第三个子程序   执行 宗门御敌 千仞雪
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 19 且 到整数 (取文本左边 (现在时间, 2)) ≤ 19)' 判断小时

.如果真结束
.如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 30 且 到整数 (取文本右边 (现在时间, 2)) ≤ 31)
    子程序4 ()
    返回 ()
.如果真结束
' 判断是否运行第四个子程序   执行 宴会传功
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 19 且 到整数 (取文本左边 (现在时间, 2)) ≤ 19)' 判断小时

.如果真结束
.如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 45 且 到整数 (取文本右边 (现在时间, 2)) ≤ 55)
    子程序1 ()
    返回 ()
.如果真结束
' 判断是否运行第五个子程序   执行 世界首领
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 5 且 到整数 (取文本左边 (现在时间, 2)) ≤ 6)' 判断小时

.如果真结束
.如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 0 且 到整数 (取文本右边 (现在时间, 2)) ≤ 0)
    子程序6 ()
    返回 ()
.如果真结束
' 判断是否运行第六个子程序   执行 斗魂场
.如果真 (到整数 (取文本左边 (现在时间, 2)) ≥ 0 且 到整数 (取文本左边 (现在时间, 2)) ≤ 3)' 判断小时

.如果真结束
.如果真 (到整数 (取文本右边 (现在时间, 2)) ≥ 0 且 到整数 (取文本右边 (现在时间, 2)) ≤ 0)
    子程序9 ()
    返回 ()
.如果真结束





.子程序 __启动窗口_创建完毕

F7 ＝ 注册热键 (取窗口句柄 (), 标签4.取窗口句柄 (), 0, #F7键)
F8 ＝ 注册热键 (取窗口句柄 (), 标签4.取窗口句柄 (), 0, #F8键)

.子程序 _标签4_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型

.如果真 (参数一 ＝ F7)
    _按钮1_被单击 ()
.如果真结束
.如果真 (参数一 ＝ F8)
    _按钮2_被单击 ()
.如果真结束





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

销毁 ()

.子程序 _按钮2_被单击, 逻辑型





按钮2设置的注册热键为F8

但是按了 F8还是无法停止   陷入无限循环子程序   

.

dazhuangzhuang 发表于 2019-9-15 20:17

呵呵，终于知道为什么那么多人不用中文写程序了

bobowxc 发表于 2019-9-15 20:17

全是中文，完全没有一点想看的欲望- -

Suppose 发表于 2019-9-15 20:18

你这循环进去了肯定就无限循环啊里面又没任何跳出循环的代码！你按钮2的单机事件也看不到怎么写的

皇朝兵哥哥 发表于 2019-9-15 20:23

yujian1991 发表于 2019-9-15 20:18
你这循环进去了肯定就无限循环啊里面又没任何跳出循环的代码！你按钮2的单机事件也看不到怎么写的

跳出循环代码 怎么设置按钮2的使用F8键停止子程序该怎么写

Suppose 发表于 2019-9-15 20:25

皇朝兵哥哥 发表于 2019-9-15 20:23
跳出循环代码 怎么设置按钮2的使用F8键停止子程序该怎么写

最简单的办法, 弄个全局变量 比如整数型的 a进入循环之前 a=0然后在你的循环里面判断 a==1跳出循环()停止按钮事件a赋值1

皇朝兵哥哥 发表于 2019-9-15 20:27

yujian1991 发表于 2019-9-15 20:25
最简单的办法, 弄个全局变量 比如整数型的 a进入循环之前 a=0然后在你的循环里面判断 a==1跳出循 ...

如果写得话 单写 注册热键F8设置按钮2按F8停止一切操作这个事件该怎么写   能写一个我学习下吗

Homely 发表于 2019-9-15 20:58

这种基础问题还是多看看教程吧      

itachy 发表于 2019-9-15 21:14

第一次看到易语言写的代码   卧槽   蓝受{:1_908:}

皇朝兵哥哥 发表于 2019-9-15 21:18

itachy 发表于 2019-9-15 21:14
第一次看到易语言写的代码   卧槽   蓝受

:lol还好吧    写了一天   思路还算可以，结尾被困住了

查看完整版本: 求大神帮我看看为什么我的子程序无限循环无法使用F8停止