當(dāng)在A900GOT上使用以太網(wǎng)通訊模塊( A9GT-J71E71-T,硬件版本E或以上)時(shí)可以實(shí)現(xiàn)網(wǎng)關(guān)服務(wù)器功能、網(wǎng)關(guān)客戶端功能、FTP服務(wù)器功能和E-Mail發(fā)送功能。由于這些功能都屬于擴(kuò)展功能,所以需要安裝對(duì)應(yīng)的擴(kuò)展功能OS【Gateway(Server,Client,Mail,FTP)】并加裝A9GT-(Q)FNB(*M)功能擴(kuò)展板。
注意:當(dāng)與串行通訊板一同使用時(shí),串行通訊板還是安裝在原來的位置,而當(dāng)與總線通訊板一同使用時(shí),總線通訊板要裝在以太網(wǎng)通訊模塊的插槽上(如下圖所示)。
㈠ 有關(guān)網(wǎng)關(guān)服務(wù)器功能的應(yīng)用:
網(wǎng)關(guān)服務(wù)器功能提供了上位機(jī)(利用MX Component)通過以太網(wǎng)訪問GOT的網(wǎng)關(guān)元件(利用GT Designer(2)指定)來間接訪問PLC(可以是三菱或第三方產(chǎn)品)中元件的功能。系統(tǒng)構(gòu)成如下圖所示:
具體的實(shí)現(xiàn)步驟如下:
1.GOT的設(shè)置:
這里以GT Designer2中文版軟件為例說明在軟件中的相關(guān)設(shè)置。在工程工作區(qū)窗口中對(duì)“公共設(shè)置”中的“網(wǎng)關(guān)服務(wù)器”設(shè)置如下:
其中的EG即網(wǎng)關(guān)軟元件,這里的設(shè)置將EG0,EG1與PLC中的D10,D11進(jìn)行了關(guān)聯(lián),將EG2和EG3與PLC中的M0到M15,M16到M31進(jìn)行了關(guān)聯(lián)。從而上位機(jī)可以通過訪問EG來實(shí)現(xiàn)間接訪問PLC的功能。
在GOT實(shí)用菜單的“SETUP”項(xiàng)中對(duì)GOT的IP地址等項(xiàng)進(jìn)行如下設(shè)置:
2.上位機(jī)監(jiān)控程序的開發(fā):
這里利用Visual Basic 6.0和MX Component來開發(fā)上位監(jiān)控程序。MX Component是支持從PC到PLC多種通訊方式的ActiveX控件庫,它可以無須知道協(xié)議的具體格式即輕松地實(shí)現(xiàn)各種形式的通訊。當(dāng)安裝了MX Component以后,就可以在Visual Basic,Visual C++等開發(fā)環(huán)境中使用對(duì)應(yīng)的通訊控件很方便地進(jìn)行通訊程序的開發(fā),這里我們要使用到的是一個(gè)名為ActGOT的控件。
首先啟動(dòng)Visual Basic并選擇“工程”/“部件”,在“部件”對(duì)話框中我們可以看到很多與三菱產(chǎn)品進(jìn)行通訊的控件,這里我們勾選“MITSUBISHI ActGOT Controls Ver3.0”項(xiàng)。
然后將工具箱中名為ActGOT的控件(如上圖所示)添加到窗體中,在屬性窗口中對(duì)GOT的IP地址(ActHostAddress)以及端口號(hào)(ActPortNumber)進(jìn)行如下設(shè)置:
程序代碼如下:
Private Sub Command1_Click() ’打開端口
IRet = ActGOT1.Open()
End Sub
Private Sub Command2_Click() ’關(guān)閉端口
IRet = ActGOT1.Close()
End Sub
Private Sub Command3_Click() ’讀取GOT型號(hào)
Dim szCpuName As String
Dim ICpuType As Long
IRet = ActGOT1.GetCpuType(szCpuName, ICpuType)
Text1.Text = szCpuName ’顯示GOT的產(chǎn)品型號(hào)
Text2.Text = Hex(ICpuType) ’顯示GOT的型號(hào)代碼(固定為E340H)
End Sub
Private Sub Command4_Click() ’D0數(shù)值讀取
Dim szDevice As String
Dim IData As Long
szDevice = "EG0"
IRet = ActGOT1.GetDevice(szDevice, IData)
Text3.Text = IData
End Sub
Private Sub Command5_Click() ’D0數(shù)值設(shè)定
Dim szDevice As String
Dim IData As Long
szDevice = "EG0"
If Text4.Text = "" Then
MsgBox "請(qǐng)輸入數(shù)值!", vbExclamation, "警告"
Else
IData = Text4.Text
IRet = ActGOT1.SetDevice(szDevice, IData)
End If
End Sub
Private Sub Command6_Click() ’M0置位
Dim szDevice As String
Dim IData As Long
szDevice = "EG2"
IData = "1"
IRet = ActGOT1.SetDevice(szDevice, IData)
End Sub
Private Sub Command7_Click() ’M0復(fù)位
Dim szDevice As String
Dim IData As Long
szDevice = "EG2"
IData = "0"
IRet = ActGOT1.SetDevice(szDevice, IData)
End Sub
Private Sub Command8_Click() ’M0狀態(tài)讀取
Dim szDevice As String
Dim IData As Long
szDevice = "EG2"
IRet = ActGOT1.GetDevice(szDevice, IData)
If IData = 1 Then
Shape1.FillColor = RGB(255, 0, 0) ’當(dāng)M0=ON時(shí),顯示紅色
ElseIf IData = 0 Then
Shape1.FillColor = RGB(255, 255, 255) ’當(dāng)M0=OFF時(shí),顯示白色
End If
End Sub
㈡ 有關(guān)FTP服務(wù)器功能的應(yīng)用:
FTP服務(wù)器功能可以利用FTP客戶端軟件在電腦上通過以太網(wǎng)對(duì)保存在GOT的PC卡中的數(shù)據(jù)(比如配方,報(bào)警記錄,硬拷貝圖像等)進(jìn)行讀寫操作。系統(tǒng)構(gòu)成如下圖所示:
首先在GT Designer2中文版軟件的工程工作區(qū)窗口中雙擊“公共設(shè)置”/“FTP”,在彈出的對(duì)話框中進(jìn)行如下設(shè)置:
可以先利用PING指令進(jìn)行線路測(cè)試,然后進(jìn)行FTP服務(wù)器的登錄:
上面操作中使用的 quote gtwr命令用于將FTP服務(wù)器功能的模式由查詢模式轉(zhuǎn)為寫模式,否則將無法對(duì)PC卡進(jìn)行寫入刪除等項(xiàng)操作。
㈢ 有關(guān)E-Mail發(fā)送功能的應(yīng)用:
該項(xiàng)功能可以在報(bào)警發(fā)生時(shí)或恢復(fù)時(shí)向指定的對(duì)象發(fā)送郵件(報(bào)警發(fā)生和恢復(fù)的信息)。系統(tǒng)構(gòu)成如下圖所示:
首先在GT Designer2中文版軟件的工作區(qū)窗口中雙擊“公共設(shè)置”/“郵件”,在彈出的對(duì)話框中進(jìn)行如下設(shè)置:
在“公共設(shè)置/報(bào)警記錄”中的設(shè)定如下圖所示。
其中“郵件發(fā)送”項(xiàng)有不發(fā)送、發(fā)生、恢復(fù)和發(fā)生/恢復(fù)四種選擇。這里選擇發(fā)生/恢復(fù),即在報(bào)警發(fā)生時(shí)和恢復(fù)時(shí)均發(fā)送郵件。郵件的內(nèi)容即在下圖中所設(shè)定的注釋信息。
下圖是利用郵件服務(wù)器收到E-Mail的情形: