按钮按下多次只能执行一次，涉及预输入操作

不二猫猫

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
按钮_按下	逻辑型

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

启动线程 (&子程序1, , )

子程序名	返回值类型	公开	备 注
_按钮1_被单击

按钮_按下 ＝ 真

子程序名	返回值类型	公开	备 注
子程序1

判断循环首 (真)
判断 (按钮_按下)
子程序2 ()



程序_延时 (1, 0)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
子程序2

调试输出 (“执行完毕1”)
调试输出 (“执行完毕2”)
按钮_按下 ＝ 假

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 按钮_按下, 逻辑型<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> 启动线程 (&子程序1, , )<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 按钮_按下 ＝ 真<br /> <br /> .子程序 子程序1<br /> <br /> .判断循环首 (真)<br /> <br />     .判断开始 (按钮_按下)<br />         子程序2 ()<br />     .默认<br /> <br />     .判断结束<br /> <br />     程序_延时 (1, 0)<br /> .判断循环尾 ()<br /> <br /> <br /> .子程序 子程序2<br /> <br /> 调试输出 (“执行完毕1”)<br /> 调试输出 (“执行完毕2”)<br /> 按钮_按下 ＝ 假

请问这样的逻辑代码怎么写修改才能让 子程序2  在5秒内只能执行一次
也就是5秒内不管按下多少次按钮 子程序2 只能调试输出 一次“执行完毕”

然后在添加一个预先输入指令，按钮的第一次点击 的时间记录，然后和后面按钮的点击时间记录。
如果后面点击按钮的时间 超过第一次点击时间的 3秒 ~ 4.9秒，按钮的第一次点击5秒后调试输出 “执行完毕”

上面写的逻辑有点问题，我说一下我想的逻辑下面才是最终效果

我理想中的效果：
第一次按下按钮时间：0秒   =执行操作  调试输出 (“执行完毕1”) 记录第一次按下的时间
第二次按下按钮的时间 1秒 = 判断 第一次按下与第二次按下时间间隔 少于3秒，什么都不执行
第三次按下按钮的时间 2秒 = 判断 第一次按下与第三次按下时间间隔  少于3秒，什么都不执行
第四次按下按钮的时间 3秒 = 判断 第一次按下与第四次按下时间间隔 大于或等于3秒，  开始执行代码 2秒后  执行操作  调试输出 (“执行完毕2”)   添加一个 排队记录*1
第五次按下按钮的时间 4秒 = 判断 第一次按下与第五次按下时间间隔  大于或等于3秒，（检查前面是否已经有了排队记录，如果有排队记录就跳过当前代码，如果没有就继续向后执行逻辑判断）  开始执行代码 1秒后  执行操作  调试输出 (“执行完毕2”)

如果期间 只有一次按钮按下，则5秒后什么都不运行，因为没有接收到 大于或等于3秒 继续执行的 预输入指令，
如果期间接收到预输入指令 则在 按钮第一次按下5秒后  调试输出 “执行完毕2”  +效果执行完毕 调试输出 “执行完毕2”  ，时间记录变成按钮第一次按下，并且记录时间，以此循环

按钮在期间可能按下几百次，但最终执行效果不变。（不管是 第一次按下 执行  还是 第四次按下执行，执行完毕后，都要记录时间当作最后一次执行，然后再继续等待预输入）

想做一个模拟格斗的游戏，不会写预输入，
就是类似拳皇那种格斗，预先提前输入操作，然后等最上面的指令执行期间的后半段时间，预先输入下一条连招指令，等最初的指令执行完毕，再执行下一条连招指令，以此类推，可以一直连招

黑咖啡

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
时间A	整数型
时间B	整数型
记号0	逻辑型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

置随机数种子 ()
时间B ＝ 取启动时间 () － 时间A
调试输出 (时间B ÷ 1000)
判断 (时间B ≥ 3000 且 时间B ≤ 5000)
记号0 ＝ 真
启动线程 (&执行子程序, 取随机数 (1000, 1999), )
判断 (时间B ＞ 5000)
启动线程 (&执行子程序, 取随机数 (2000, 2999), )

子程序名	返回值类型	公开	备 注
执行子程序
参数名	类 型	参考	可空	数组	备 注
程序随机号码	整数型

时间A ＝ 取启动时间 ()
调试输出 (到文本 (程序随机号码) ＋ “执行A”)
延迟 (5000)
判断 (记号0 ＝ 真)
调试输出 (到文本 (程序随机号码) ＋ “执行B”)
记号0 ＝ 假

i支持库列表	支持库注释
spec	特殊功能支持库
EThread	多线程支持库

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 时间A, 整数型<br /> .程序集变量 时间B, 整数型<br /> .程序集变量 记号0, 逻辑型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 置随机数种子 ()<br /> 时间B ＝ 取启动时间 () － 时间A<br /> 调试输出 (时间B ÷ 1000)<br /> .判断开始 (时间B ≥ 3000 且 时间B ≤ 5000)<br />     记号0 ＝ 真<br />     启动线程 (&执行子程序, 取随机数 (1000, 1999), )<br /> .判断 (时间B ＞ 5000)<br />     启动线程 (&执行子程序, 取随机数 (2000, 2999), )<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 执行子程序<br /> .参数 程序随机号码, 整数型<br /> <br /> 时间A ＝ 取启动时间 ()<br /> 调试输出 (到文本 (程序随机号码) ＋ “执行A”)<br /> 延迟 (5000)<br /> .判断开始 (记号0 ＝ 真)<br />     调试输出 (到文本 (程序随机号码) ＋ “执行B”)<br />     记号0 ＝ 假<br /> .默认

LEOONL

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
按下	逻辑型	1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果真 (按下 [1] ＝ 假)
按下 [1] ＝ 真
启动线程 (&计时, , )
调试输出 (1)

子程序名	返回值类型	公开	备 注
计时

延时 (5000)
按下 [1] ＝ 假

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 按下, 逻辑型, , "1"<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果真 (按下 [1] ＝ 假)<br />     按下 [1] ＝ 真<br />     启动线程 (&计时, , )<br />     调试输出 (1)<br /> .如果真结束<br /> <br /> <br /> .子程序 计时<br /> <br /> 延时 (5000)<br /> 按下 [1] ＝ 假

不二猫猫

操作：时间开始：0秒-9999999秒

按下 A  = 记录时间 0秒 直接执行操作 [A]    0秒=第一次按下时间

按下 A = 记录时间 2秒  0+2=2 ，对比 2 >= 3   不等于  什么都不执行
按下 A = 记录时间 4秒  0+4=4 ， 对比 4 >=3  等于 条件成立。 4秒=第一次按下时间，且再1秒后直接执行操作 [A]
按下 A = 记录时间 6秒  6-第一次按下时间 =2 ，对比 2>=3 不等于  什么都不执行
按下 A =记录时间 7秒  7-第一次按下时间 =3 ，对比 3>=3 等于 条件成立 。7秒=第一次按下时间，且再2秒后直接执行操作 [A]
按下 A =记录时间 15秒 15-第一次按下时间 =8，对比 8>=3 且>=5 等于 条件成立，15秒=第一次按下时间，直接执行操作 [A] 无需等待

chenboss

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
按下	逻辑型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
初始时间	整数型

调试输出 ( (到整数 (取启动时间 () ÷ 1000) － 初始时间) ％ 5)
如果真 (按下)
返回 ()

如果真 (初始时间 ＝ 0)
初始时间 ＝ 取启动时间 () ÷ 1000
按下 ＝ 真
启动线程 (&子程序1, , )

如果真 ( (到整数 (取启动时间 () ÷ 1000) － 初始时间) ％ 5 ≥ 3)
初始时间 ＝ 0
按下 ＝ 真
启动线程 (&子程序1, , )

子程序名	返回值类型	公开	备 注
子程序1

调试输出 (“执行完毕1”)
延时 (1000)
调试输出 (“执行完毕2”)
按下 ＝ 假

i支持库列表	支持库注释
spec	特殊功能支持库
EThread	多线程支持库

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 按下, 逻辑型<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 初始时间, 整数型, 静态<br /> <br /> 调试输出 ((到整数 (取启动时间 () ÷ 1000) － 初始时间) ％ 5)<br /> .如果真 (按下)<br />     返回 ()<br /> .如果真结束<br /> <br /> .如果真 (初始时间 ＝ 0)<br />     初始时间 ＝ 取启动时间 () ÷ 1000<br />     按下 ＝ 真<br />     启动线程 (&子程序1, , )<br /> .如果真结束<br /> <br /> .如果真 ((到整数 (取启动时间 () ÷ 1000) － 初始时间) ％ 5 ≥ 3)<br />     初始时间 ＝ 0<br />     按下 ＝ 真<br />     启动线程 (&子程序1, , )<br /> .如果真结束<br /> <br /> <br /> <br /> .子程序 子程序1<br /> <br /> 调试输出 (“执行完毕1”)<br /> 延时 (1000)<br /> 调试输出 (“执行完毕2”)<br /> 按下 ＝ 假