本人小白刚刚开始学习易语言,看了课程自己凭感觉写的,代码写的又臭又长,望大佬指导,帮忙精简优化一下!谢谢!
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 编辑框红 | 整数型 | | 编辑框黄 | 整数型 | | 编辑框绿 | 整数型 | | 重置编辑框红 | 整数型 | | 重置编辑框黄 | 整数型 | | 重置编辑框绿 | 整数型 | |
外形框_黄.可视 = 假 外形框_绿.可视 = 假 外形框_红.可视 = 假 编辑框红 = 10 编辑框黄 = 3 编辑框绿 = 10 重置编辑框红 = 10 重置编辑框黄 = 3 重置编辑框绿 = 10 编辑框_绿.内容 = 到文本 (编辑框绿 )外形框_红.可视 = 真 编辑框_红.内容 = 到文本 (编辑框红 )编辑框红 = 编辑框红 - 1 判断 (编辑框_红.内容 = “0”)时钟_红.时钟周期 = 0 外形框_红.可视 = 假 外形框_黄.可视 = 真 编辑框红 = 重置编辑框红 时钟_黄.时钟周期 = 1000 编辑框_红.内容 = 到文本 (重置编辑框红 )编辑框_黄.内容 = 到文本 (重置编辑框黄 )编辑框_绿.内容 = 到文本 (重置编辑框绿 )时钟_红.时钟周期 = 1000 编辑框_红.内容 = 到文本 (编辑框红 )编辑框_黄.内容 = 到文本 (编辑框黄 )编辑框黄 = 编辑框黄 - 1 判断 (编辑框_黄.内容 = “0”)时钟_黄.时钟周期 = 0 外形框_黄.可视 = 假 外形框_绿.可视 = 真 编辑框黄 = 重置编辑框黄 时钟_绿.时钟周期 = 1000 编辑框_黄.内容 = 到文本 (编辑框黄 )编辑框_绿.内容 = 到文本 (编辑框绿 )编辑框绿 = 编辑框绿 - 1 判断 (编辑框_绿.内容 = “6”)外形框_绿.可视 = 假 判断 (编辑框_绿.内容 = “5”)外形框_绿.可视 = 真 判断 (编辑框_绿.内容 = “4”)外形框_绿.可视 = 假 判断 (编辑框_绿.内容 = “3”)外形框_绿.可视 = 真 判断 (编辑框_绿.内容 = “2”)外形框_绿.可视 = 假 判断 (编辑框_绿.内容 = “1”)外形框_绿.可视 = 真 判断 (编辑框_绿.内容 = “0”)时钟_绿.时钟周期 = 0 外形框_绿.可视 = 假 外形框_红.可视 = 真 编辑框绿 = 重置编辑框绿 时钟_红.时钟周期 = 1000 时钟_红.时钟周期 = 0 时钟_黄.时钟周期 = 0 时钟_绿.时钟周期 = 0 编辑框_红.内容 = “”编辑框_黄.内容 = “”编辑框_绿.内容 = “”外形框_黄.可视 = 假 外形框_绿.可视 = 假 外形框_红.可视 = 假 判断 (时钟_红.时钟周期 = 0 且 时钟_黄.时钟周期 = 0 且 时钟_绿.时钟周期 = 0 且 编辑框_红.内容 ≠ “” 且 编辑框_黄.内容 ≠ “” 且 编辑框_绿.内容 ≠ “”)重置编辑框红 = 到整数 (编辑框_红.内容 )重置编辑框黄 = 到整数 (编辑框_黄.内容 )重置编辑框绿 = 到整数 (编辑框_绿.内容 )编辑框红 = 重置编辑框红 编辑框黄 = 重置编辑框黄 编辑框绿 = 重置编辑框绿 信息框 (“时间重置成功!”, 0, , )信息框 (“请在停止后在编辑框内输入有效的时间后重置!”, 0, , )
|