第一次
macro_command main()
bool a[2],QB_lamp,MB_Rising_edge
bool on=1,off=0
GetData(a[0], "Local HMI", LB, 0, 1)

//产生上升沿
if a[0] and not a[1] then
MB_Rising_edge=1
end if

//启动自锁
GetData(QB_lamp, "Local HMI", LB, 10, 1)
if ( MB_Rising_edge and not QB_lamp ) or (not MB_Rising_edge and  QB_lamp) then
SetData(on, "Local HMI", LB, 10, 1)
else
SetData(off, "Local HMI", LB, 10, 1)
end if

//复位上升沿和保持
MB_Rising_edge=0
a[1]=a[0]


end macro_command

看到以上程序，就感觉有点复杂了，于是先写一个上升沿的程序
macro_command main()
bool Button,keep//按钮，保持
unsigned short count//计数
GetData(Button, "Local HMI", LB, 0, 1)
GetData(count, "Local HMI", LW, 0, 1)


if Button and not keep then//当按钮接通且保持没有接通，开始计数一次
count=count+1//计数一次
end if
keep=Button//按钮赋值给保持

SetData(count, "Local HMI", LW, 0, 1)
end macro_command

第三次，有了以上思路，然后继续写
macro_command main()
bool Button,keep//按钮，保持
bool light//指示灯
GetData(Button, "Local HMI", LB, 0, 1)
GetData(light, "Local HMI", LB, 10, 1)

if Button and not keep then
  if light then//当按钮接通且保持没有接通，开始计数一次
      light=0//指示灯亮
   else
      light=1//指示灯亮
  end if
end if

keep=Button//按钮状态赋值到保存输出
SetData(light, "Local HMI", LB, 10, 1)


end macro_command

发现第二个IF是可以简化的，再次简化可得

macro_command main()
bool Button,keep//按钮，保持
bool light//指示灯
GetData(Button, "Local HMI", LB, 0, 1)
GetData(light, "Local HMI", LB, 10, 1)

if Button and  not keep then//判断按钮是否接通，且判断按钮是否在保持状态
light=not light//按钮输出相反
end if

keep=Button//按钮状态赋值到保存输出
SetData(light, "Local HMI", LB, 10, 1)
end macro_command

不断简化，精益求精，程序逻辑和思路整理的过程，这就是学习

全部图片