开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 724|回复: 89
打印 上一主题 下一主题
收起左侧

[易语言] 在线程里判断定时启动,导致子程序不执行。一直执行定...

[复制链接]
结帖率:73% (11/15)
跳转到指定楼层
楼主
发表于 昨天 02:21 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式   广东省深圳市
100精币
在线程里判断定时启动,导致子程序不执行。一直执行定时12点或20点程序
如何修改在当天每个子程序执行过一次12点或者20点定时程序后,不再执行定时程序
尝试过用时间控件,但会导致多开卡死
哪位大神教教我小白









  
子程序名返回值类型公开备 注
窗口线程  
参数名类 型参考可空数组备 注
i整数型
变量名类 型静态数组备 注
大漠dmsoft 
a整数型 
任务文本文本型 
任务数组文本型0
切换角色逻辑型 
新任务数组文本型0
随机数整数型 
打乱任务逻辑型 
自动使用挂机卡逻辑型 
自动加入公会逻辑型 
自动配置宠物逻辑型 
自动技能类型一逻辑型 
自动技能类型二逻辑型 
自动材料副本逻辑型 
自动精英副本逻辑型 
自动奈特的金字塔逻辑型 
自动武陵道场逻辑型 
自动永恒之塔逻辑型 
自动周常副本逻辑型 
自动金钩海兵王逻辑型 
自动进化系统逻辑型 
自动天空岛贸易逻辑型 
自动次元入侵逻辑型 
自动星光梦塔逻辑型 
自动怪物乐园逻辑型 
自动唐云的料理室逻辑型 
自动切换玛丽亚区逻辑型 
自动切换童话村区逻辑型 
自动切换蓝蜗牛区逻辑型 
自动切换祖母绿区逻辑型 
自动切换顽皮猴区逻辑型 
自动切换微微安区逻辑型 
自动切换阿勒斯区逻辑型 
自动切换蘑菇仔区逻辑型 
自动切换绿水灵区逻辑型 
自动切换月妙区逻辑型 
自动切换漂漂猪区逻辑型 
自动切换白雪人区逻辑型 
自动切换黑水晶区逻辑型 
自动切换水晶钻区逻辑型 
自动钥匙兑换挂机卡逻辑型 
自动贸易兑换挂机卡逻辑型 
自动星光兑换挂机卡逻辑型 
自动法老兑换挂机卡逻辑型 
自动怪物兑换挂机卡逻辑型 
自动公会兑换挂机卡逻辑型 
自动购买三级血跟蓝逻辑型 
自动购买四级血跟蓝逻辑型 
自动购买五级血跟蓝逻辑型 
自动购买六级血跟蓝逻辑型 
自动购买七级血跟蓝逻辑型 
自动购买八级血跟蓝逻辑型 
自动图书馆升级逻辑型 
自动领地树升级逻辑型 
自动篝火升级逻辑型 
自动厨师升级逻辑型 
自动设计师升级逻辑型 
自动商店升级逻辑型 
自动领主召唤逻辑型 
自动领主讨伐逻辑型 
自动圣瑞尼亚逻辑型 
自动公会对抗赛逻辑型 
自动公会领地逻辑型 
自动公会要塞逻辑型 
自动王中王争霸逻辑型 
自动个人技能升级逻辑型 
自动通用技能升级逻辑型 
窗口卡点任务文本型 
窗口已完成任务索引整数型 
窗口任务总数整数型 
当前窗口任务参数整数型 
当前窗口已完成任务参数整数型 
自动添加经验券逻辑型 
切换大区逻辑型 
自动星之力定时远征队逻辑型 
整数型 
时间日期时间型 
CoInitializeEx (0, 0)  ' 初始化COM库,设置为MTA模式
进入许可区 (许可证)
大漠多线程 [i].大漠.创建 ()
大漠 = 大漠多线程 [i].大漠
. ' 如果 (大漠多线程 [i].大漠.创建对象 ())
' ' 调试输出 (“大漠对象” + 到文本 (i) + “创建成功”)
' 大漠 = 大漠多线程 [i].大漠
' ' 调试输出 (大漠.Ver ())
' ' 调试输出 (“大漠对象” + 到文本 (i) + “创建失败”)

退出许可区 (许可证)
大漠.SetPath (取运行目录 ()“\pic\”)
大漠.SetPicPwd (“junjunwl”)
大漠.SetDictPwd (“junjunwl”)
大漠.SetDict (0, “001.txt”)  ' 登录
大漠.SetDict (1, “002.txt”)  ' 主线
大漠.SetDict (2, “0031.txt”)  ' 委托
大漠.SetDict (3, “003.txt”)  ' 日常/星力战场
大漠.SetDict (4, “004.txt”)  ' 背包
大漠.SetDict (5, “005.txt”)  ' 领取邮件
大漠.SetDict (6, “006.txt”)  ' 宠物探险
大漠.SetDict (7, “008.txt”)  ' 公会任务
大漠.SetDict (71, “008.txt”)  ' 图书馆升级
大漠.SetDict (72, “008.txt”)  ' 领地树升级
大漠.SetDict (73, “008.txt”)  ' 篝火升级
大漠.SetDict (74, “008.txt”)  ' 厨师升级
大漠.SetDict (75, “008.txt”)  ' 设计师升级
大漠.SetDict (76, “008.txt”)  ' 商店升级
大漠.SetDict (77, “008.txt”)  ' 领主召唤
大漠.SetDict (78, “008.txt”)  ' 领主讨伐
大漠.SetDict (79, “008.txt”)  ' 圣瑞尼亚
大漠.SetDict (710, “008.txt”)  ' 公会对抗赛
大漠.SetDict (711, “008.txt”)  ' 公会领地
大漠.SetDict (712, “008.txt”)  ' 公会要塞
大漠.SetDict (713, “008.txt”)  ' 王中王争霸
大漠.SetDict (714, “008.txt”)  ' 个人技能升级
大漠.SetDict (715, “008.txt”)  ' 通用技能升级
大漠.SetDict (8, “009.txt”)  ' 成就领取
大漠.SetDict (9, “010.txt”)  ' 成长领取
大漠.SetDict (10, “011.txt”)  ' 技能加满
大漠.SetDict (11, “007.txt”)  ' 限时道具
大漠.SetDict (12, “012.txt”)  ' 冒险战令
大漠.SetDict (13, “013.txt”)  ' 限时活动
大漠.SetDict (14, “014.txt”)  ' 购买药品
大漠.SetDict (141, “014.txt”)  ' 购买购买三级血跟蓝
大漠.SetDict (142, “014.txt”)  ' 购买购买四级血跟蓝
大漠.SetDict (143, “014.txt”)  ' 购买购买五级血跟蓝
大漠.SetDict (144, “014.txt”)  ' 购买购买六级血跟蓝
大漠.SetDict (145, “014.txt”)  ' 购买购买七级血跟蓝
大漠.SetDict (146, “014.txt”)  ' 购买购买八级血跟蓝
大漠.SetDict (15, “015.txt”)  ' 兑换物品
大漠.SetDict (151, “015.txt”)  ' 钥匙兑换挂机卡
大漠.SetDict (152, “015.txt”)  ' 贸易兑换挂机卡
大漠.SetDict (153, “015.txt”)  ' 星光兑换挂机卡
大漠.SetDict (154, “015.txt”)  ' 法老兑换挂机卡
大漠.SetDict (155, “015.txt”)  ' 怪物兑换挂机卡
大漠.SetDict (156, “015.txt”)  ' 公会兑换挂机卡
大漠.SetDict (16, “0021.txt”)  ' 切换多角色
大漠.SetDict (17, “0032.txt”)  ' 军团长/武陵道场/料理教室/次元入侵/远征队/混沌远征队
大漠.SetDict (18, “017.txt”)  ' 升级强化
大漠.SetDict (19, “018.txt”)  ' 加入公会
大漠.SetDict (20, “019.txt”)  ' 宠物配置
大漠.SetDict (21, “020.txt”)  ' 技能类型一
大漠.SetDict (22, “022.txt”)  ' 技能类型二
大漠.SetDict (23, “023.txt”)  ' 宝石任务
大漠.SetDict (24, “024.txt”)  ' 热力增益
大漠.SetDict (25, “025.txt”)  ' 制作史诗装备
大漠.SetDict (26, “026.txt”)  ' 交易所
大漠.SetDict (27, “027.txt”)  ' 背包拓展
大漠.SetDict (28, “028.txt”)  ' 使用挂机卡
大漠.SetDict (29, “029.txt”)  ' 扩充出售栏
大漠.SetDict (30, “030.txt”)  ' 添加经验券
大漠.SetDict (33, “033.txt”)  ' 使用经验券
大漠.SetDict (34, “0052.txt”)  ' 切换大区
大漠.SetDict (341, “0052.txt”)  ' 切换玛丽亚区
大漠.SetDict (342, “0052.txt”)  ' 切换童话村区
大漠.SetDict (343, “0052.txt”)  ' 切换蓝蜗牛区
大漠.SetDict (344, “0052.txt”)  ' 切换祖母绿区
大漠.SetDict (345, “0052.txt”)  ' 切换顽皮猴区
大漠.SetDict (346, “0052.txt”)  ' 切换微微安区
大漠.SetDict (347, “0052.txt”)  ' 切换阿勒斯区
大漠.SetDict (348, “0052.txt”)  ' 切换蘑菇仔区
大漠.SetDict (349, “0052.txt”)  ' 切换绿水灵区
大漠.SetDict (3410, “0052.txt”)  ' 切换绿水灵区
大漠.SetDict (3411, “0052.txt”)  ' 切换漂漂猪区
大漠.SetDict (3412, “0052.txt”)  ' 切换白雪人区
大漠.SetDict (3413, “0052.txt”)  ' 切换黑水晶区
大漠.SetDict (3414, “0052.txt”)  ' 切换水晶钻区
大漠.SetDict (39, “039.txt”)  ' 军团长普通
大漠.SetDict (40, “040.txt”)  ' 混沌远征任务
大漠.SetDict (42, “042.txt”)  ' 日常玩法
大漠.SetDict (421, “042.txt”)  ' 材料副本
大漠.SetDict (422, “042.txt”)  ' 精英副本
大漠.SetDict (423, “042.txt”)  ' 奈特的金字塔
大漠.SetDict (424, “042.txt”)  ' 武陵道场
大漠.SetDict (425, “042.txt”)  ' 永恒之塔
大漠.SetDict (426, “042.txt”)  ' 周常副本
大漠.SetDict (427, “042.txt”)  ' 金钩海兵王
大漠.SetDict (428, “042.txt”)  ' 进化系统
大漠.SetDict (429, “042.txt”)  ' 天空岛贸易
大漠.SetDict (4210, “042.txt”)  ' 次元入侵
大漠.SetDict (4211, “042.txt”)  ' 星光梦塔
大漠.SetDict (4212, “042.txt”)  ' 材怪物乐园
大漠.SetDict (4213, “042.txt”)  ' 唐云的料理室
大漠.SetDict (43, “043.txt”)  ' 星之力
大漠.SetDict (431, “043.txt”)  ' 星之力定时远征队
大漠.SetDict (44, “044.txt”)  ' 优化设置
大漠.SetDict (45, “045.txt”)  ' 鲁塔比斯
大漠.SetDict (46, “046.txt”)  ' 远征队普通
大漠.SetDict (47, “047.txt”)  ' 远征队困难
大漠.SetDict (48, “048.txt”)  ' 委托
大漠.SetDict (49, “049.txt”)  ' 军团长困难
大漠.SetDict (50, “050.txt”)  ' 灵核
大漠.SetDict (51, “051.txt”)  ' 仓库
大漠.SetDict (52, “052.txt”)  ' 联盟
大漠.SetDict (53, “053.txt”)  ' 制作消耗品
大漠.SetDict (54, “054.txt”)  ' 变更潜能
大漠.SetShowErrorMsg (0)
登录 (i)  ' 启动游戏-登录账号
' 加入公会 (i)
进入许可区 (许可证)
任务文本 = 全局任务文本
' 精炼等级 = 全局精炼等级
' 篆刻等级 = 全局篆刻等级
切换角色 = 全局自动切换角色
打乱任务 = 全局打乱任务执行顺序
自动使用挂机卡 = 全局使用挂机卡
自动加入公会 = 全局加入公会
自动配置宠物 = 全局配置宠物
自动技能类型一 = 全局技能类型一
自动技能类型二 = 全局技能类型二
' 日常活动
自动材料副本 = 全局材料副本
自动精英副本 = 全局精英副本
自动奈特的金字塔 = 全局奈特的金字塔
自动武陵道场 = 全局武陵道场
自动永恒之塔 = 全局永恒之塔
自动周常副本 = 全局周常副本
自动金钩海兵王 = 全局金钩海兵王
自动进化系统 = 全局进化系统
自动天空岛贸易 = 全局天空岛贸易
自动次元入侵 = 全局次元入侵
自动星光梦塔 = 全局星光梦塔
自动怪物乐园 = 全局怪物乐园
自动唐云的料理室 = 全局唐云的料理室
窗口卡点任务 = 大漠多线程 [i].卡点任务
窗口已完成任务索引 = 大漠多线程 [i].当前已完成任务索引
自动添加经验券 = 全局添加经验券
切换大区 = 全局自动切换大区
' 切换大区
自动切换玛丽亚区 = 全局切换玛丽亚区
自动切换童话村区 = 全局切换童话村区
自动切换蓝蜗牛区 = 全局切换蓝蜗牛区
自动切换祖母绿区 = 全局切换祖母绿区
自动切换顽皮猴区 = 全局切换顽皮猴区
自动切换微微安区 = 全局切换微微安区
自动切换阿勒斯区 = 全局切换阿勒斯区
自动切换蘑菇仔区 = 全局切换蘑菇仔区
自动切换绿水灵区 = 全局切换绿水灵区
自动切换月妙区 = 全局切换月妙区
自动切换漂漂猪区 = 全局切换漂漂猪区
自动切换白雪人区 = 全局切换白雪人区
自动切换黑水晶区 = 全局切换黑水晶区
自动切换水晶钻区 = 全局切换水晶钻区
' 兑换物品
自动钥匙兑换挂机卡 = 全局钥匙兑换挂机卡
自动贸易兑换挂机卡 = 全局贸易兑换挂机卡
自动星光兑换挂机卡 = 全局星光兑换挂机卡
自动法老兑换挂机卡 = 全局法老兑换挂机卡
自动怪物兑换挂机卡 = 全局怪物兑换挂机卡
自动公会兑换挂机卡 = 全局公会兑换挂机卡
' 购买血蓝
自动购买三级血跟蓝 = 全局购买三级血跟蓝
自动购买四级血跟蓝 = 全局购买四级血跟蓝
自动购买五级血跟蓝 = 全局购买五级血跟蓝
自动购买六级血跟蓝 = 全局购买六级血跟蓝
自动购买七级血跟蓝 = 全局购买七级血跟蓝
自动购买八级血跟蓝 = 全局购买八级血跟蓝
' 公会选项
自动图书馆升级 = 全局图书馆升级
自动领地树升级 = 全局领地树升级
自动篝火升级 = 全局篝火升级
自动厨师升级 = 全局厨师升级
自动设计师升级 = 全局设计师升级
自动商店升级 = 全局商店升级
自动领主召唤 = 全局领主召唤
自动领主讨伐 = 全局领主讨伐
自动圣瑞尼亚 = 全局圣瑞尼亚
自动公会对抗赛 = 全局公会对抗赛
自动公会领地 = 全局公会领地
自动公会要塞 = 全局公会要塞
自动王中王争霸 = 全局王中王争霸
自动个人技能升级 = 全局个人技能升级
自动通用技能升级 = 全局通用技能升级
自动星之力定时远征队 = 全局星之力定时远征队
时间 = 取现行时间 ()
时 = 取小时 (时间)
退出许可区 (许可证)
' 委托任务 (i)
' 委托任务 (i)
' 环线任务 (i)
任务数组 = 分割文本 (任务文本, “|”, )
清除数组 (新任务数组)
如果 (打乱任务 = )
判断循环首 (取数组成员数 (任务数组) > 0)  ' 直到原数组中的成员全部选出,结束循环
随机数 = 取随机数 (1, 取数组成员数 (任务数组))
加入成员 (新任务数组, 任务数组 [随机数])  ' 将成员添加到新数组中
删除成员 (任务数组, 随机数, 1)  ' 原数组中删除当前成员
判断循环尾 ()



新任务数组 = 任务数组
如果真 (窗口已完成任务索引 > 0)
当前窗口已完成任务参数 = 1
计次循环首 (窗口已完成任务索引, 当前窗口已完成任务参数)
删除成员 (新任务数组, 当前窗口已完成任务参数, 1)
计次循环尾 ()

如果真 (窗口卡点任务 ≠ “”)
窗口任务总数 = 取数组成员数 (新任务数组)
当前窗口任务参数 = 1
判断循环首 (窗口任务总数 ≥ 当前窗口任务参数)
如果真 (新任务数组 [当前窗口任务参数] = 窗口卡点任务)
删除成员 (新任务数组, 当前窗口任务参数, 1)
窗口任务总数 = 取数组成员数 (新任务数组)
当前窗口任务参数 = 1
当前窗口任务参数 = 当前窗口任务参数 + 1
判断循环尾 ()


计次循环首 (取数组成员数 (新任务数组), a)  ' 做任务
判断 (新任务数组 [a]“主线任务”)
如果真 (时 = 12)
远征队困难 (i)

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

主线任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)

判断 (新任务数组 [a]“一键日常”)
如果真 (时 = 12)
远征队困难 (i)

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

日常玩法 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“委托任务”)
如果真 (时 = 12)
远征队困难 (i)

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

委托任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“星力战场”)
如果真 (时 = 12)
远征队困难 (i)

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

如果真 (自动使用挂机卡 = )
使用挂机卡 (i)

如果真 (自动添加经验券 = )
添加经验券 (i)

星之力 (i)
如果真 (自动星之力定时远征队 = )
星之力定时远征队 (i)

进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“军团长”)
如果真 (时 = 12)
远征队困难 (i)

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

' 军团长 (i)
军团长困难 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“混沌远征队”)
如果真 (时 = 12)
远征队困难 (i)

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

' 混沌远征队 (i)
混沌远征任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“背包整理”)
如果真 (时 = 12)
远征队困难 (i)

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

背包整理 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“领取邮件”)
如果真 (时 = 12)
远征队困难 (i)

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

领取邮件 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“宠物探险”)
如果真 (时 = 12)
远征队困难 (i)

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

宠物探险 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (自动配置宠物 = )
宠物配置 (i)

判断 (新任务数组 [a]“限时道具”)
如果真 (时 = 12)
远征队困难 (i)

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

限时道具 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“公会任务”)
如果真 (时 = 12)
远征队困难 (i)

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

公会任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (时 = 12)
远征队困难 (i)

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

如果真 (自动加入公会 = )
加入公会 (i)

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

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

如果真 (自动图书馆升级 = )
图书馆升级 (i)

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

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

如果真 (自动领地树升级 = )
领地树升级 (i)

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

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

如果真 (自动篝火升级 = )
篝火升级 (i)

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

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

如果真 (自动厨师升级 = )
厨师升级 (i)

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

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

如果真 (自动设计师升级 = )
设计师升级 (i)

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

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

如果真 (自动商店升级 = )
商店升级 (i)

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

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

如果真 (自动领主召唤 = )
领主召唤 (i)

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

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

如果真 (自动领主讨伐 = )
领主讨伐 (i)

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

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

如果真 (自动圣瑞尼亚 = )
圣瑞尼亚 (i)

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

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

如果真 (自动公会对抗赛 = )
公会对抗赛 (i)

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

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

如果真 (自动公会领地 = )
公会领地 (i)

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

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

如果真 (自动公会要塞 = )
公会要塞 (i)

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

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

如果真 (自动王中王争霸 = )
王中王争霸 (i)

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

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

如果真 (自动个人技能升级 = )
个人技能升级 (i)

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

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

如果真 (自动通用技能升级 = )
通用技能升级 (i)

判断 (新任务数组 [a]“成就领取”)
如果真 (时 = 12)
远征队困难 (i)

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

成就领取 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“成长领取”)
如果真 (时 = 12)
远征队困难 (i)

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

成长领取 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“技能加满”)
如果真 (时 = 12)
远征队困难 (i)

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

技能加满 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (自动技能类型一 = )
技能类型一 (i)

如果真 (自动技能类型二 = )
技能类型二 (i)

判断 (新任务数组 [a]“冒险战令”)
如果真 (时 = 12)
远征队困难 (i)

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

冒险战令 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“限时活动”)
如果真 (时 = 12)
远征队困难 (i)

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

限时活动 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“购买药品”)
如果真 (时 = 12)
远征队困难 (i)

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

购买药品 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (时 = 12)
远征队困难 (i)

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

如果真 (自动购买三级血跟蓝 = )
购买三级血跟蓝 (i)

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

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

如果真 (自动购买四级血跟蓝 = )
购买四级血跟蓝 (i)

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

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

如果真 (自动购买五级血跟蓝 = )
购买五级血跟蓝 (i)

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

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

如果真 (自动购买六级血跟蓝 = )
购买六级血跟蓝 (i)

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

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

如果真 (自动购买七级血跟蓝 = )
购买七级血跟蓝 (i)

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

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

如果真 (自动购买八级血跟蓝 = )
购买八级血跟蓝 (i)

判断 (新任务数组 [a]“兑换物品”)
如果真 (时 = 12)
远征队困难 (i)

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

兑换物品 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (时 = 12)
远征队困难 (i)

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

如果真 (自动钥匙兑换挂机卡 = )
钥匙兑换挂机卡 (i)

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

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

如果真 (自动贸易兑换挂机卡 = )
贸易兑换挂机卡 (i)

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

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

如果真 (自动星光兑换挂机卡 = )
星光兑换挂机卡 (i)

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

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

如果真 (自动法老兑换挂机卡 = )
法老兑换挂机卡 (i)

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

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

如果真 (自动怪物兑换挂机卡 = )
怪物兑换挂机卡 (i)

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

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

如果真 (自动公会兑换挂机卡 = )
公会兑换挂机卡 (i)

判断 (新任务数组 [a]“升级强化”)
如果真 (时 = 12)
远征队困难 (i)

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

升级强化 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“宝石任务”)
如果真 (时 = 12)
远征队困难 (i)

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

宝石任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“热力增益”)
如果真 (时 = 12)
远征队困难 (i)

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

热力增益 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“制作史诗装备”)
如果真 (时 = 12)
远征队困难 (i)

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

制作史诗装备 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“交易所”)
如果真 (时 = 12)
远征队困难 (i)

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

交易所 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“背包拓展”)
如果真 (时 = 12)
远征队困难 (i)

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

背包拓展 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“扩充出售栏”)
如果真 (时 = 12)
远征队困难 (i)

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

扩充出售栏 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“使用经验券”)
如果真 (时 = 12)
远征队困难 (i)

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

使用经验券 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“日常玩法”)
日常玩法 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (时 = 12)
远征队困难 (i)

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

如果真 (自动材料副本 = )
材料副本 (i)

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

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

如果真 (自动精英副本 = )
精英副本 (i)

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

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

如果真 (自动奈特的金字塔 = )
奈特的金字塔 (i)

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

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

如果真 (自动武陵道场 = )
武陵道场 (i)

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

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

如果真 (自动永恒之塔 = )
永恒之塔 (i)

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

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

如果真 (自动周常副本 = )
周常副本 (i)

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

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

如果真 (自动金钩海兵王 = )
金钩海兵王 (i)

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

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

如果真 (自动进化系统 = )
进化系统 (i)

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

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

如果真 (自动天空岛贸易 = )
天空岛贸易 (i)

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

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

如果真 (自动次元入侵 = )
次元入侵 (i)

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

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

如果真 (自动星光梦塔 = )
星光梦塔 (i)

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

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

如果真 (自动怪物乐园 = )
怪物乐园 (i)

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

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

如果真 (自动唐云的料理室 = )
唐云的料理室 (i)

判断 (新任务数组 [a]“军团长普通”)
如果真 (时 = 12)
远征队困难 (i)

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

军团长普通 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“混沌远征任务”)
如果真 (时 = 12)
远征队困难 (i)

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

混沌远征任务 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“星之力”)
如果真 (自动使用挂机卡 = )
使用挂机卡 (i)

如果真 (自动添加经验券 = )
添加经验券 (i)

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

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

星之力 (i)
如果真 (自动星之力定时远征队 = )
星之力定时远征队 (i)

进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“优化设置”)
如果真 (时 = 12)
远征队困难 (i)

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

优化设置 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“鲁塔比斯”)
如果真 (时 = 12)
远征队困难 (i)

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

鲁塔比斯 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“远征队普通”)
远征队普通 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“远征队困难”)
远征队困难 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“委托”)
如果真 (时 = 12)
远征队困难 (i)

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

委托 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“军团长困难”)
如果真 (时 = 12)
远征队困难 (i)

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

军团长困难 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“灵核”)
如果真 (时 = 12)
远征队困难 (i)

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

灵核 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“仓库”)
如果真 (时 = 12)
远征队困难 (i)

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

仓库 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“联盟”)
如果真 (时 = 12)
远征队困难 (i)

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

联盟 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“制作消耗品”)
如果真 (时 = 12)
远征队困难 (i)

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

制作消耗品 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“变更潜能”)
如果真 (时 = 12)
远征队困难 (i)

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

变更潜能 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
判断 (新任务数组 [a]“切换大区”)
切换大区 (i)
进入许可区 (许可证)
大漠多线程 [i].当前已完成任务索引 = 大漠多线程 [i].当前已完成任务索引 + 1
退出许可区 (许可证)
如果真 (自动切换玛丽亚区 = )
切换玛丽亚区 (i)

如果真 (自动切换童话村区 = )
切换童话村区 (i)

如果真 (自动切换蓝蜗牛区 = )
切换蓝蜗牛区 (i)

如果真 (自动切换祖母绿区 = )
切换祖母绿区 (i)

如果真 (自动切换顽皮猴区 = )
切换顽皮猴区 (i)

如果真 (自动切换微微安区 = )
切换微微安区 (i)

如果真 (自动切换阿勒斯区 = )
切换阿勒斯区 (i)

如果真 (自动切换蘑菇仔区 = )
切换蘑菇仔区 (i)

如果真 (自动切换绿水灵区 = )
切换绿水灵区 (i)

如果真 (自动切换月妙区 = )
切换月妙区 (i)

如果真 (自动切换漂漂猪区 = )
切换漂漂猪区 (i)

如果真 (自动切换白雪人区 = )
切换白雪人区 (i)

如果真 (自动切换黑水晶区 = )
切换黑水晶区 (i)

如果真 (自动切换水晶钻区 = )
切换水晶钻区 (i)




计次循环尾 ()
' 切换多角色
如果真 (切换角色 = )
切换多角色 (i)

如果真 (切换大区 = )
切换大区 (i)

大漠.UnBindWindow ()
' ’进程_结束 (大漠多线程 [i].进程ID)
全局窗口数量 = 全局窗口数量 - 1
大漠.释放 ()
' 大漠.销毁 ()
' 线程_退出1 (大漠多线程 [i].线程句柄)
线程_销毁 (大漠多线程 [i].线程句柄)


i支持库列表   支持库注释   
EThread多线程支持库

点评

第一次见求助帖冲上每周热榜的   河南省周口市  发表于 昨天 21:52

评分

参与人数 2精币 +2 收起 理由
huangdi956 + 1 感谢分享,很给力!~
Zźh926 + 1 感谢分享,很给力!~

查看全部评分


回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:73% (11/15)

签到天数: 4 天

沙发
 楼主| 发表于 昨天 06:16 | 只看该作者   广东省深圳市
每个子程序前面加定时程序是因为我不知道任务跑到哪里才到12点或20点
回复

使用道具 举报

结帖率:73% (11/15)

签到天数: 4 天

板凳
 楼主| 发表于 昨天 07:49 | 只看该作者   广东省深圳市
还要考虑当前任务是否执行完毕,可以写个子线程去判断时间,然后时间到了用许可证+线程启动子程序执行
回复

使用道具 举报

结帖率:100% (3/3)

签到天数: 12 天

地板
发表于 昨天 08:45 | 只看该作者   陕西省西安市
如果是判断当天的话  就需要写配置项   记录时间   如果没有读取到今天的日期  那就是今天没有执行   启动的时候做一个初始化    例如: 线程[i].定时启动=假

如果是  有记录   那就赋值为真

在定时启动里面做判断   如果等于假再运行定时任务    如果定时任务运行过以后   在运行的定时任务里面再赋值定时启动的=真   写出配置项

回复

使用道具 举报

结帖率:100% (14/14)

签到天数: 13 天

地下
发表于 昨天 09:02 | 只看该作者   **
取现行时间  跟定时时间对比,这样就是当天时间,超过定时时间不执行。你这代码太吓人了,一个子程序里这么多判断...
回复

使用道具 举报

结帖率:100% (14/14)

签到天数: 13 天

6
发表于 昨天 09:03 | 只看该作者   **
鱼老板 发表于 2025-3-12 08:45
如果是判断当天的话  就需要写配置项   记录时间   如果没有读取到今天的日期  那就是今天没有执行   启动 ...

不用这么麻烦吧,一天只有24小时,也只有一个12点和20点,没必要读写配置项进行判断
回复

使用道具 举报

结帖率:100% (3/3)

签到天数: 12 天

7
发表于 昨天 09:05 | 只看该作者   陕西省西安市
是可可吖 发表于 2025-3-12 09:03
不用这么麻烦吧,一天只有24小时,也只有一个12点和20点,没必要读写配置项进行判断 ...

那脚本关闭了   第二次启动怎么知道今天12点有没有弄过。他说的是   12点或20点  某一次后今天就不执行了
回复

使用道具 举报

结帖率:100% (14/14)

签到天数: 13 天

8
发表于 昨天 09:12 | 只看该作者   **
鱼老板 发表于 2025-3-12 09:05
那脚本关闭了   第二次启动怎么知道今天12点有没有弄过。他说的是   12点或20点  某一次后今天就不执行了 ...

取现行时间  跟定时  对比啊,到定时时间自动执行副本

点评

审题,题目里写了 如果12点或者20点执行过一次 那就不再执行了 同理如果这个脚本在12点执行过了 关了 但是20点之前又开了 还执行吗?   陕西省西安市  发表于 昨天 09:26
回复

使用道具 举报

结帖率:100% (14/14)

签到天数: 13 天

9
发表于 昨天 09:22 | 只看该作者   **
你这样写加几十个   时=12  时=20,还不如用时钟周期,现行时间=12和=20的时间,直接进  远征队副本
回复

使用道具 举报

结帖率:100% (3/3)

签到天数: 12 天

10
发表于 昨天 09:24 | 只看该作者   陕西省西安市
是可可吖 发表于 2025-3-12 09:12
取现行时间  跟定时  对比啊,到定时时间自动执行副本

定时的时间是两个数字   一个12点  一个20点   对不   那12点的执行了  但是这个时候脚本关闭了   20点的还执行吗?   上面写了   12点的执行了  20点的就不执行了   

补充内容 (2025-3-12 09:25):
如果是两个时间都需要做这个任务   那只需要判断时间就行了   但是他最开始的需求写的就是    如果今天12点或20点执行过一次以后  就不需要再执行
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表