给循环加个时间限制

乐鱼驴

  

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

变量名	类 型	静态	数组	备 注
a	整数型
i	整数型
启动时间	日期时间型
限定时间8秒	整数型

置随机数种子 ()
启动时间 ＝ 取现行时间 ()
判断循环首 (真)
a ＝ 取随机数 (88, 111)
如果真 (a ＝ 100)
跳出循环 ()
程序_延时 (1000, )
限定时间8秒 ＝ 取时间间隔 (取现行时间 (), 启动时间, 8)
如果真 (限定时间8秒 ≥ 8)
跳出循环 ()

判断循环尾 ()
判断 (限定时间8秒 ≥ 8)
信息框 (“超时跳出”, 0, , )
判断 (a ＝ 100)
信息框 (“完成任务”, 0, , )

.版本 2<br /> <br /> .子程序 子程序1<br /> .局部变量 a, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 启动时间, 日期时间型<br /> .局部变量 限定时间8秒, 整数型<br /> <br /> 置随机数种子 ()<br /> 启动时间 ＝ 取现行时间 ()<br /> .判断循环首 (真)<br />     a ＝ 取随机数 (88, 111)<br />     .如果真 (a ＝ 100)<br />         跳出循环 ()<br />     .如果真结束<br />     程序_延时 (1000, )<br />     限定时间8秒 ＝ 取时间间隔 (取现行时间 (), 启动时间, 8)<br />     .如果真 (限定时间8秒 ≥ 8)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> <br /> <br /> <br /> .判断开始 (限定时间8秒 ≥ 8)<br />     信息框 (“超时跳出”, 0, , )<br /> .判断 (a ＝ 100)<br />     信息框 (“完成任务”, 0, , )

pipicool

学习一下

jianfengxu

这个。。。。学到了

我爱逛精易

wo2010000n

在死循环里面不断调用 "取时间间隔 (取现行时间 (), 启动时间, 8)" 来计时可真不是什么好方案。。。

myxy1022

wo2010000n 发表于 2023-5-15 00:00
在死循环里面不断调用 "取时间间隔 (取现行时间 (), 启动时间, 8)" 来计时可真不是什么好方案。。。

多线程呢

a3960382663

开源精神必须支持~

一指温柔

谢谢分享~~~~~~~~~~~~

ocimei

开源精神必须支持~

wuqingg

挺好的~~~