【正文】 timer and counter elapsed value area寫入定時(shí)器/計(jì)數(shù)器經(jīng)過值MCRegistration and reset of monitor contact登錄及復(fù)位監(jiān)控觸點(diǎn)MDRegistration and reset of monitor data登錄及位監(jiān)控?cái)?shù)據(jù)MGMonitor execution執(zhí)行監(jiān)控RRRead system register讀取系統(tǒng)寄存器WRWrite system register寫入系統(tǒng)寄存器RTRead Programmable Controller (PC) status讀取PLC當(dāng)前狀態(tài)RPRead program讀取程序WPWrite program寫入程序RMRemote control (RUN/PROGRAM mode switching)遠(yuǎn)程控制(運(yùn)行/編程模式切換)ABTransmission abort mand傳輸終止指令觸點(diǎn)和數(shù)據(jù)代碼1. 觸點(diǎn)代碼觸點(diǎn)代碼說明X外部輸入Y外部輸出R內(nèi)部繼電器T定時(shí)器C計(jì)數(shù)器L鏈接繼電器2. 數(shù)據(jù)代碼數(shù)據(jù)代碼說明D數(shù)據(jù)寄存器 DTL鏈接寄存器 LDF文件寄存器 FLS目標(biāo)值 SVK經(jīng)過值 EVIX索引寄存器 IXIY索引寄存器 IYWX字單位外部輸入 WXWY字單位外部輸出 WYWR字單位內(nèi)部繼電器 WRWL字單位鏈接繼電器 WL舉例指令說明1. 讀取單觸點(diǎn)狀態(tài)(指令代碼: RCS) Contact Area Read (single point)指令%RCS觸點(diǎn)代碼(1字符)觸點(diǎn)編號(hào)(4字符)BCC(H)BCC(L)CR單觸點(diǎn)指定 BCD HEX(3 digits) (1 digit) 目標(biāo)站號(hào)(L)目標(biāo)站號(hào)(H) 應(yīng)答讀取正常%$RC觸點(diǎn)數(shù)據(jù)(1字符)BCC(H)BCC(L)CR源站號(hào)(L)源站號(hào)(H)讀取錯(cuò)誤%!BCC(H)BCC(L)CR參閱說明.錯(cuò)誤代碼源站號(hào)(L)源站號(hào)(H)說明 字符$表示正常的應(yīng)答. 觸點(diǎn)數(shù)據(jù)Contact data觸點(diǎn)狀態(tài)數(shù)據(jù)OFF0ON12. 寫入單觸點(diǎn)狀態(tài)(指令代碼: WCS ) Contact Area Write (single point)指令%WCS指令代碼(1字符)觸點(diǎn)編號(hào)(4字符)觸點(diǎn)數(shù)據(jù)(1字符)BCC(H)BCC(L)CR單觸點(diǎn)指定參見注釋. BCD HEX(3 digits) (1 digit) 目標(biāo)站號(hào)(L)目標(biāo)站號(hào)(H) Y, R, L 應(yīng)答讀取正常%$WCBCC(H)BCC(L)CR源站號(hào)(L)源站號(hào)(H)讀取錯(cuò)誤%!BCC(H)BCC(L)CR錯(cuò)誤代碼源站號(hào)(L)源站號(hào)(H)說明: 字符$表示正常的應(yīng)答. 觸點(diǎn)數(shù)據(jù)Contact data觸點(diǎn)狀態(tài)數(shù)據(jù)OFF0ON13. 讀取多觸點(diǎn)狀態(tài)(指令代碼: RCP ) Read Contract Area(plural point) 指令%RCPn(1字符)觸點(diǎn)代碼(1字符)觸點(diǎn)編號(hào).(1)(4字符)多觸點(diǎn)指定 BCD HEX(3 digits) (1 digit) 目標(biāo)站號(hào)(L)目標(biāo)站號(hào)(H) 觸點(diǎn)編號(hào)(n: 1 to 8 ) n=1 8觸點(diǎn)代碼(1字符)觸點(diǎn)編號(hào).(n)(4字符)BCC(H)BCC(L)CR 應(yīng)答讀取正常%$RC觸點(diǎn)1數(shù)據(jù)(1字符)觸點(diǎn)n數(shù)據(jù)(1字符)BCC(H)BCC(L)CR源地址(L)源地址(H)參見說明.讀取錯(cuò)誤%!BCC(H)BCC(L)CR源地址(L)源地址(H)錯(cuò)誤代碼說明: 字符$表示正常應(yīng)答. 觸點(diǎn)數(shù)據(jù)觸點(diǎn)狀態(tài)數(shù)據(jù)OFF0ON14. 寫入多觸點(diǎn)狀態(tài)(指令代碼: WCP )Write Contract Area (plural point) 指令%WCPn(1字符)觸點(diǎn)1 代碼(1字符)觸點(diǎn)1編號(hào).(4字符)觸點(diǎn)數(shù)據(jù)(1字符)多觸點(diǎn)指定 BCD HEX(3 digits) (1 digit) Y, R, L目標(biāo)地址(L)目標(biāo)地址(H) n: 1 to 8 n=1 8觸點(diǎn)n 代碼(1字符)觸點(diǎn)n編號(hào).(4字符)觸點(diǎn)數(shù)據(jù)(1字符)BCC(H)BCC(L)CR應(yīng)答讀取正常%$WCBCC(H)BCC(L)CR源地址(L)源地址(H)讀取錯(cuò)誤%!BCC(H)BCC(L)CR錯(cuò)誤代碼源地址(L)源地址(H)說明: 字符$表示正常應(yīng)答. 觸點(diǎn)數(shù)據(jù)觸點(diǎn)狀態(tài)數(shù)據(jù)OFF0ON1第四章 總　結(jié)此次畢業(yè)設(shè)計(jì)始于3月初，收尾于6月初期。我用了三種方法使自己快速入門：1），自己上圖書館找資料，圖書館是知識(shí)的海洋，開闊而豐富，盡管里面找書有點(diǎn)麻煩，但是確實(shí)是個(gè)好資源。在最終做完這個(gè)串行通信，到達(dá)了原先設(shè)定的設(shè)計(jì)目標(biāo)，實(shí)現(xiàn)了對(duì)PLC的讀和寫?？偟膩碚f這次的設(shè)計(jì)，給了我一個(gè)實(shí)際鍛煉機(jī)會(huì)，讓我獲得了VB與PLC通信設(shè)計(jì)的經(jīng)驗(yàn)。侯老師不僅學(xué)術(shù)造詣很高，而且為人和藹可親，治學(xué)態(tài)度非常嚴(yán)謹(jǐn)，不僅從他那里學(xué)到了好多的專業(yè)知識(shí)，培養(yǎng)了我務(wù)實(shí)求真的研究態(tài)度，而且也學(xué)到了好多深刻的做人道理，為人處事的準(zhǔn)則。此外，感謝我們產(chǎn)學(xué)研基地的負(fù)責(zé)人章老師，感謝他給我們創(chuàng)造了這么好的硬件基礎(chǔ)，提供了這么好的學(xué)習(xí)條件，同時(shí)在我做研究時(shí)候給我的支持與督促。最后要感謝我的父母，感謝父母這二十多年來對(duì)我的養(yǎng)育之恩和無私奉獻(xiàn)，在這里，祝愿他們身體健康，生活快樂。判斷是否有“非實(shí)時(shí)監(jiān)控通訊”操作，如果有則暫停實(shí)時(shí)監(jiān)控通訊，處理操作者發(fā)出的指令。發(fā)送通訊命令變量Dim errT As Boolean 39。R0ON 非實(shí)時(shí)監(jiān)控通訊 = True Sendata = %01WCSR00001 Sendata = Sendata + FCS(Sendata) + vbCrEnd SubPrivate Sub Command4_Click() 39。低字節(jié)在前，高字節(jié)在后 Sendata = %01WDD0040000400 + Sendata Sendata = Sendata + FCS(Sendata) + vbCrEnd SubPrivate Sub Form_Load()Dim g As Integer For g = 1 To 3 39。默認(rèn)COM1口 = 0 39。用法：當(dāng)發(fā)送完相應(yīng)的通訊命令后，打開此定時(shí)器，如果100毫秒內(nèi)PLC沒有數(shù)據(jù)返回，則表示與PLC通訊不正常End SubPrivate Sub Form_Unload(Cancel As Integer) 39。調(diào)用通訊口設(shè)置過程End SubPrivate Sub CommSet() On Error GoTo err1 If = True Then = False 39。打開串口 errT = False Exit Suberr1: MsgBox 39。 39。讀DT0 GetData = Mid(GetData, 7, 4) 39。Val的功能將字符串轉(zhuǎn)換為數(shù)字 Case 1 39。從GetData變量代表的字符的左側(cè)開始的第七位開始取八個(gè)字符賦給GetData For k = 0 To 7 If Mid(GetData, k + 1, 1) = 1 Then Picture3(k).BackColor = amp。讀輸出點(diǎn)狀態(tài) GetData = Mid(GetData, 7, 8) 39。H80000005 End If Next k Case 4 39。 Picture1(1).BackColor = amp。 End If j = 1 End Select j = j + 1 39。設(shè)定產(chǎn)生OnComm事件的接收緩沖區(qū)字符數(shù) Case 1 39。設(shè)定產(chǎn)生OnComm事件的接收緩沖區(qū)字符數(shù) Case 3 39。FCS(fs)是調(diào)用校驗(yàn)和程序 End If = 0 = 0 = Sendata = False 39。通訊狀態(tài)指示 j = 0 = True End Sub 36