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

//產(chǎn)生上升沿
if a[0] and not a[1] then
MB_Rising_edge=1
end if

//啟動(dòng)自鎖
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

//復(fù)位上升沿和保持
MB_Rising_edge=0
a[1]=a[0]


end macro_command

看到以上程序，就感覺有點(diǎn)復(fù)雜了，于是先寫一個(gè)上升沿的程序
macro_command main()
bool Button,keep//按鈕，保持
unsigned short count//計(jì)數(shù)
GetData(Button, "Local HMI", LB, 0, 1)
GetData(count, "Local HMI", LW, 0, 1)


if Button and not keep then//當(dāng)按鈕接通且保持沒有接通，開始計(jì)數(shù)一次
count=count+1//計(jì)數(shù)一次
end if
keep=Button//按鈕賦值給保持

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

第三次，有了以上思路，然后繼續(xù)寫
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//當(dāng)按鈕接通且保持沒有接通，開始計(jì)數(shù)一次
      light=0//指示燈亮
   else
      light=1//指示燈亮
  end if
end if

keep=Button//按鈕狀態(tài)賦值到保存輸出
SetData(light, "Local HMI", LB, 10, 1)


end macro_command

發(fā)現(xiàn)第二個(gè)IF是可以簡(jiǎn)化的，再次簡(jiǎn)化可得

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//判斷按鈕是否接通，且判斷按鈕是否在保持狀態(tài)
light=not light//按鈕輸出相反
end if

keep=Button//按鈕狀態(tài)賦值到保存輸出
SetData(light, "Local HMI", LB, 10, 1)
end macro_command

不斷簡(jiǎn)化，精益求精，程序邏輯和思路整理的過程，這就是學(xué)習(xí)

全部圖片