最近手上有個威綸通MT6056I的HMI,需要與公司的一款板卡通訊，板卡遵循的是自由協議，但是采用的校驗方式CRC-16/XMODEM.
這種校驗方式是CRC16校驗方式的一種，但是與MODBUS協議的CRC16的生成方式不同。威綸通的腳本語言庫中有CRC校驗函數，但是這個校驗
函數是CRC-16/MODBUS版本的，不能為我所用，所以我計劃自己設計一個CRC16/XMODEM的函數，然后將這個函數保存到函數庫里，以備他用
。由于第一次使用這個屏幕，經驗不做，遇到一些困難，但也努力解決了。
        首先不得不吐槽下，威綸通的宏指令說明書寫的太簡單了，在遇到問題的時候，可能無法從指令的說明手冊上找到答案，更多的是自己摸索。比如
自己寫子函數時就遇到狗血的問題
       1：數組不能作為函數參數
            比如
                        sub short function(char dat[],char len)
            其中 char dat[] 參數將出錯。
            解決方法，后面有表述
       2： 在調用子函數的時候，在函數的參數中不能出現常量，只能是變量的方式
           例如我定義了子函數 function( short a,short b)
           調用方式  function( 1000,1000)  編譯器將會告訴你參數類型錯誤
           當我改成如下掉用方式就可以了
            short i=1000
            short j=1000
            function(i,j)
  
      好進入正題吧，如何寫個CRC校驗函數，其實根本問題，是如何將一串數據傳給子函數，子函數將傳過來的數據根據特定算法，運算出計算結果，關于CRC算法，本文不做論述，只提供代碼。
我首先想到的是這樣的思路：定義 這樣一個函數 short CRC16(short dat[],short len)，用來計算CRC。
但是卻遇到了上面1中的問題，數組參數無法作為函數的形參，官方也找不到解決方法。
最后想到的解決方法是在LW存儲區開辟一塊暫存區域，將要進行CRC計算的數據搬運到這塊暫存區域上。再CRC校驗函數中根據LW的地址將數據取出，進行CRC計算。
如此可解決無法傳遞數組參數的問題。操作如下。
        定義  sub short CRC_16(short dataddr, short len)
       參數說明 short dataddr，dataddr是位于LW暫存區的起始地址，short len len 數據長度。
         下面紅色區域為重點區域，注意理解。

   sub short CRC_16(short dataddr, short len)
    short i, j
    unsigned short crc_reg = 0x0000
    unsigned short current
    unsigned char dattmp[128]    //申請一定長度的數組來保存要進行校驗的數據。
    GetData(dattmp[0], "Local HMI", LW, dataddr, len)//將暫存區的數據復制到dattmp中
    len=len-1
    for i = 0 to len
        current = dattmp
        current=current<<8
        crc_reg=crc_reg^current
      
        for j = 1 to 8
      
            if (crc_reg & 0x8000) <> 0 then
                crc_reg = (crc_reg << 1) ^ 0x1021
            else
                crc_reg=crc_reg << 1
            end if
        next
      
    next
    return crc_reg;
end sub

  上面綠色部分是進行CRC計算的，這里不做研究。下面來講講紅色部分。紅色部分就是申請數組空間，然后，將LW,暫存空間的數據，轉移到所申請的數組中，交給下面計算。
  這里的疑惑是為何要申請數組，然后在拷貝數據，這么麻煩，而不是用下面的方式進行，下面的算法是每次循環開始先讀取暫存空間數據，先不說犧牲時間什么的，最起碼這
中不用申請上面那128大的數組。理論可行，但是實際上確實錯誤的。其主要GetData和SetData 函數實現原理，以及數據在LW中存儲方式不清楚造成的。
sub short CRC_16_2(short dataddr, short len)
    short i, j
    unsigned short crc_reg = 0x0000
    unsigned short current
    unsigned char dattmp
    short addr
    addr=dataddr
    len=len-1
  
    for i = 0 to len

       GetData(dattmp, "Local HMI", LW, addr, 1)
        addr=addr+1
        current = dattmp

        current=current<<8
        crc_reg=crc_reg^current
      
        for j = 1 to 8
      
            if (crc_reg & 0x8000) <> 0 then
                crc_reg = (crc_reg << 1) ^ 0x1021
            else
                crc_reg=crc_reg << 1
            end if
        next
      
    next
    return crc_reg;
end sub



GetData和SetData 函數實現原理，以及數據在LW中存儲方式
先來說說LW中的數據存儲 （吐槽：為何網上關于這方面的資料很少，幾乎沒有LW存儲空間的詳細說明）
目前 筆者使用 軟件 EB8000 V4.65

LW 可理解為計算機的RAM ，掉電數據不保存，但是存取速度快。每個存儲單元是16bit。分為高字節 (bit15-bit8)和低字節(bit7 -bit 0)
bit15                                                            bit0


例如 0x1234 存儲方式為高字節 0x12 ,低字節0x34.

SetData 當用SetData 來寫LW中的數據的時候，會根據第一個參數的類型來指導操作

                    如下程序，這是正常的操作程序。a的類型是short
unsigned short a=0x1234
unsigned char b[2]
unsigned char c
SetData(a, "Local HMI", LW, 0, 1)
GetData(c, "Local HMI", LW, 0, 1)
GetData(b[0], "Local HMI", LW, 0, 2)
TRACE("C = %d", c)                    //c=0x34
TRACE("b[0] = %d", b[0])          //b[0]=0x34
TRACE("b[1] = %d", b[1])         //b[1]=0x12

但是SetData的第一個參數是第一個char類型的數組如下
unsigned short a
unsigned char b[2]
b[1]=0x12
b[0]=0x34
SetData(b[0], "Local HMI", LW, 0, 2)
GetData(a, "Local HMI", LW, 0, 1)
TRACE("a = %d", a) //a=0x1234

可以看出，在保存char 型數據的時候，為了節省空間進行了特別處理
理論上b[0]應該保存在LW0000,b[1]保存在LW0001.但是實際上確實b[0]保存在 LW0000的低字節，b[1]保存在LW0000的高字節。

同樣的道理GetData 也遵循相同的操作。

現在能回答為何不能采用第二種子函數寫法.主要原因是 每次循環都是讀取一個字的底字節。高字節數據被丟棄了。
假如寫入內存的是b[0]到b[10]，則通過下面循環讀取的是b[0],b[2],b[4].....,請好好體會。
    for i = 0 to len

       GetData(dattmp, "Local HMI", LW, addr, 1)
        addr=addr+1
        current = dattmp
    next

再需要調用CRC函數的時候，可用如下的方法操作
        char sendbus[26]

        short lwadd=7000 //lw 暫存區開始地址
        short len=26        
        SetData(sendbuf[1], "Local HMI", LW, lwadd, len)   //將得計算的數阻搬到LW7000開始的空間，具體在什么地址，可自己安排，只要注意LW 范                                                                                        //0-9000
        tmp = CRC_16(lwadd, len)                                //CRC計算

版權申明：本文章由逸創論壇（www.yeecon.com）原創，轉載請標明出處：http://www.yeecon.com/forum.php?mod=viewthread&tid=74&fromuid=1
(出處: 逸控BBS)

由于本人知識有限，文中如有錯誤，請告知。
作者：semonpic    
E-Mail: semonping@163.com
企鵝號 442999791