如何循环执行程序

kmskik

大佬们好，萌新求个问题解答，

组件为 2个按钮，2个时钟

我想要单击按钮1后，
时钟1.时钟周期=200，时钟2.时钟周期=0
延时1000ms后
时钟1.时钟周期=0，时钟2.时钟周期=200
再延时1000ms后
时钟1.时钟周期=200，时钟2.时钟周期=0
.....
如此无限反复执行下去

单击按钮2后，
以上循环都停止，2个时钟的周期都变0

求如何实现，谢谢了。


补充内容 (2017-7-20 19:31):
不好意思，我想用时钟1和2的周期事件来干别的事情。

呵呵仙

类_多线程许可证和类_多线程式时钟.rar (9.24 KB, 下载次数: 12)

2017-7-21 00:37 上传

点击文件名下载附件

没用时钟组件.太卡了.

木小果

世界如此美好

1. .版本 2
   
2. 
   
3. .子程序 _按钮1_被单击
   
4. 
   
5. 时钟1.时钟周期 ＝ 200
   
6. 
   
7. .子程序 _时钟1_周期事件
   
8. 
   
9. 延时 (1000)
   
10. 时钟1.时钟周期 ＝ 0
    
11. 时钟2.时钟周期 ＝ 200
    
12. 
    
13. .子程序 _时钟2_周期事件
    
14. 
    
15. 延时 (1000)
    
16. 时钟2.时钟周期 ＝ 0
    
17. 时钟1.时钟周期 ＝ 200
    

复制代码

补充内容 (2017-7-20 19:21):
.版本 2

.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
这是单击按钮2 停止的

liuqiuxian910

.版本 2



.子程序 _按钮1_被单击

时钟1.时钟周期 ＝ 200

.子程序 _时钟1_周期事件

延时 (1000)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 200
标签1.标题 ＝ 到文本 (取现行时间 ())

.子程序 _时钟2_周期事件

延时 (1000)
时钟2.时钟周期 ＝ 0
时钟1.时钟周期 ＝ 200
标签2.标题 ＝ 到文本 (取现行时间 ())

kmskik

Autism 发表于 2017-7-20 19:12
世界如此美好

你好，你这样的话时钟1和2的周期事件就不能写别的了。。我还想时钟1周期时间是按键A，时钟B的周期事件是按键B

木小果

kmskik 发表于 2017-7-20 19:30
你好，你这样的话时钟1和2的周期事件就不能写别的了。。我还想时钟1周期时间是按键A，时钟B的周期事件是 ...

那得用到三个时钟了

半俗半雅半疯癫

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 A, 逻辑型

.子程序 _按钮1_被单击

A ＝ 假
.判断循环首 (A ＝ 假)
    时钟1.时钟周期 ＝ 200
    时钟2.时钟周期 ＝ 0
    调试输出 (“00000000”)
    程序_延时 (2000)
    .如果真 (A ＝ 真)
        跳出循环 ()
    .如果真结束
    时钟1.时钟周期 ＝ 0
    时钟2.时钟周期 ＝ 200
    程序_延时 (2000)
    调试输出 (“3333333”)
    .如果真 (A ＝ 真)
        跳出循环 ()
    .如果真结束
    处理事件 ()

.判断循环尾 ()




.子程序 _按钮2_被单击

A ＝ 真
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0


.子程序 _时钟2_周期事件

调试输出 (“222222222”)

.子程序 _时钟1_周期事件

调试输出 (“1111111”)

木小果

ym1.e (3.66 KB, 下载次数: 7)

2017-7-20 19:39 上传

点击文件名下载附件

。。。

天下唯商

什么东西 思维太混乱了吧

newxhk

楼主这是我的写法不知道行不行，不过需要优化下。
=====================================================================
.版本 2
.支持库 spec

.子程序 _按钮1_被单击

.如果真 (时钟1.时钟周期 ＝ 0 且 时钟2.时钟周期 ＝ 0)
    时钟1.时钟周期 ＝ 200
    .判断循环首 (时钟1.时钟周期 ＝ 0 或 时钟2.时钟周期 ＝ 0)
        .如果 (时钟1.时钟周期 ＝ 0)
            时钟1.时钟周期 ＝ 200
            时钟2.时钟周期 ＝ 0
        .否则
            时钟1.时钟周期 ＝ 0
            时钟2.时钟周期 ＝ 200
        .如果结束
        延迟 (1000)
        
    .判断循环尾 ()
.如果真结束


.子程序 _按钮2_被单击

时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
=====================================================================