易语言编写红绿灯

答案:2 悬赏:50 手机版

解决时间 2021-04-05 22:26

提问者网友：遁入空寂
2021-04-05 08:16

就一个按钮，要求按一次3个灯填充色变化，一个有颜色，其余为透明，颜色就是红黄绿咯，有大虾帮忙么

最佳答案

五星知识达人网友：山有枢
2021-04-05 08:41

.版本 2
.支持库 spec

.程序集窗口程序集1
.程序集变量灯位置, 整数型

.子程序 __启动窗口_创建完毕

灯位置＝ 1
时钟1.时钟周期＝ 5000
图片框2.可视＝假
图片框3.可视＝假
图片框1.可视＝真

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

_时钟1_周期事件 ()

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

调试输出 (灯位置)
.判断开始 (灯位置＝ 1 且灯位置＜ 4)
图片框1.可视＝真
图片框2.可视＝假
图片框3.可视＝假
灯位置＝ 2
调试输出 (灯位置)
.判断 (灯位置＝ 2 且灯位置＜ 4)
图片框1.可视＝假
图片框2.可视＝真
图片框3.可视＝假
灯位置＝ 3
调试输出 (灯位置)
.判断 (灯位置＝ 3 且灯位置＜ 4)
图片框1.可视＝假
图片框2.可视＝假
图片框3.可视＝真
灯位置＝ 1
.默认

.判断结束

注：加三个图片框分别放三个(红、黄、绿)图片框，把底图换上三种图，模拟红绿灯。另加一个时钟

全部回答

1楼网友：毛毛
2021-04-05 09:49

.版本2

.程序集窗口程序集1

.程序集变量当前灯色,整数型

.子程序__启动窗口_创建完毕

'当前灯色0黄灯1绿灯2红灯

当前灯色＝0

时钟1.时钟周期＝500'1秒

进度条1.最大位置＝15

外形框1.填充颜色＝#黄色

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

进度条1.位置＝进度条1.位置＋1

标签1.标题＝“还剩余”＋到文本(进度条1.最大位置－进度条1.位置)＋“秒变色。”

.如果真(进度条1.位置＝进度条1.最大位置)

输出调试文本(“进入变色判断”)

.判断开始(当前灯色＝0)

当前灯色＝1

进度条1.最大位置＝3

外形框1.填充颜色＝#绿色

输出调试文本(“变色绿”)

.默认

.判断开始(当前灯色＝1)

当前灯色＝2

进度条1.最大位置＝60

外形框1.填充颜色＝#红色

输出调试文本(“变色红”)

.默认

.判断开始(当前灯色＝2)

当前灯色＝0

进度条1.最大位置＝15

外形框1.填充颜色＝#黄色

输出调试文本(“变色黄”)

.默认

.判断结束

进度条1.位置＝0

===================

根据本人测试已经成功！速速给分！

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！