【正文】 0=Change10 THEN n10:=Change10。 n5:=n5+1。 END_IF*) (*1*) WHILE xx=1 DO xx:=xx1。 ELSE x:=xx。 xx:=xnhalf*。 END_IFEND_IF(*將結(jié)果輸出給中間變量，供找零機(jī)構(gòu)調(diào)用*) OutputHalf:=nhalf。 Output20:=n20。 n5:=0。 n100:=0。在不停機(jī)、不打開機(jī)箱的情況下完成上述操作大大提高了售貨機(jī)的實(shí)用性和智能化程度。 NOTadmin: BOOL:=TRUE。 Enter_NEW_Password: BOOL。 r_ctu1: BOOL。IF Check=TRUETHEN IF Password_input Password THEN NOTadmin:=TRUE。 END_IF。39。END_IFTP1(IN:=pay , PT:=t300ms , Q= , ET= )。IF n=1THEN(*減庫存*)Quantity_a:=。Quantity_e:=。SoldoutD:=SoldoutD+。salesC:=salesC+Cost_c。 Change1:=Change1+。(*消費(fèi)金額清零*)Cost_a:=0。Cost_e:=0。END_IF 交易成功畫面子程序在付款后，會(huì)出現(xiàn)一段動(dòng)態(tài)畫面，提示顧客交易成功，并在結(jié)束后跳轉(zhuǎn)回歡迎界面，等待下一位顧客使用。 TOF1:TOF。 CTU1: CTU。IF CurrentVisu=39。 thanks:=arr1[i]。 a2 AT %I*:BOOL。 b1 AT %Q*:BOOL。 b5 AT %Q*:BOOL。 b44 AT %Q*:BOOL。 b8 AT %Q*:BOOL:=TRUE。 r_ctu1: BOOL。 disable: BOOL。 carta,cartb,cartc,cartd,carte: BOOL。 TPc3: TP。END_VARb1:=。b3:=。b5:=。THEN TP3(IN:=a8 , PT:=t300ms , Q= , ET= )。SELECTING39。CARGOB39。CARGOD39。 IF t250ms THEN currentvisu:=39。TC_VISU39。 THEN IF a1=TRUE THEN currentvisu:=39。 END_IF IF a3=TRUE THEN currentvisu:=39。 END_IF IF a5=TRUE THEN currentvisu:=39。TC_VISU39。CARGOA39。 IF a2=TRUE THEN currentvisu:=39。 END_IF IF a4=TRUE THEN currentvisu:=39。 END_IFEND_IF(*CARGOB*)IF currentvisu=39。 END_IF TPb3(IN:=a2 , PT:=T50MS , Q=addb , ET= )。CARGOC39。CARGOE39。CARGOA39。 TPc2(IN:=a8 , PT:=t50ms , Q=cartc , ET= )。 END_IF IF a5=TRUE THEN currentvisu:=39。 THEN IF a1=TRUE THEN currentvisu:=39。 END_IF IF a3=TRUE THEN currentvisu:=39。 TPd1(IN:=a88 , PT:=t50ms , Q=canceld , ET= )。CARGOE39。CARGOB39。CARGOD39。END_IF 輸入輸出變量與I/O端子的連接本設(shè)計(jì)以兩塊KL1104和兩塊KL2408提供輸入輸出點(diǎn)。TwinCAT Visualization 不需要額外的變量列表，它能直接訪問控制器中的變量。 HMI界面本設(shè)計(jì)共有11個(gè)可視化界面，其中9個(gè)為客戶購買界面，分別為：歡迎界面（TC_VISU）、商品選擇界面(SELECTING)、商品購買界面（CARGOA,CARGOB,CARGOC,CARGOD,CARGOE）、結(jié)帳界面(CHECKOUT)、付款成功界面(PAID)。啟動(dòng)TwinCAT Run Time，PC便具備了一個(gè)模擬PLC的實(shí)時(shí)核，將程序下載，運(yùn)行。選擇完后，回到商品選擇界面，在商品A和商品B的框體旁出現(xiàn)了剛才選購的數(shù)量，點(diǎn)擊“結(jié)帳”。投入1個(gè)5元，1個(gè)10元，“已投入”顯示為15元。系統(tǒng)重新回到歡迎界面，商品A缺貨指示燈亮，有貨指示燈滅。雖然只是一個(gè)簡(jiǎn)單的自動(dòng)售貨機(jī)，卻也傾注了我不少的熱情與心血。非但考驗(yàn)了知識(shí)儲(chǔ)備與思路方法，更是磨練了學(xué)習(xí)態(tài)度與鉆研精神。由衷地感謝你們對(duì)我的栽培。參考文獻(xiàn)［1］ 王佳慶，［J］.自動(dòng)化儀表，2003,24(2):1012.［2］ 歐陽三泰，周琴歐，［J］.電氣傳動(dòng)，2005,35(9):5254。感謝陳凱工程師不厭其煩地知道我在編程方面的疑問以及在本設(shè)計(jì)ADS通信部分中的極大貢獻(xiàn)。我感覺到學(xué)習(xí)一門新知識(shí)、新技術(shù)并不難，難的是將所學(xué)過的形成自己的一套體系，在此基礎(chǔ)之上才能開發(fā)出新的應(yīng)用或是發(fā)現(xiàn)新的理論。有不少差錯(cuò)看似疏忽大意，但刨根問底一番，發(fā)現(xiàn)全因自己當(dāng)初治學(xué)不嚴(yán)、似懂非懂所致，日后必引以為戒。由此可見，整個(gè)自動(dòng)售貨機(jī)設(shè)計(jì)的功能均得到實(shí)現(xiàn)。點(diǎn)擊“確認(rèn)并付款”，畫面跳轉(zhuǎn)到支付成功畫面，且動(dòng)態(tài)字符顯示正常?？梢娚唐愤x擇和購物清單管理功能正常。程序運(yùn)行后，購買3個(gè)商品A，1個(gè)商品B。各界面如下：圖 9 TC_VISU圖 10 SELECTING圖 11 CARGOA圖 12 CHECKOUT圖 13 PAID圖 14 ADMINISTRATOR圖 15 MANAGE7 仿真運(yùn)行當(dāng)硬件設(shè)備均已選定，程序集HMI均已設(shè)計(jì)完成，則可開始進(jìn)行調(diào)試。因此，這可明顯地減少工程上實(shí)現(xiàn)可視化的工作量。TwinCAT Visualization 是 TwinCAT PLC Control 中自帶的可視化編輯組件。 TPe2(IN:=a8 , PT:=t50ms , Q=carte , ET= )。CARGOC39。CARGOA39。CARGOE39。 END_IF TPd3(IN:=a4 , PT:=T50MS , Q=addd , ET= )。 END_IF IF a2=TRUE THEN currentvisu:=39。 END_IFEND_IF(*CARGOD*)IF currentvisu=39。 IF a4=TRUE THEN currentvisu:=39。CARGOB39。CARGOC39。CARGOD39。 TPb1(IN:=a88 , PT:=t50ms , Q=cancelb , ET= )。 THEN IF a1=TRUE THEN currentvisu:=39。 END_IF IF a5=TRUE THEN currentvisu:=39。 END_IF IF a3=TRUE THEN currentvisu:=39。 TPa2(IN:=a8 , PT:=t50ms , Q=carta , ET= )。 ELSE QUIT2:=FALSE。 END_IF TP2(IN:= a8, PT:=t50ms , Q=pay2 , ET= )。 END_IF IF a4=TRUE THEN currentvisu:=39。 END_IF IF a2=TRUE THEN currentvisu:=39。 END_IFEND_IF(*CHECKOUT*)IF currentvisu=39。 END_IF IF a88=TRUE THEN QUIT2:=TRUE。CARGOE39。CARGOC39。CARGOA39。SELECTING39。(*TC_VISU*)IF currentvisu=39。b4:=。b2:=。 R_TRIG1: R_TRIG。 TPb3: TP。 adda,addb,adde,addc,addd: BOOL。 r_ctu2: BOOL。 CTU1: CTU。 a8 AT %I*:BOOL。 b22 AT %Q*:BOOL。 b3 AT %Q*:BOOL。 a4 AT %I*:BOOL。TC_Visu39。THENTON1(IN:=NOT , PT:= t100ms, Q= a, ET= )。TC_Visu39。 a: BOOL。 arr1:ARRAY[0..13]OF BYTE:=255,254,252,248,240,224,192,128,0,255,0,255,0,0。r_ctu1:=TRUE。Cost_c:=0。 Change10:=Change10+。salesE:=salesE+Cost_e。(*加銷售額*)salesA:=salesA+Cost_a。SoldoutB:=SoldoutB+。Quantity_c:=。PAID39。NEW_Password:=39。39。 Again.39。END_VAR(*錢箱總計(jì)*)Total:=Changehalf*+Change1*1+Change5*5+Change10*10+Change20*20+Change50*50+Change100*100。 CTU1: CTU。 back: BOOL。00000039。每次成功交易后，程序?qū)⒆詣?dòng)將出售的貨物種類、數(shù)量及營(yíng)業(yè)額記錄下來。 n20:=0。 nhalf:=0。 Output5:=n5。 END_IF IF x=0 THEN ChangeEnough:=TRUE。 nhalf:=nhalf+1。 END_WHILE IF n1=Change1 THEN n1:=Change1。 xx:=xn5*5。 ELSE x:=xx。 END_IF (*10*) WHILE xx=10 DO xx:=xx10。 n20:=n20+1。 END_WHILE IF n50=Change50 THEN n50:=Change50。 x:=xx。(*面值為1005的紙幣均屏蔽，只留1元和5角作為找零錢幣*)(* (*100*) WHILE xx=100 DO xx:=xx100。 Cha