定时子程序启动会卡死无法执行或者跳出

pengyuanjun

我在每个子程序中加入了12点跟20点特殊程序判断，到了12或者20就先执行特殊程序
但多开遇到12点或者20点时间段执行完特殊子程序后无法跳出
特殊程序单独执行多开是可以跑完全程的
如果在每个子程序前加入特殊判断，在多开的情况下有写窗口过了12点或20点还是提示执行特殊程序（远征队困难）
但没有任何执行动作

  

子程序名	返回值类型	公开	备 注
领取邮件
参数名	类 型	参考	可空	数组	备 注
i	整数型

变量名	类 型	静态	数组	备 注
大漠	dmsoft
x	整数型
y	整数型
x1	整数型
y1	整数型
时	整数型
时间	日期时间型

' jacket20231120编辑购买药品模块
进入许可区 (许可证)
大漠 ＝ 大漠多线程 [i].大漠
退出许可区 (许可证)
时间 ＝ 取现行时间 ()
时 ＝ 取小时 (时间)
如果真 (时 ＝ 12)
远征队困难 (i)

如果真 (时 ＝ 20)
远征队困难 (i)

大漠.UseDict (5)
反馈列表信息 (i, 6, “领取邮件执行中”)
' 大漠.SetDict (0, “005.txt”)
' 大漠.SetPath (取运行目录 () ＋ “\pic\”)
程序_延时 (20000, )
调试输出 (“程序_延时20秒启动邮件领取模块”)
大漠.FindPic (914, 17, 943, 42, “菜单栏1.bmp”, “050505”, 0.9, 0, x, y)  ' 选择菜单栏
调试输出 (“菜单栏1：”, x)
计次循环首 (100, )
程序_延时 (3000, )  ' 辅助延迟3秒
调试输出 (“ 辅助延迟3秒”)
大漠.FindStrFast (198, 525, 201, 53, “电池绿色”, “7ac300-678678|79c100-789789|78bf00-456456”, 0.7, x, y)  ' 点击电池绿色偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
调试输出 (“ 选择点击菜单”)
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (198, 525, 201, 53, “电池绿色”, “7ac300-678678|79c100-789789|78bf00-456456”, 0.7, x, y)  ' 点击电池图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
调试输出 (“ 选择点击菜单”)
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (919, 390, 946, 400, “小橙点”, “ff7b52-456456”, 0.7, x, y)  ' 点击技能切换点是第一个小橙点偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (90, 49, 104, 64, “双手剑图标”, “ffffff-567567|fdfdfd-494949|fcfcfc-505050”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (14, 173, 38, 204, “任务图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (9, 186, 41, 209, “握手图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (14, 173, 38, 204, “任务图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (9, 186, 41, 209, “握手图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (668, 241, 713, 289, “橙色图标”, “fb7c35-123123|fe7e36-202020”, 0.7, x, y)  ' 点击限时橙色图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (4000, )
大漠.FindStrFast (676, 252, 706, 279, “限时活动图标”, “eceeef-345345|f1f2f3-456456|f0f2f3-545454”, 0.7, x, y)  ' 点击限时活动图标偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (854, 83, 880, 97, “社区|社|区”, “fafafa-909090|cfd1d3-456456”, 0.7, x, y)  ' 社区偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (4000, )
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (350, 511, 369, 526, “向上按键”, “e1e1e2-345345|ebebeb-567567|d4d4d5-345345”, 0.7, x, y)  ' 选择向上按键偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (1000, )
调试输出 (“向上按键偏移菜单栏：”)
跳出循环 ()
程序_延时 (1000, )
大漠.FindStrFast (887, 478, 927, 516, “跳跃图标”, “d7d6d5-567567|d4d2d0-606060|d9d8d7-606060”, 0.7, x, y)  ' 跳跃图标按键偏移菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, 920, 2)
程序_延时 (1000, )
调试输出 (“跳跃图标按键偏移菜单栏”)
跳出循环 ()

调试输出 (“ 循环选择点击菜单”)
计次循环尾 ()
' 如果邮件上有小红点并找到邮件入口执行程序
计次循环首 (100, )
大漠.FindStrFast (780, 13, 811, 36, “邮件图标”, “ffffff-456456|ffffff-567567|ffffff-789789”, 0.8, x, y)  ' 点击邮件入口
调试输出 (“点击邮件入口”, x)
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (3000, )
调试输出 (“点击邮件入口：”, x)
跳出循环 ()
程序_延时 (3000, )
大漠.FindStrFast (913, 483, 939, 511, “设置图标”, “ffffff-123123|ffffff-345345|ffffff-567567”, 0.8, x, y)  ' 设置图标偏移点击
如果真 (x ＞ 0)
左键单击 (大漠, 795, 24)
程序_延时 (4000, )
调试输出 (“设置图标偏移点击”)
跳出循环 ()
程序_延时 (2000, )
大漠.FindStrFast (659, 489, 671, 506, “疑问号图标”, “ffffff-567567|dbdcde-345345|ffffff-505050”, 0.8, x, y)  ' 疑问号图标偏移点击
如果真 (x ＞ 0)
左键单击 (大漠, 795, 24)
程序_延时 (4000, )
调试输出 (“ 疑问号图标偏移点击”)
跳出循环 ()
程序_延时 (2000, )
计次循环尾 ()
' ''''''''''''''''''通用邮件''''''''''''''''''''''
计次循环首 (5, )
大漠.FindStrFast (435, 493, 509, 518, “选择领取|选择|领取”, “fce2da-404040|fbddd3-345345”, 0.7, x, y)  ' 点选择领取
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点选择领取”, x)
程序_延时 (2000, )
跳出循环 ()
程序_延时 (1000, )
计次循环尾 ()
' 确定
计次循环首 (10, )
大漠.FindStrFast (573, 445, 611, 469, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.8, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点确定”, x)
程序_延时 (2000, )
程序_延时 (1000, )
大漠.FindStrFast (573, 446, 590, 469, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点确定”, x)
程序_延时 (2000, )
程序_延时 (1000, )
大漠.FindStrFast (591, 447, 612, 468, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点确定”, x)
程序_延时 (2000, )
程序_延时 (1000, )
计次循环尾 ()
' 再次确定
计次循环首 (10, )
大漠.FindStrFast (462, 390, 498, 408, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
大漠.FindStrFast (460, 390, 481, 410, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
大漠.FindStrFast (479, 388, 500, 410, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
计次循环尾 ()
计次循环首 (5, )
大漠.FindStrFast (376, 490, 401, 522, “删除图标”, “ffffff-404040|ffffff-345345”, 0.7, x, y)  ' 点删除图标
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点删除图标”, x)
程序_延时 (2000, )
跳出循环 ()
程序_延时 (1000, )
计次循环尾 ()
调试输出 (“循环找通用邮件领取”, x)
' 个人邮件
计次循环首 (3, )
大漠.FindStrFast (289, 88, 326, 107, “个人|个|人”, “c2c2c3-456456|c1c1c2-567567|c5c5c5-678678”, 0.7, x, y)  ' 点个人邮件
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点个人邮件”, x)
程序_延时 (2000, )
计次循环首 (5, )
大漠.FindStrFast (435, 493, 509, 518, “选择领取|选择|领取”, “fce2da-404040|fbddd3-345345”, 0.7, x, y)  ' 点选择领取
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点选择领取”, x)
程序_延时 (2000, )
跳出循环 ()
程序_延时 (1000, )
计次循环尾 ()
计次循环首 (10, )
大漠.FindStrFast (462, 390, 498, 408, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
大漠.FindStrFast (460, 390, 481, 410, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
大漠.FindStrFast (479, 388, 500, 410, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“点确定”, x)
程序_延时 (1000, )
计次循环尾 ()
计次循环首 (5, )
大漠.FindStrFast (376, 490, 401, 522, “删除图标”, “ffffff-404040|ffffff-345345”, 0.7, x, y)  ' 点删除图标
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“点删除图标”, x)
程序_延时 (2000, )
跳出循环 ()
程序_延时 (1000, )
计次循环尾 ()

调试输出 (“循环找个人邮件领取”, x)
计次循环尾 ()
程序_延时 (2000, )
计次循环首 (5, )
大漠.FindStrFast (919, 16, 947, 42, “大叉叉”, “ffffff-678678|ffffff-789789”, 0.7, x, y)  ' 选择退出到菜单栏
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
调试输出 (“退出到菜单栏”, x)
程序_延时 (2000, )
跳出循环 ()
程序_延时 (2000, )
调试输出 (“退出到菜单栏”, x)
计次循环尾 ()
程序_延时 (2000, )
计次循环首 (5, )
大漠.FindStrFast (915, 10, 937, 32, “小叉叉”, “ffffff-678678|ffffff-789789”, 0.8, x, y)  ' 选择关闭菜单栏，
如果真 (x ＞ 0)
左键单击 (大漠, x, y)
程序_延时 (2000, )
调试输出 (“退出到主页”, x)
跳出循环 ()
程序_延时 (2000, )
调试输出 (“退出到菜单栏”, x)
计次循环尾 ()
反馈列表信息 (i, 6, “领取邮件完毕”)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .子程序 领取邮件<br /> .参数 i, 整数型<br /> .局部变量 大漠, dmsoft<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 x1, 整数型<br /> .局部变量 y1, 整数型<br /> .局部变量 时, 整数型<br /> .局部变量 时间, 日期时间型<br /> <br /> ' jacket20231120编辑购买药品模块<br /> <br /> 进入许可区 (许可证)<br /> 大漠 ＝ 大漠多线程 <i>.大漠<br /> 退出许可区 (许可证)<br /> 时间 ＝ 取现行时间 ()<br /> 时 ＝ 取小时 (时间)<br /> .如果真 (时 ＝ 12)<br />     远征队困难 (i)<br /> .如果真结束<br /> <br /> .如果真 (时 ＝ 20)<br />     远征队困难 (i)<br /> .如果真结束<br /> <br /> <br /> <br /> 大漠.UseDict (5)<br /> 反馈列表信息 (i, 6, “领取邮件执行中”)<br /> <br /> ' 大漠.SetDict (0, “005.txt”)<br /> ' 大漠.SetPath (取运行目录 () ＋ “\pic\”)<br /> 程序_延时 (20000, )<br /> 调试输出 (“程序_延时20秒启动邮件领取模块”)<br /> <br /> 大漠.FindPic (914, 17, 943, 42, “菜单栏1.bmp”, “050505”, 0.9, 0, x, y)  ' 选择菜单栏<br /> 调试输出 (“菜单栏1：”, x)<br /> .计次循环首 (100, )<br />     程序_延时 (3000, )  ' 辅助延迟3秒<br />     调试输出 (“ 辅助延迟3秒”)<br />     大漠.FindStrFast (198, 525, 201, 53, “电池绿色”, “7ac300-678678|79c100-789789|78bf00-456456”, 0.7, x, y)  ' 点击电池绿色偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         调试输出 (“ 选择点击菜单”)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (198, 525, 201, 53, “电池绿色”, “7ac300-678678|79c100-789789|78bf00-456456”, 0.7, x, y)  ' 点击电池图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         调试输出 (“ 选择点击菜单”)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (919, 390, 946, 400, “小橙点”, “ff7b52-456456”, 0.7, x, y)  ' 点击技能切换点是第一个小橙点偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (90, 49, 104, 64, “双手剑图标”, “ffffff-567567|fdfdfd-494949|fcfcfc-505050”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (14, 173, 38, 204, “任务图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (9, 186, 41, 209, “握手图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (14, 173, 38, 204, “任务图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (9, 186, 41, 209, “握手图标”, “ffffff-353535|ffffff-505050|ffffff-789789”, 0.7, x, y)  ' 点击头像双手剑图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (668, 241, 713, 289, “橙色图标”, “fb7c35-123123|fe7e36-202020”, 0.7, x, y)  ' 点击限时橙色图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (4000, )<br />     大漠.FindStrFast (676, 252, 706, 279, “限时活动图标”, “eceeef-345345|f1f2f3-456456|f0f2f3-545454”, 0.7, x, y)  ' 点击限时活动图标偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (854, 83, 880, 97, “社区|社|区”, “fafafa-909090|cfd1d3-456456”, 0.7, x, y)  ' 社区偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (4000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (350, 511, 369, 526, “向上按键”, “e1e1e2-345345|ebebeb-567567|d4d4d5-345345”, 0.7, x, y)  ' 选择向上按键偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (1000, )<br />         调试输出 (“向上按键偏移菜单栏：”)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (887, 478, 927, 516, “跳跃图标”, “d7d6d5-567567|d4d2d0-606060|d9d8d7-606060”, 0.7, x, y)  ' 跳跃图标按键偏移菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 920, 2)<br />         程序_延时 (1000, )<br />         调试输出 (“跳跃图标按键偏移菜单栏”)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> <br />     调试输出 (“ 循环选择点击菜单”)<br /> .计次循环尾 ()<br /> <br /> <br /> ' 如果邮件上有小红点并找到邮件入口执行程序<br /> .计次循环首 (100, )<br />     大漠.FindStrFast (780, 13, 811, 36, “邮件图标”, “ffffff-456456|ffffff-567567|ffffff-789789”, 0.8, x, y)  ' 点击邮件入口<br />     调试输出 (“点击邮件入口”, x)<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         程序_延时 (3000, )<br />         调试输出 (“点击邮件入口：”, x)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (3000, )<br />     大漠.FindStrFast (913, 483, 939, 511, “设置图标”, “ffffff-123123|ffffff-345345|ffffff-567567”, 0.8, x, y)  ' 设置图标偏移点击<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 795, 24)<br />         程序_延时 (4000, )<br />         调试输出 (“设置图标偏移点击”)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (2000, )<br />     大漠.FindStrFast (659, 489, 671, 506, “疑问号图标”, “ffffff-567567|dbdcde-345345|ffffff-505050”, 0.8, x, y)  ' 疑问号图标偏移点击<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, 795, 24)<br />         程序_延时 (4000, )<br />         调试输出 (“ 疑问号图标偏移点击”)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (2000, )<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> ' ''''''''''''''''''通用邮件''''''''''''''''''''''<br /> .计次循环首 (5, )<br />     大漠.FindStrFast (435, 493, 509, 518, “选择领取|选择|领取”, “fce2da-404040|fbddd3-345345”, 0.7, x, y)  ' 点选择领取<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点选择领取”, x)<br />         程序_延时 (2000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br /> .计次循环尾 ()<br /> <br /> ' 确定<br /> .计次循环首 (10, )<br />     大漠.FindStrFast (573, 445, 611, 469, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.8, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点确定”, x)<br />         程序_延时 (2000, )<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (573, 446, 590, 469, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点确定”, x)<br />         程序_延时 (2000, )<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (591, 447, 612, 468, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点确定”, x)<br />         程序_延时 (2000, )<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br /> <br /> .计次循环尾 ()<br /> ' 再次确定<br /> .计次循环首 (10, )<br />     大漠.FindStrFast (462, 390, 498, 408, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         程序_延时 (2000, )<br />         调试输出 (“点确定”, x)<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (460, 390, 481, 410, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         程序_延时 (2000, )<br />         调试输出 (“点确定”, x)<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br />     大漠.FindStrFast (479, 388, 500, 410, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         程序_延时 (2000, )<br />         调试输出 (“点确定”, x)<br /> <br />     .如果真结束<br />     程序_延时 (1000, )<br /> <br /> .计次循环尾 ()<br /> <br /> .计次循环首 (5, )<br />     大漠.FindStrFast (376, 490, 401, 522, “删除图标”, “ffffff-404040|ffffff-345345”, 0.7, x, y)  ' 点删除图标<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点删除图标”, x)<br />         程序_延时 (2000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br /> .计次循环尾 ()<br /> <br /> <br /> 调试输出 (“循环找通用邮件领取”, x)<br /> <br /> <br /> ' 个人邮件<br /> .计次循环首 (3, )<br />     大漠.FindStrFast (289, 88, 326, 107, “个人|个|人”, “c2c2c3-456456|c1c1c2-567567|c5c5c5-678678”, 0.7, x, y)  ' 点个人邮件<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“点个人邮件”, x)<br />         程序_延时 (2000, )<br />         .计次循环首 (5, )<br />             大漠.FindStrFast (435, 493, 509, 518, “选择领取|选择|领取”, “fce2da-404040|fbddd3-345345”, 0.7, x, y)  ' 点选择领取<br />             .如果真 (x ＞ 0)<br />                 左键单击 (大漠, x, y)<br />                 调试输出 (“点选择领取”, x)<br />                 程序_延时 (2000, )<br />                 跳出循环 ()<br />             .如果真结束<br />             程序_延时 (1000, )<br />         .计次循环尾 ()<br /> <br />         .计次循环首 (10, )<br />             大漠.FindStrFast (462, 390, 498, 408, “确定|确|定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />             .如果真 (x ＞ 0)<br />                 左键单击 (大漠, x, y)<br />                 程序_延时 (2000, )<br />                 调试输出 (“点确定”, x)<br /> <br />             .如果真结束<br />             程序_延时 (1000, )<br />             大漠.FindStrFast (460, 390, 481, 410, “确”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />             .如果真 (x ＞ 0)<br />                 左键单击 (大漠, x, y)<br />                 程序_延时 (2000, )<br />                 调试输出 (“点确定”, x)<br /> <br />             .如果真结束<br />             程序_延时 (1000, )<br />             大漠.FindStrFast (479, 388, 500, 410, “定”, “fef3ef-456456|ffffff-567567|fce8e2-456456”, 0.7, x, y)  ' 点确定<br />             .如果真 (x ＞ 0)<br />                 左键单击 (大漠, x, y)<br />                 程序_延时 (2000, )<br />                 调试输出 (“点确定”, x)<br /> <br />             .如果真结束<br />             程序_延时 (1000, )<br /> <br />         .计次循环尾 ()<br /> <br />         .计次循环首 (5, )<br />             大漠.FindStrFast (376, 490, 401, 522, “删除图标”, “ffffff-404040|ffffff-345345”, 0.7, x, y)  ' 点删除图标<br />             .如果真 (x ＞ 0)<br />                 左键单击 (大漠, x, y)<br />                 调试输出 (“点删除图标”, x)<br />                 程序_延时 (2000, )<br />                 跳出循环 ()<br />             .如果真结束<br />             程序_延时 (1000, )<br />         .计次循环尾 ()<br /> <br /> <br />     .如果真结束<br /> <br /> <br /> <br /> <br /> <br /> <br /> <br />     调试输出 (“循环找个人邮件领取”, x)<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> <br /> <br /> 程序_延时 (2000, )<br /> .计次循环首 (5, )<br />     大漠.FindStrFast (919, 16, 947, 42, “大叉叉”, “ffffff-678678|ffffff-789789”, 0.7, x, y)  ' 选择退出到菜单栏<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         调试输出 (“退出到菜单栏”, x)<br />         程序_延时 (2000, )<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (2000, )<br />     调试输出 (“退出到菜单栏”, x)<br /> .计次循环尾 ()<br /> <br /> 程序_延时 (2000, )<br /> .计次循环首 (5, )<br />     大漠.FindStrFast (915, 10, 937, 32, “小叉叉”, “ffffff-678678|ffffff-789789”, 0.8, x, y)  ' 选择关闭菜单栏，<br />     .如果真 (x ＞ 0)<br />         左键单击 (大漠, x, y)<br />         程序_延时 (2000, )<br />         调试输出 (“退出到主页”, x)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (2000, )<br />     调试输出 (“退出到菜单栏”, x)<br /> .计次循环尾 ()<br /> 反馈列表信息 (i, 6, “领取邮件完毕”)

jacket12

放在线程里

pengyuanjun

如果真 (时 ＝ 12) 远征队困难 (i)  如果真 (时 ＝ 20) 远征队困难 (i)

pengyuanjun

pengyuanjun 发表于 2025-3-7 04:03
如果真 (时 ＝ 12) 远征队困难 (i)  如果真 (时 ＝ 20) 远征队困难 (i)

这段代码就是特殊定时启动预计，单独不做定时跑。多开是单独运行完全没问题的，已排除特殊子程序有bug

hai5112

将定时任务改成线程启动，在启动线程前加上，处理事件 ()，保证主界面不卡死

pengyuanjun

hai5112 发表于 2025-3-7 08:42
将定时任务改成线程启动，在启动线程前加上，处理事件 ()，保证主界面不卡死 ...

你这种用线程的我尝试过不太好实现

pengyuanjun

hai5112 发表于 2025-3-7 08:42
将定时任务改成线程启动，在启动线程前加上，处理事件 ()，保证主界面不卡死 ...

大神有没有参考案例

kel

断点进去看看卡哪里

pengyuanjun

kel 发表于 2025-3-11 10:06
断点进去看看卡哪里

特殊子程序但跑是没问题，在每个子程序前面增加了特殊子程序才导致的