国产91九色_日本68xxxx_欧美高清另类自拍视频在线看_欧美人禽_99久久婷婷国产综合精品青牛牛_亚洲射情

首頁新聞工控搜論壇廠商論壇產(chǎn)品方案廠商人才文摘下載展覽

首　頁新聞動態(tài) 產(chǎn)品中心方案與應(yīng)用技術(shù)文摘資料下載關(guān)于我們臺達(dá)網(wǎng)站在線視頻

基于VB的臺達(dá)PLC與監(jiān)控計(jì)算機(jī)的串行通信實(shí)現(xiàn) 中達(dá)電通股份有限公司

Implementation of Serial Communication Between Monitoring Computer and Delta PLC Based on Visual Basic<BR> 中達(dá)電通上海機(jī)電PLC產(chǎn)品處王乃全<BR> Wang Naiquan<BR> 摘要：PLC直接與現(xiàn)場控制層的檢測儀器儀表設(shè)備連接，是底層控制網(wǎng)絡(luò)的組成部分，是工廠自動化系統(tǒng)的基石，因此實(shí)現(xiàn)與監(jiān)控層計(jì)算機(jī)的通信對系統(tǒng)的優(yōu)化運(yùn)行有重要意義。文章基于VB討論臺達(dá)DVP PLC與監(jiān)控計(jì)算機(jī)的通信問題。<BR> 關(guān)鍵詞：VB 通信協(xié)議可編程控制器<BR> Abstract: The PLC is a composing part of Infranet, it links to the measuring instrument and device in field control layer directly, and is the footstone of factory automation system. Therefore it is very important to realize the communication between PLC and monitoring layer computer for optimization of syste running. The paper discussed the related communication problems between Delta DVP PLC and monitoring computer based on Visual Basic. <BR> Key Words: Visual Basic Communication protocal Programable logic controller<BR> [中圖分類號] TP273 [文獻(xiàn)標(biāo)識碼] B 文章編號<BR> 1 引言 <BR> 現(xiàn)場設(shè)備層中的設(shè)備種類繁多,有傳感器、啟動器、驅(qū)動器、I/O部件、變送器、閥門等等,當(dāng)然也包括現(xiàn)場檢測儀器儀表設(shè)備。PLC是現(xiàn)場設(shè)備控制層不可缺少的部分，已經(jīng)非常普及，如何簡便地實(shí)現(xiàn)與PLC的交互已經(jīng)成為眾多廠商新的競爭戰(zhàn)場。由此產(chǎn)生了人機(jī)界面等軟件產(chǎn)品，這些產(chǎn)品的出現(xiàn)簡化了對PLC的控制、操作，使PLC的應(yīng)用更加方便；但也有其共同的缺點(diǎn)，價(jià)格普遍偏高和可二開發(fā)性較差。VB作為“原始”的編程語言在這兩方面無疑有著明顯優(yōu)勢的，本文結(jié)合一個(gè)簡單的案例，用比較基礎(chǔ)的概念討論如何通過VB實(shí)現(xiàn)PC與PLC之間的通信問題，這對剛涉步控制領(lǐng)域的工程師或許是有幫助的。在現(xiàn)場設(shè)備層中各式各樣的設(shè)備都可以和計(jì)算機(jī)聯(lián)機(jī)，而最簡單的自動化聯(lián)機(jī)方式就是使用串行通信，VB提供了串行通信控件可以讓開發(fā)者開發(fā)出串行通信的系統(tǒng)程序，以下是對相關(guān)問題的粗略討論。<BR> 2 串行通信基本概念<BR> 數(shù)據(jù)通訊中有兩種類型的通信形式，即并行通信（Parallel Communication）和串行通信（Serial Communication）。例如，如果有8位數(shù)據(jù)需要傳送，那么并行通信一次就可以完成8位的傳輸量；而串行一次只能傳送1位。圖1表示了兩種不同的通信模式，常用的串行通信也有兩種，分別為RS-232和RS-485。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889385186917.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889385186917.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 2．1 RS-232 串行通信<BR> RS-232的信號準(zhǔn)位是參考地線而言的，如圖2所示。相對于參考接地端1傳輸端傳送數(shù)據(jù)；接收端則相對于參考接地端2復(fù)現(xiàn)出傳送端的傳送的數(shù)據(jù)。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889394654711.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889394654711.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 由圖2可知，由于兩個(gè)接地端準(zhǔn)位不一定一樣，而且很容易受到干擾，所以信號在RS-232線路傳輸時(shí)，很容易產(chǎn)生錯(cuò)誤。<BR> 2．2 RS-485串行通信<BR> RS-485的信號傳輸方式如圖3所示。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889404640463.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889404640463.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> RS-485的信號被傳送出去時(shí)會分成正負(fù)兩條線路，當(dāng)?shù)竭_(dá)接收端后，在將信號相減還原成原來的信號；如果將原始的信號表示成（DT），而被分成的信號分別標(biāo)示成（D+）及（D-），則DT=(D+)-(D-)。同理，接收端在接收到信號后，也依據(jù)上式還原成原來的樣子。如果線路受到干擾，兩條線路的信號分別為（D+）+Noise與（D-）+Noise。接收端還原信號為(DT)= [（D+）+Noise]-[（D-）+Noise]，與先前結(jié)果一樣，所以RS-485可以有效的防止噪聲的干擾。<BR> 3 VB的基本概念<BR> VB（Visual Basic）是微軟的窗口軟件，提供了很多接口成員，對象、屬性、事件、方法就是4個(gè)重要的接口，VB提供了許多常用的控件。<BR> 3．1卷標(biāo)控件<BR> 卷標(biāo)控件如圖4（a）所示，該控件專用于顯示文字、數(shù)字用，顯示如圖4(b)所示<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889412385771.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889412385771.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 3.2 按鈕控件<BR> 按鈕控件如圖5（a）所示，該控件使用率很高，提供一個(gè)供系統(tǒng)用戶操作用的按鈕，如圖5（b）所示。<BR> <br><A HREF="/editor/uploadfiles/learns01/200688942231311.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/200688942231311.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 3．3 定時(shí)器控件<BR> 定時(shí)器控件如圖6所示，該控件的最大作用在固定的時(shí)間內(nèi)可執(zhí)行所設(shè)置的程序代碼一次。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889423172834.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889423172834.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> VB提供了大量的控件，在此不再多述。<BR> 4 基于MScomm控件的串行通信<BR> 要完成VB與PLC等設(shè)備的串行通信要用到MScomm控件，在此有必要對該控件作較詳細(xì)的說明。Mscomm是一個(gè)非標(biāo)準(zhǔn)控件，需要要手動添加許多項(xiàng)目，其步驟如下。<BR> 1）選擇菜單的【工程】<BR> 2）選擇【部件】<BR> 3）在彈出的對話框中做如圖7的選擇。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889425996295.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889425996295.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 4）如圖8所示，在部件選項(xiàng)卡就會出現(xiàn)MScomm控件。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889432056602.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889432056602.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 5）基本屬性<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889435059920.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889435059920.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 4.1 MODBUS ASCII<BR> Modbus 分為ASCII和RTU兩種，ASCII采用的格式和校驗(yàn)相對簡單，本文采用ASCII格式，并僅對使用的功能碼進(jìn)行說明，更多的信息，請參看協(xié)議的詳細(xì)說明。<BR> 1）通信格式<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889443074081.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889443074081.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 2）功能碼<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889452633180.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889452633180.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 4.2 VB與PLC通信的實(shí)現(xiàn)<BR> 以下舉例說明現(xiàn)場設(shè)備與PLC通信的實(shí)現(xiàn)。<BR> 1）控制要求：控制PLC的起動、停止，并顯示運(yùn)行狀態(tài)（綠色為運(yùn)行，紅色為停止）；能夠用交替型按鈕控制Y0,Y1，并用指示燈顯示Y0,Y1狀態(tài)（綠色為運(yùn)行，紅色為停止）；能夠?qū)256，D512兩個(gè)寄存器進(jìn)行數(shù)值寫入的操作。<BR> 2）實(shí)現(xiàn)思路：PLC起動停止的標(biāo)志位為M1072，查DVP協(xié)議，知道地址為H0C30，按功能碼01操作；同樣Y0,Y1的地址分別為H0500，H0501。寫入FF00為ON，0000為OFF，按功能碼05操作；D256，D512地址分別為H1100，H1200，按功能碼06操作即可。<BR> 3）VB接口的設(shè)計(jì)如圖10所示。<BR> <br><A HREF="/editor/uploadfiles/learns01/2006889455783426.bmp" TARGET=_blank><IMG SRC="/editor/uploadfiles/learns01/2006889455783426.bmp" border=0 alt=按此在新窗口瀏覽圖片 onload="javascript:if(this.width>580)this.width=580"></A><BR> 用按鈕控制PLC的起動停止，Y0、Y1的ON/OFF及D256、D512寫完數(shù)據(jù)的發(fā)送；用Shape組件做指示燈，表示PLC的運(yùn)行狀態(tài)和Y的狀態(tài)；用timer組件不停的讀取M1072的狀態(tài)，以判斷PLC的運(yùn)行情況；用MScomm控件實(shí)現(xiàn)PC與PLC的通信。<BR> 4）編程實(shí)現(xiàn)的代碼構(gòu)成<BR> （1） LRC算法校驗(yàn)的實(shí)現(xiàn)<BR> Public Function LRC(str As String) As String<BR> c = 0<BR> l = Len(str) <BR> For c = c + 1 To l<BR> c_data = Mid$(str, c, 2) <BR> d_lrc = d_lrc + Val("&H" + c_data)<BR> c = c + 1<BR> Next c<BR> If d_lrc > &HFF Then<BR> d_lrc = d_lrc Mod &H100<BR> End If<BR> h_lrc = Hex(&HFF - d_lrc + 1)<BR> If Len(h_lrc) > 2 Then<BR> h_lrc = Mid(h_lrc, Len(h_lrc) - 1, 2)<BR> End If<BR> LRC = h_lrc<BR> End Function<BR> （2）運(yùn)行的開始就判斷PLC的狀態(tài)并設(shè)置標(biāo)志位<BR> '初次運(yùn)行打開串口，并顯示PLC運(yùn)行狀態(tài)<BR> Private Sub Form_Load()<BR> Dim s1 As String<BR> Dim s2 As String<BR> Dim s22 As String<BR> Dim s3 As String<BR> Dim s4 As String<BR> MSComm1.PortOpen = True<BR> s2 = "01010C300001"<BR> s22 = LRC(s2)<BR> s1 = ":" + s2 + s22 + Chr$(13) + Chr$(10)<BR> MSComm1.Output = s1<BR> s3 = MSComm1.Input<BR> s4 = Mid$(s, 6, 8)<BR> If s4 = "0C30FF00" Then<BR> plc = 1 'PLC為運(yùn)行標(biāo)志<BR> Else<BR> plc = 0 'PLC為停止標(biāo)志<BR> End If<BR> End Sub<BR> （3）下面一段為用指示燈表示PLC的運(yùn)行狀態(tài)<BR> Private Sub Timer5_Timer()<BR> Dim s1 As String<BR> Dim s2 As String<BR> Dim s22<BR> Dim s3 As String<BR> Dim s4 As String<BR> s2 = "01010C300001"<BR> s22 = LRC(s2)<BR> s1 = ":" + s2 + s22 + Chr$(13) + Chr$(10)<BR> MSComm1.Output = s1<BR> s3 = MSComm1.Input<BR> s4 = Mid$(s3, 8, 2)<BR> If s4 = "31" Then<BR> plc = 1 'PLC為運(yùn)行標(biāo)志<BR> Else: If s4 = "30" Then plc = 0 'PLC為停止標(biāo)志<BR> End If<BR> If plc = 1 Then<BR> Label2.Caption = "PLC正在運(yùn)行......"<BR> Shape1.FillColor = RGB(0, 255, 0) 'green<BR> Else<BR> Label2.Caption = "PLC已經(jīng)停止"<BR> Shape1.FillColor = RGB(255, 0, 0) 'red<BR> End If</P><P> End Sub<BR> （4） PLC的起動與停止<BR> '起動PLC<BR> Private Sub start_Click()<BR> Dim strout As String<BR> Timer5.Enabled = False<BR> str = "00050C30FF00" 'M1072 為PLC起動停止標(biāo)志位。查地址表，M1072為OC30.FF00為置<BR> ON,0000為置OFF。<BR> '以上都是固定格式，要牢記。<BR> LRCC = LRC(str) '計(jì)算 str的lrc校驗(yàn)碼。<BR> strout = ":" + str + LRCC + Chr$(13) + Chr$(10) '欲傳送之?dāng)?shù)據(jù)。13為D，10為A<BR> MSComm1.Output = strout<BR> Timer5.Enabled = True<BR> End Sub<BR> '停止PLC<BR> Private Sub stop_Click()<BR> Dim strout As String<BR> Timer5.Enabled = False<BR> str = "00050C300000"<BR> LRCC = LRC(str)<BR> strout = ":" + str + LRCC + Chr$(13) + Chr$(10)<BR> MSComm1.Output = strout<BR> Timer5.Enabled = True<BR> End Sub<BR> Y0、Y1的ON/OFF與PLC起動/停止的控制方式相同，指示燈的表示方式也相同。D256，D512數(shù)據(jù)寫入的操作類似，限于篇幅其它代碼就不再列出了。<BR> 5 結(jié)束語<BR> VB語言易于編程使用，為與串行設(shè)備的通信提供了很大的方便。臺達(dá)PLC采用標(biāo)準(zhǔn)的目前廣為流行的MODBUS協(xié)議，為實(shí)現(xiàn)PLC與監(jiān)控計(jì)算機(jī)的通信提供了簡化的平臺。由于臺達(dá)所有的機(jī)電產(chǎn)品都支持MODBUS協(xié)議，所以，掌握了VB與PLC通信過程，也就等于掌握了PC與臺達(dá)所有機(jī)電產(chǎn)品的通信。<BR> 參考文獻(xiàn)[略]<BR> 作者簡介<BR> 王乃全（1978-），男，自動化設(shè)備工程師，主要從事PLC控制系統(tǒng)的開發(fā)與技術(shù)支持。<BR>