精易论坛

标题: 学习电梯 [打印本页]

作者: 英培 时间: 2012-3-23 16:38
标题: 学习电梯
学习电梯
.版本 2
.支持库 spec
.程序集窗口程序集1
.程序集变量开, 逻辑型
.程序集变量关, 逻辑型
.子程序 _按钮开门_被单击
关＝假
开＝真
.判断循环首 (开＝真)
.如果 (外形框左门.左边＝ -60)
      开＝假
.否则
      外形框左门.左边＝外形框左门.左边－ 1
      外形框右门.左边＝外形框右门.左边＋ 1
.如果结束
延迟 (10)
.判断循环尾 ()
图片框1.可视＝真
.子程序 _按钮关门_被单击
开＝假
关＝真
.判断循环首 (关＝真)
.如果 (外形框左门.左边＝ 0)
      关＝假
.否则
      外形框左门.左边＝外形框左门.左边＋ 1
      外形框右门.左边＝外形框右门.左边－ 1
.如果结束
延迟 (10)
.判断循环尾 ()
图片框1.可视＝假
.子程序 _按钮上_被单击
.判断开始 (外形框桥相.顶边＝按钮下.顶边)
子下 ()
.默认
子上 ()
.判断结束

.子程序子上
.局部变量上, 逻辑型
.判断开始 (外形框左门.左边 ≠ -60)
_按钮开门_被单击 ()
子上 ()
.默认
_按钮关门_被单击 ()
上＝真
禁止按钮真 ()
.判断循环首 (上＝真)
      .判断开始 (外形框桥相.顶边＝按钮下.顶边)
         _按钮开门_被单击 ()
         禁止按钮假 ()
         上＝假
      .默认
         外形框桥相.顶边＝外形框桥相.顶边－ 1
      .判断结束
      延迟 (10)
.判断循环尾 ()
.判断结束

.子程序 _按钮下_被单击
.判断开始 (外形框桥相.顶边＝按钮上.顶边)
子上 ()
.默认
子下 ()
.判断结束

.子程序子下
.局部变量下, 逻辑型
.判断开始 (外形框左门.左边＝ 0)
_按钮开门_被单击 ()
子下 ()
.默认
_按钮关门_被单击 ()
下＝真
禁止按钮真 ()
.判断循环首 (下＝真)
      .判断开始 (外形框桥相.顶边＝按钮上.顶边)
         _按钮开门_被单击 ()
         禁止按钮假 ()
         下＝假
      .默认
         外形框桥相.顶边＝外形框桥相.顶边＋ 1
      .判断结束
      延迟 (10)
.判断循环尾 ()
.判断结束

.子程序禁止按钮真
按钮开门.禁止＝真
按钮关门.禁止＝真
按钮下.禁止＝真
按钮上.禁止＝真
.子程序禁止按钮假
按钮开门.禁止＝假
按钮关门.禁止＝假
按钮下.禁止＝假
按钮上.禁止＝假

电梯程序.zip (12.82 KB, 下载次数: 33)

作者: 英培 时间: 2012-3-23 16:42
外形框轨道外形框桥相加两扇门 + 外形框线槽加开关按钮

作者: C。 时间: 2012-3-23 16:54
虽然不是什么高端程序，但是做起来好像比较麻烦，支持一下

作者: 糖风阵阵 时间: 2012-3-23 18:28
学学吧！！{:3_235:}

作者: 易赳赳 时间: 2012-3-23 18:56
{:3_227:}{:3_227:}电梯？

作者: 1837057 时间: 2012-3-23 21:22
{:soso_e120:}这东西好玩

作者: 1837057 时间: 2012-3-23 21:23
好有意思的

作者: 讲不出再见 时间: 2012-3-23 21:24
好玩,代码肯定很难！学习一下

作者: 喜疯子 时间: 2012-3-23 22:18
我也觉得，很不错

作者: 无敌英雄 时间: 2012-3-24 01:11
汗，这个源码有一些眼熟哦

作者: 英培 时间: 2012-3-24 01:31
眼熟{:soso_e132:}{:soso_e132:}{:soso_e132:}

作者: 宇智波·佐助 时间: 2012-3-24 09:43
这个需要看下

作者: 593088930 时间: 2012-3-24 09:58
好像很好玩

作者: 979862538 时间: 2012-5-22 13:05
提示: 作者被禁止或删除内容自动屏蔽

作者: 382163519 时间: 2012-5-22 13:08
加油吧，祝你早日做出三层以上的电梯

作者: luoye2016 时间: 2020-1-23 13:20
hhahahahhahah

欢迎光临精易论坛 (https://125.confly.eu.org/)