不使用程序集变量完成模拟红绿灯程序

winsYI · 发表于 2017-10-4 21:42:43

.版本 2
.程序集窗口程序集_启动窗口
.程序集变量程序集_红灯亮的时间, 整数型
.程序集变量程序集_绿灯亮的时间, 整数型
.程序集变量程序集_黄灯亮的时间, 整数型
.子程序 _按钮_启动_被单击
外形框_绿.可视＝假
外形框_黄.可视＝假
程序集_红灯亮的时间＝ 5
时钟_红.时钟周期＝ 1000

.子程序 _时钟_红_周期事件
程序集_红灯亮的时间＝程序集_红灯亮的时间－ 1
标签_红灯剩余时间.标题＝到文本 (程序集_红灯亮的时间)
.如果真 (程序集_红灯亮的时间＝ 0)
外形框_红.可视＝假
时钟_红.时钟周期＝ 0
外形框_绿.可视＝真
时钟_绿.时钟周期＝ 1000
程序集_绿灯亮的时间＝ 10
.如果真结束

.子程序 _时钟_绿_周期事件
程序集_绿灯亮的时间＝程序集_绿灯亮的时间－ 1
.判断开始断 (程序集_绿灯亮的时间＝ 4)
' 外形框_绿.可视＝假
.' 判断 (程序集_绿灯亮的时间＝ 3)
' 外形框_绿.可视＝真
.' 判断 (程序集_绿灯亮的时间＝ 2)
' 外形框_绿.可视＝假
.' 判断 (程序集_绿灯亮的时间＝ 1)
' 外形框_绿.可视＝真
.默认
.判断结束
.如果真 (程序集_绿灯亮的时间 ≤ 4)
外形框_绿.可视＝取反 (外形框_绿.可视)
.如果真结束

.如果真 (程序集_绿灯亮的时间＝ 0)
外形框_绿.可视＝假
时钟_绿.时钟周期＝ 0
外形框_黄.可视＝真
程序集_黄灯亮的时间＝ 3
时钟_黄.时钟周期＝ 1000
.如果真结束

.子程序 _时钟_黄_周期事件
程序集_黄灯亮的时间＝程序集_黄灯亮的时间－ 1
.如果真 (程序集_黄灯亮的时间＝ 0)
外形框_黄.可视＝假
时钟_黄.时钟周期＝ 0
外形框_红.可视＝真
程序集_红灯亮的时间＝ 5
时钟_红.时钟周期＝ 1000

待删用户 · 发表于 2017-10-4 21:44:57

可以用局部变量,和全局变量

winsYI · 发表于 2017-10-4 21:55:59

NiceGum 发表于 2017-10-4 21:44
可以用局部变量,和全局变量

我补充一点啊！在这里不能使用程序集变量也不能用全局变量

云云云云钟 · 发表于 2017-10-4 21:58:21

5积分太多了

winsYI · 发表于 2017-10-4 22:03:31

云云云云钟发表于 2017-10-4 21:58
5积分太多了

老哥，解决问题呗

待删用户 · 发表于 2017-10-4 22:08:13

winsYI 发表于 2017-10-4 21:55
我补充一点啊！在这里不能使用程序集变量也不能用全局变量

局部,程序集,全局,都不能使用那就用数据类型, 如果连数据类型不给用,建议你去RMB定制区,MMP,JB是RMB吗? 5个JB有瘠薄用? 还提出这么多要求 ! ! ! 我给你50JB滚出论坛好不好 ? ? ?

Default · 发表于 2017-10-4 22:09:55

局部静态试试吧

Default · 发表于 2017-10-4 22:10:33

或者读写文件

云云云云钟 · 发表于 2017-10-4 22:16:03

winsYI 发表于 2017-10-4 22:03
老哥，解决问题呗

我搞不懂这个意义何在？

何必太在意 · 发表于 2017-10-4 22:16:22

那只能用配置文件了，变量是一个程序必不可少的，你要是连变量都不让用，只好用配置文件

		自动登录	找回密码
密码			注册

[精币悬赏] 不使用程序集变量完成模拟红绿灯程序