jzylcj
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 67 個(gè)
工控威望: 315 點(diǎn)
下載積分: 493 分
在線時(shí)間: 118(小時(shí))
注冊(cè)時(shí)間: 2010-03-10
最后登錄: 2024-10-28
查看jzylcj的 主題 / 回貼
樓主  發(fā)表于: 2010-04-11 16:26
引言

    在工業(yè)生產(chǎn)中,人們常常面臨著數(shù)據(jù)采集與管理。作為工廠自動(dòng)化的三大支柱可編程控制器PLC(Programmable Logic Controller),由于其安全可靠,廣泛的用于數(shù)據(jù)采集與控制。生產(chǎn)過(guò)程中,要監(jiān)視PLC內(nèi)部的數(shù)據(jù)與運(yùn)行狀況,選用市場(chǎng)上的人機(jī)界面或組態(tài)軟件,雖然功能豐富,但大都價(jià)格昂貴,在一些中小規(guī)模的生產(chǎn)場(chǎng)合,人們希望能自己用高級(jí)語(yǔ)言開(kāi)發(fā)一個(gè)簡(jiǎn)易實(shí)用的通信程序。使用Visual Basic 6.0,開(kāi)發(fā)串行通信程序時(shí),有兩種方法,一種是用Windows API函數(shù),另一種是用VB支持的通信控件MSCOMM。以下介紹使用通信控件方式實(shí)現(xiàn)通訊
1.硬件



    采用SC-09編程電纜,連接PC串口與PLC編程口實(shí)現(xiàn)通訊。




2.PLC編程口的通信協(xié)議簡(jiǎn)介
    
    通信格式:
    
    波特率9600,偶校驗(yàn),8位數(shù)據(jù)位,一位停止位。 具體請(qǐng)參考有關(guān)資料,以下舉例說(shuō)明其通訊格式 PLC資料網(wǎng) http://www.plcclub.com

    1)、DEVICE READ(讀出軟設(shè)備狀態(tài)值)

    計(jì)算機(jī)向PLC發(fā)送:
    

3.具體程序說(shuō)明


    MSComm控件簡(jiǎn)介用來(lái)提供簡(jiǎn)單的串行端口通信功能,也可以用來(lái)創(chuàng)建功能完備、事件驅(qū)動(dòng)的高級(jí)通信工具。Mscomm控件提供了一系列標(biāo)準(zhǔn)通信命令的使用界面。使用它可以建立與串行端口的連接,通過(guò)串行端口再連接到其它設(shè)備(如調(diào)制解調(diào)器、PLC),發(fā)出命令,交換數(shù)據(jù),以及監(jiān)視和響應(yīng)串行連接中發(fā)生的事件和錯(cuò)誤。

    數(shù)據(jù)讀與寫采用函數(shù)input和output

(1)窗口加載程序
    Private Sub Form_Load()
    MSComm1.CommPort = 1 ‘選擇COM1口
    MSComm1.Settings = "9600,e,7,1"
    If mscomm1.portopen=false then mscomm1.portopen=true
    End Sub

(2)數(shù)據(jù)讀取子程序:

    Public Function GetData(ByVal StartAddress As String, ByVal GetBytes As     Integer, ByVal Hex_Bytes As String) As String
    MSComm1.InputLen = GetBytes * 2 + 4
    MSComm1.Output = STX + CMD_Read + StartAddress + Hex_Bytes + ETX + GetSumChk(CMD_Read + StartAddress + Hex_Bytes + ETX)
    ‘傳送數(shù)據(jù)組成:起始符+命令+首地址+數(shù)據(jù)位+結(jié)束符+和檢驗(yàn)碼
    GetData = MSComm1.Input
    MSComm1.InBufferCount = 0


    MSComm1.InputLen = 0
    End Function

)