niubi 发表于 2021-8-2 21:08:38

大家来帮帮我检查程序BUG

代码部分:

.版本 2
.支持库 iext

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = #D键)
    外形框1.左边 = 外形框1.左边 + 8
.如果真结束
.如果真 (键代码 = #A键)
    外形框1.左边 = 外形框1.左边 - 8
.如果真结束
.如果真 (键代码 = #W键)
    外形框1.顶边 = 外形框1.顶边 - 8
.如果真结束
.如果真 (键代码 = #右光标键)
    外形框2.左边 = 外形框2.左边 + 8
.如果真结束
.如果真 (键代码 = #左光标键)
    外形框2.左边 = 外形框2.左边 - 8
.如果真结束
.如果真 (键代码 = #上光标键)
    外形框2.顶边 = 外形框2.顶边 - 8
.如果真结束
.如果真 (键代码 = #空格键 且 外形框2.左边 < 外形框1.左边 + 68 且 外形框2.左边 > 外形框1.左边 - 68 且 外形框2.顶边 > 外形框1.顶边 - 68)
    进度条1.位置 = 进度条1.位置 - 1
.如果真结束
.如果真 (键代码 = #F键 且 外形框2.左边 < 外形框1.左边 + 68 且 外形框2.左边 > 外形框1.左边 - 68 且 外形框1.顶边 > 外形框2.顶边 - 68)
    进度条2.位置 = 进度条2.位置 - 1
.如果真结束


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

外形框1.顶边 = 外形框1.顶边 + 1
外形框2.顶边 = 外形框2.顶边 + 1

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

.如果真 (外形框1.顶边 < 72)
    外形框1.顶边 = 72
.如果真结束
.如果真 (外形框2.顶边 < 72)
    外形框2.顶边 = 72
.如果真结束
.如果真 (外形框2.顶边 > 264)
    外形框2.顶边 = 264
.如果真结束
.如果真 (外形框1.顶边 > 264)
    外形框1.顶边 = 264
.如果真结束
.如果真 (外形框1.左边 < 0)
    外形框1.左边 = 0
.如果真结束
.如果真 (外形框1.左边 > 602)
    外形框1.左边 = 600
.如果真结束
.如果真 (外形框2.左边 < 0)
    外形框2.左边 = 0
.如果真结束
.如果真 (外形框2.左边 > 602)
    外形框2.左边 = 600
.如果真结束
标签1.标题 = 到文本 (进度条1.位置)
标签2.标题 = 到文本 (进度条2.位置)
.如果真 (进度条1.位置 = 0)
    透明标签1.标题 = “蓝队胜利”
    信息框 (“蓝队胜利,是否重来一局?”, 4, “胜利提示”, )
    外形框1.左边 = 0 且 外形框1.顶边 = 264 且 外形框2.左边 = 602 且 外形框2.顶边 = 264 且 进度条1.位置 = 100 且 进度条2.位置 = 100 且 透明标签1.标题 = “” 且 透明标签2.标题 = “”

.如果真结束
.如果真 (进度条2.位置 = 0)
    透明标签2.标题 = “红队胜利”
    信息框 (“红队胜利,是否重来一局?”, 4, “胜利提示”, )
    外形框1.左边 = 0 且 外形框1.顶边 = 264 且 外形框2.左边 = 602 且 外形框2.顶边 = 264 且 进度条1.位置 = 100 且 进度条2.位置 = 100 且 透明标签1.标题 = “” 且 透明标签2.标题 = “”




.如果真结束
























出错部分:“.版本 2
.支持库 iext

.如果真 (进度条1.位置 = 0)
    透明标签1.标题 = “蓝队胜利”
    信息框 (“蓝队胜利,是否重来一局?”, 4, “胜利提示”, )
    外形框1.左边 = 0 且 外形框1.顶边 = 264 且 外形框2.左边 = 602 且 外形框2.顶边 = 264 且 进度条1.位置 = 100 且 进度条2.位置 = 100 且 透明标签1.标题 = “” 且 透明标签2.标题 = “”

.如果真结束
.如果真 (进度条2.位置 = 0)
    透明标签2.标题 = “红队胜利”
    信息框 (“红队胜利,是否重来一局?”, 4, “胜利提示”, )
    外形框1.左边 = 0 且 外形框1.顶边 = 264 且 外形框2.左边 = 602 且 外形框2.顶边 = 264 且 进度条1.位置 = 100 且 进度条2.位置 = 100 且 透明标签1.标题 = “” 且 透明标签2.标题 = “”




.如果真结束





求帮助啊啊啊

十万个为什么 发表于 2021-8-2 21:20:54



这俩行是判断逻辑型的句子.应该放在如果真类的判断条件里.

niubi 发表于 2021-8-2 21:29:24

十万个为什么 发表于 2021-8-2 21:20
这俩行是判断逻辑型的句子.应该放在如果真类的判断条件里.

能说得再具体些吗?

1219191855 发表于 2021-8-4 15:54:30

666666666666
页: [1]
查看完整版本: 大家来帮帮我检查程序BUG