在线程里判断定时启动，导致子程序不执行。一直执行定...

是可可吖

jacket12 发表于 2025-3-12 15:43
定时代码单独运行不会卡死在任务，加了时钟就会卡，有时间也不执行

估计是你写的不对，我之前玩一款游戏，就是这么写到，多线程不卡啊，而且还是到时间进，打完副本退出回城

jacket12

jacket12 发表于 2025-3-12 15:43
定时代码单独运行不会卡死在任务，加了时钟就会卡，有时间也不执行

  

子程序名返回值类型公开备 注
_时钟1_周期事件  
变量名类 型静态数组备 注
时整数型
分整数型
秒整数型
时间日期时间型
时间 ＝ 取现行时间 ()
时 ＝ 取小时 (时间)
分 ＝ 取分钟 (时间)
秒 ＝ 取秒 (时间)
如果真 (时 ＝ 0 且 分 ＝ 3 且 秒 ＝ 1)
线程_启动 (&特殊子程序)
子程序名返回值类型公开备 注
特殊子程序  
变量名类 型静态数组备 注
i整数型
线程_挂起 (句柄)
计次循环首 (10, i)
调试输出 (“特殊”, i)
程序_延时 (1000)
计次循环尾 ()
线程_恢复 (句柄)

子程序名        返回值类型        公开        备 注<br /> _时钟1_周期事件                          <br /> 变量名        类 型        静态        数组        备 注<br /> 时        整数型                         <br /> 分        整数型                         <br /> 秒        整数型                         <br /> 时间        日期时间型                         <br /> 时间 ＝ 取现行时间 ()<br /> 时 ＝ 取小时 (时间)<br /> 分 ＝ 取分钟 (时间)<br /> 秒 ＝ 取秒 (时间)<br /> 如果真 (时 ＝ 0 且 分 ＝ 3 且 秒 ＝ 1)<br /> 线程_启动 (&特殊子程序)<br /> <br /> 子程序名        返回值类型        公开        备 注<br /> 特殊子程序                          <br /> 变量名        类 型        静态        数组        备 注<br /> i        整数型                         <br /> 线程_挂起 (句柄)<br /> 计次循环首 (10, i)<br /> 调试输出 (“特殊”, i)<br /> 程序_延时 (1000)<br /> 计次循环尾 ()<br /> 线程_恢复 (句柄)

jacket12

是可可吖 发表于 2025-3-12 15:47
估计是你写的不对，我之前玩一款游戏，就是这么写到，多线程不卡啊，而且还是到时间进，打完副本退出回城 ...

提供一下参考

pengyuanjun

用这个改

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
句柄	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

句柄 ＝ 线程_启动 (&子程序1, , )

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
i	整数型

判断循环首 (真)
i ＝ i ＋ 1
调试输出 (i)
程序_延时 (1000)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
时	整数型
分	整数型
秒	整数型
时间	日期时间型

时间 ＝ 取现行时间 ()
时 ＝ 取小时 (时间)
分 ＝ 取分钟 (时间)
秒 ＝ 取秒 (时间)
如果真 (时 ＝ 0 且 分 ＝ 3 且 秒 ＝ 1)
线程_启动 (&特殊子程序)

子程序名	返回值类型	公开	备 注
特殊子程序

变量名	类 型	静态	数组	备 注
i	整数型

线程_挂起 (句柄)
计次循环首 (10, i)
调试输出 (“特殊”, i)
程序_延时 (1000)
计次循环尾 ()
线程_恢复 (句柄)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 句柄, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 句柄 ＝ 线程_启动 (&子程序1, , )<br /> <br /> .子程序 子程序1<br /> .局部变量 i, 整数型<br /> <br /> .判断循环首 (真)<br />     i ＝ i ＋ 1<br /> <br />     调试输出 (i)<br />     程序_延时 (1000)<br /> .判断循环尾 ()<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 时, 整数型<br /> .局部变量 分, 整数型<br /> .局部变量 秒, 整数型<br /> .局部变量 时间, 日期时间型<br /> <br /> 时间 ＝ 取现行时间 ()<br /> 时 ＝ 取小时 (时间)<br /> 分 ＝ 取分钟 (时间)<br /> 秒 ＝ 取秒 (时间)<br /> .如果真 (时 ＝ 0 且 分 ＝ 3 且 秒 ＝ 1)<br />     线程_启动 (&特殊子程序)<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 特殊子程序<br /> .局部变量 i, 整数型<br /> <br /> 线程_挂起 (句柄)<br /> .计次循环首 (10, i)<br />     调试输出 (“特殊”, i)<br />     程序_延时 (1000)<br /> .计次循环尾 ()<br /> 线程_恢复 (句柄)

是可可吖

jacket12 发表于 2025-3-12 15:50
[e=0]子程序名        返回值类型        公开        备 注
_时钟1_周期事件                         
变量名        类 型        静态        数组        备 注

不用分秒，直接取时就行了，因为你要等当前任务做完才进远征，在如果真下面  计次循环  取参加列表框表项数，然后取第7列标题，再判断，标题=完成    进远征  

jacket12

是可可吖 发表于 2025-3-12 16:29
不用分秒，直接取时就行了，因为你要等当前任务做完才进远征，在如果真下面  计次循环  取参加列表框表项 ...

这种方式还是会一直执行（只有脱离12点才不会执行），我只要它到点执行一次就行，然后接着做其它未完成的任务

是可可吖

jacket12 发表于 2025-3-12 16:33
这种方式还是会一直执行（只有脱离12点才不会执行），我只要它到点执行一次就行，然后接着做其它未完成的 ...

不会一直执行啊，加上一个判断就行了，判断进去过了就返回

补充内容 (2025-3-12 16:40):
没进去过就进去

jacket12

是可可吖 发表于 2025-3-12 16:39
不会一直执行啊，加上一个判断就行了，判断进去过了就返回

补充内容 (2025-3-12 16:40):

如何加判断？

是可可吖

jacket12 发表于 2025-3-12 16:42
如何加判断？

例子.e (1 MB, 下载次数: 1)

昨天 17:00 上传

点击文件名下载附件

可以这样写，也可以直接加到你界面超级列表框里，新增一列，置标题，用来读取判断有没有打过，这样就不会一直进

jacket12

是可可吖 发表于 2025-3-12 16:39
不会一直执行啊，加上一个判断就行了，判断进去过了就返回

补充内容 (2025-3-12 16:40):

上面的代码改进去，编译执行直接报错