Microsoft PowerPoint - VB與PLC通訊控制.ppt

Size: px

Start display at page:

Download "Microsoft PowerPoint - VB與PLC通訊控制.ppt"

夷柔
7 years ago
Views:

1 VB 與 PLC 通訊控制 NCYU_BME 1

2 真空播種系統真空播種系統主要之組成構件包括 : 介質裝填整平機構打孔壓實機構振盪式真空播種機灑水機構等 NCYU_BME 2

3 針式播種機穴盤輸送方向 NCYU_BME 3

4 針式播種機之電腦圖形監控系統電腦圖形監控設計重點在於利用簡單的圖形介面及文字說明, 提供人性化與穩定性的操作方式, 讓使用者能在最短時間內操作本系統監控系統是以 Visual Basic 程式語言撰寫, 透過 RS232 傳輸線與 PLC 連結, 監控 PLC 之運轉狀態, 經連線後將其通訊狀況顯示在監控螢幕上 NCYU_BME 4

5 歡迎表 NCYU_BME 5

6 流程表 NCYU_BME 6

7 設定表 NCYU_BME 7

8 監視表 NCYU_BME 8

9 資訊表 NCYU_BME 9

10 監控系統動作影片 NCYU_BME 10

11 PLC 通訊規格 NCYU_BME 11

12 RS-232 構造電腦上為公頭連接線上為母頭 :CD Carrier Detect ( 設備 ) 2:RXD Receive 3:TXD Transmit 4:DTR Data Terminal Ready ( 電腦 ) 5:GND Ground 6:DSR Data Set Ready ( 設備 ) 7:RTS Request To Send ( 電腦 ) 8:CTS Clear To Send ( 設備 ) 9:RI Ring Indicator ( 設備 ) NCYU_BME 12

13 線路要求 2 (RXD) 3 (TXD) 5 (GND) 4 (DTR) 1 (DCD) 6 (DSR) 7 (RTS) 8 (CTS) 9 (RI) 3 (TXD) 2 (RXD) 5 (GND) 6 (DSR) 1 (DCD) 4 (DTR) 8 (CTS) 7 (RTS) 9 (RI) 9 Pin 9 Pin NCYU_BME 13

14 COM Port 初始化參數 (1) 如何從不斷改變的電壓狀態中解讀訊息, 需要通訊的雙方在通訊開始前先取得共識共同的通訊規則 Baud Rate( 傳輸速率 ): 設定參考時脈每秒所能產生的電壓狀態最大改變率 Parity( 同位位元檢查 ): 預防錯誤的產生檢查字元碼中 1 的數目是奇數或偶數 Data Bits( 資料傳送單位 ) 7 或 8 個位元形成一個字元 Stop Bits( 停止位元 ): 停止位元的通知, 確切訊號的結束 bits 等選擇 NCYU_BME 14

15 COM Port 初始化參數 (2) Baud Rate Unit: bits per second (bps) 1200, 2400, 4800, 9600, 19200, 38400,... Baud rate = Data transfer rate? Data bits bits: ASCII Code 0~127, Text Data ( 日本 ) 8 bits: ASCII Code 0~255, Binary Data( 歐美 ) NCYU_BME 15

16 COM Port 初始化參數 (3) Parity( 同位位元 ): 用於將所傳送字元中的 bit 和同位位元中 1 的數目作加總, 並將結果記錄 None Even: 保持值為 1 的位元數為偶數 Odd: 保持值為 1 的位元數為奇數如 :A 偶位元奇位元 NCYU_BME 16

17 COM Port 初始化參數 (4) Start Bits:1 bits Stop Bits:1 1.5 or 2 bits Ex: Data Bits:8, Stop bits:1, No Parity 每組資料長度 Start+Data+Parity+End Stop Bit Start Bit Data (Hex: 91) Stop Bit Start Bit NCYU_BME 17

18 VB 中的串列通訊元件引用步驟 1. 加入命名空間 Imports System.IO.Ports 2. 宣告通訊埠物件可以用 Dim RS232 As SerialPort 的敘述或直接從工具箱雙擊 SerialPort 的控制元件選項 NCYU_BME 18

19 SerialPort 操控原則 a. 物件 : 首先瞭解所要操作的物件是什麼? b. 屬性 : 設定該物件所具備的特性 c. 事件 : 該物件在系統執行的過程中會因其他物件而發生什麼樣的事情? d. 方法 : 當該物件被引發了某個事件之後, 系統 ( 或程式 ) 應該採用的相應步驟為何? NCYU_BME 19

20 SerialPort 控制項 Properties BaudRate, DataBits, Handshake Parity, PortName, ReadBufferSize StopBits, ReceiveBytesThreshold NCYU_BME 20

21 SerialPort Property PortName RS232.PortName = COM1 => use Com1 port BautRate RS232.BaudRate = 1200, 2400, 4800, 9600, 19200,... Parity RS232.Parity=Parity.None (Parity.None, Parity.Odd, Parity.Mark, Parity.Space) DataBits RS232.DataBits = 8 StopBits RS232.StopBits = StopBits.One (None, OnePointFive, Two) 設定完成後, 送出和收回的字串便以此為基準, 連接的兩端必須完全一樣, 才能順利的溝通 NCYU_BME 21

22 SerialPort Events Open 或 Close: 設定或關閉通訊連接埠的狀態 Ex: RS232.Open <= Open Com Port... <= 收發 Data... <= 收發 Data RS232.Close <= Close Com Port ReadExisting Ex: InStr = RS232.ReadExisting <= 由串列埠讀入 Data Write Ex: RS232.Write( AT & vbcrlf ) => 由串列埠輸出 AT & Return 字元 NCYU_BME 22

23 通訊步驟加入通訊物件 : 即 SerialPort 物件設定通訊埠 : 即 SerialPort 屬性設定通訊協定 : 即 HandShakingt 屬性設定傳輸速度等參數 : 即 BaudRate 屬性設定其他參數 : 即其他屬性設定開啟通訊埠 : 即 SerialPort.Open 送出或讀入字串 : 即使用 ReadExisting 和 Write 屬性關閉通訊埠 : 即 SerialPort.Close NCYU_BME 23

24 VB 中串列通訊元件的引用 FX-2N 的通訊參數 9600 bps 偶同位 7 個資料位元 1 個停止位元 NCYU_BME 24

25 PLC 控制系統設計流程系統設計輸出入接點設計設計控制原理圖程序寫入 PLC 測試並修改 PLC 程序電腦端的通訊程式開發 NCYU_BME 25

26 PLC 通訊方法 1. 外接延伸通訊板 2. 內建通訊埠 NCYU_BME 26

27 PLC 通訊協定封包格式寫入指令 Chr(2) 1 01 Chr(3) 讀取指令 Chr(2) 0 01 Chr(3) NCYU_BME 27

28 FX-2N 群組位址輸入接點群組位址輸出接點群組位址 X0-X Y0-Y7 00A0 X10-X Y10-Y17 00A1 X20-X Y20-Y27 00A2 計時器群組位址資料暫存器群組位址 T D T D T D NCYU_BME 28

29 8-15 NCYU_BME 29

30 控制指令範例 ( 寫入 ) 希望呈現的 Y 接點狀態 5 3 資料內容 : 2 個字元位元組數為 1 4 個字元位元組數為 2 指令排列十六進位 Y0-Y7 NCYU_BME 30

31 CheckSum 程式內容指令號碼到結尾字元的組合 Function CheckSum(ByVal InputStr As String) As String Dim StrLen As Integer, a As Integer, j As Integer Dim StrCh As String, Sum As String StrLen = InputStr.Length a = 0 For j = 1 To StrLen StrCh = Mid(InputStr, j, 1) a = Asc(StrCh) + a Next j Sum = Hex(a) If Sum.Length = 1 Then Sum = "0" + Sum CheckSum = Mid(Sum, Sum.Length - 1, 2) End Function 轉換十六進位最後 2 個字元指令字串程式內容 NCYU_BME 31

32 寫入之回傳値指令正確 ACK (ASCII 編號 6) 指令錯誤 NAK (ASCII 編號 21) NCYU_BME 32

33 讀取之回傳値讀取 X0-X7 的狀態啟始字元指令號碼群組位元位元組數結尾字元 CheckSum Chr(2) Chr(3) 5C 回傳格式啟始字元資料內容結尾字元 CheckSum Chr(2) 63 Chr(3) 6C 第 1 字元第 2&3 字元第 4 字元第 5&6 字元 = C( 十六進位 ) X0-X7 的狀態 X7 X6 X5 X4 X3 X2 X1 X NCYU_BME 33

34 讀取 PLC 回傳値的注意事項 RS232.Write(OutCmd) ' 讀取或寫入指令 TimeDelay(100) ' 需要一點時間傳遞資料 RetStr = RS232.ReadExisting() ' 讀取 PLC 回傳値讀取 PLC 回傳値前需要延遲, 本裝置的延遲時間最少需要 40 毫秒 Private Sub TimeDelay(ByVal DT As Integer, ByVal retlen As Integer) Dim StartTick As Integer StartTick = Environment.TickCount() ' 開始計數前的 Tick Do If RS232.BytesToRead >= retlen Then Exit Sub If Environment.TickCount() - StartTick >= DT Then Exit Do Loop End Sub Application.DoEvents() ' 處理佇列中的訊息 Retlen 為回傳値的字元數 : 寫入 retlen=1 讀取 retlen=? NCYU_BME 34

35 群組內容寫入與讀取寫入讀取 NCYU_BME 35

36 XY 接點的直接讀取與 Y 接點控制 NCYU_BME 36

Microsoft Word - PLC與GP接線說明_缺WDH_2.doc

Microsoft Word - PLC與GP接線說明_缺WDH_2.doc PC 與 HMI 下載線路圖 HMI PC 1 RS422 R+ 2 RS232 RX 3 RS232 TX 2 RS232 RX 3 RS232 TX 4RS485 D+/RS422 T+ 6 RS422 R- 7 RS232 RTS 8 RS232 CTS 7 RS232 RTS 8 RS232CTS 9RS485 D-/RS422 T- SH( 外殼 ) DB9( 母 ) 接頭 SH( 外殼