精品精品-精品精品国-精品精品国产-精品精品国产高-精品精品国产高清-精品精品国产国产-精品精品国产精品等-精品精品国产理论

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
程序已經測試過，歡迎來討論改進

謝謝，人才啊