死循环

lengxiaowei

可以让死循环里某一个位置的代码只在特定的时候执行一次嘛，下次执行需要再触发条件的情况再次执行

  

如果真 (s ＝ “WAR”)
正常执行的代码

此处只需要执行一次的代码 如果真下面

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

.版本 2<br /> .支持库 spec<br /> <br />     .如果真 (s ＝ “WAR”)<br />       正常执行的代码<br />         <br /> 此处只需要执行一次的代码 如果真下面

补充内容 (2024-9-18 01:15):
如果S不等于WAR 就执行那个只执行一次的代码

KServer

多个标记变量，或者用位运算

lengxiaowei

KServer 发表于 2024-9-18 01:15
多个标记变量，或者用位运算

可以给个例子嘛

KServer

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
执行A	逻辑型
执行B	逻辑型

子程序名	返回值类型	公开	备 注
死循环

判断循环首 (真)
如果真 (执行A ＝ 真)
执行A ＝ 假
' 执行你的代码
如果真 (执行B ＝ 真)
执行B ＝ 假  ' 取消状态
' 执行B的代码

判断循环尾 ()

子程序名	返回值类型	公开	备 注
激活B

执行B ＝ 真

子程序名	返回值类型	公开	备 注
激活A

执行A ＝ 真

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 执行A, 逻辑型<br /> .程序集变量 执行B, 逻辑型<br /> <br /> .子程序 死循环<br /> <br /> .判断循环首 (真)<br />     .如果真 (执行A ＝ 真)<br />         执行A ＝ 假<br />         ' 执行你的代码<br />     .如果真结束<br />     .如果真 (执行B ＝ 真)<br />         执行B ＝ 假  ' 取消状态<br />         ' 执行B的代码<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> <br /> <br /> .子程序 激活B<br /> <br /> 执行B ＝ 真<br /> <br /> .子程序 激活A<br /> <br /> 执行A ＝ 真

lengxiaowei

KServer 发表于 2024-9-18 01:18

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

[/quote]
[e=0]判断循环首 (真)
如果真 (s ＝ “WAR”)
s ＝ “WAR”
' 执行正常的代码
如果真 (s ≠ “WAR”)
s = “WAR”  ' 取消状态
' 执行一次的代码
判断循环尾 ()
是这么个意思嘛

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口</blockquote></div><br /> [e=0]判断循环首 (真)<br /> 如果真 (s ＝ “WAR”)<br /> s ＝ “WAR”<br /> ' 执行正常的代码<br /> 如果真 (s ≠ “WAR”)<br /> s = “WAR”  ' 取消状态<br /> ' 执行一次的代码<br /> <br /> 判断循环尾 ()<br /> 是这么个意思嘛

Suky

你把如果真改成判断不行吗？

lengxiaowei

Suky 发表于 2024-9-18 01:37
你把如果真改成判断不行吗？

  

判断 (s ＝ “WAR”)
正常执行的代码
执行一次的代码
那这最后这个还不是会一直执行嘛 在死循环里面

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

.版本 2<br /> .支持库 spec<br /> <br />     .判断开始 (s ＝ “WAR”)<br />         正常执行的代码<br />     .默认<br />        执行一次的代码<br /> <br /> 那这最后这个还不是会一直执行嘛 在死循环里面

Suky

lengxiaowei 发表于 2024-9-18 01:43
[e=0].版本 2
.支持库 spec

如果S不等于WAR 就执行那个只执行一次的代码

这句话的意思是，就算下一次S不等于WAR，就不再执行这代码？

补充内容 (2024-9-18 01:55):
那你就再加一个开关就好了

补充内容 (2024-9-18 01:56):
做一个变量，执行前检查变量值，变量值不为初始值就不执行，执行一次后就改变变量值使其不为初始值

lzx5460

.版本 2
.支持库 spec

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 s, 文本型

' 简单粗暴有效的方法
.循环判断首 ()
    .循环判断首 ()
        ' 正常执行的代码
        ' 执行完成后s赋值为其他就会跳出循环
        s ＝ “000”
    .循环判断尾 (s ＝ “WAR”)
    延迟 (1000)
.循环判断尾 (s ≠ “000”)


' 此处只需要执行一次的代码 如果真下面

返回 (0)  ' 可以根据您的需要返回任意数值


补充内容 (2024-9-18 09:33):
中间的S=“000”改 111就行，写错了

走一回

  

如真真 (次数>0)
如果真 (s ＝ “WAR”)
正常执行的代码
次数=次数+1

此处只需要执行一次的代码 如果真下面

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

.版本 2<br /> .支持库 spec<br />     如真真(次数>0)<br />         .如果真 (s ＝ “WAR”)<br />               正常执行的代码<br />               次数=次数+1<br />         <br /> 此处只需要执行一次的代码 如果真下面