玖玖玖视频-亚洲精品1卡2卡3卡-操欧美美女-真实国产乱子伦对白视频不卡-国产乱在线-大胸美女被吃奶爽死视频-久久亚洲美女精品国产精品-天堂在线www天堂在线-久久在精品线影院精品国产-国产又粗又长又大-欧美三级一区二区-超碰在线亚洲-天天cao在线-国产偷倩视频-亚洲啪

huangpeng
級別: 論壇先鋒
精華主題: 0
發帖數量: 705 個
工控威望: 1051 點
下載積分: 3272 分
在線時間: 225(小時)
注冊時間: 2009-12-07
最后登錄: 2022-03-02
查看huangpeng的 主題 / 回貼
樓主  發表于: 2013-10-03 23:48
求CRC 程序  跟算法原理
shi2999
不管學什么,興趣是最好的老師,能賺錢是最強勁的動力
級別: 網絡英雄

精華主題: 0
發帖數量: 2497 個
工控威望: 7394 點
下載積分: 3002 分
在線時間: 606(小時)
注冊時間: 2010-12-26
最后登錄: 2025-11-07
查看shi2999的 主題 / 回貼
1樓  發表于: 2013-10-04 07:04
循環冗余碼校驗英文名稱為Cyclical Redundancy Check,簡稱CRC。它是利用除法及余數的原理來作錯誤偵測(Error Detecting)的。實際應用時,發送裝置計算出CRC值并隨數據一同發送給接收裝置,接收裝置對收到的數據重新計算CRC并與收到的CRC相比較,若兩個CRC值不同,則說明數據通訊出現錯誤。
shi2999
不管學什么,興趣是最好的老師,能賺錢是最強勁的動力
級別: 網絡英雄

精華主題: 0
發帖數量: 2497 個
工控威望: 7394 點
下載積分: 3002 分
在線時間: 606(小時)
注冊時間: 2010-12-26
最后登錄: 2025-11-07
查看shi2999的 主題 / 回貼
2樓  發表于: 2013-10-04 07:06
下面為CRC的計算過程:

  1.設置CRC寄存器,并給其賦值FFFF(hex)。

  2.將數據的第一個8-bit字符與16位CRC寄存器的低8位進行異或,并把結果存入CRC寄存器。

  3.CRC寄存器向右移一位,MSB補零,移出并檢查LSB。

  4.如果LSB為0,重復第三步;若LSB為1,CRC寄存器與多項式碼相異或。

  5.重復第3與第4步直到8次移位全部完成。此時一個8-bit數據處理完畢。

  6.重復第2至第5步直到所有數據全部處理完成。

  7.最終CRC寄存器的內容即為CRC值
shi2999
不管學什么,興趣是最好的老師,能賺錢是最強勁的動力
級別: 網絡英雄

精華主題: 0
發帖數量: 2497 個
工控威望: 7394 點
下載積分: 3002 分
在線時間: 606(小時)
注冊時間: 2010-12-26
最后登錄: 2025-11-07
查看shi2999的 主題 / 回貼
3樓  發表于: 2013-10-04 07:10
  1.計算法(以VB為例)

  計算法就是依據CRC校驗碼的產生原理來設計程序。其優點是模塊代碼少,修改靈活,可移植性好。其缺點為計算量大。為了便于理解,這里假定了三位數據,而多項式碼為A001(hex)。

  在窗體上放置一命令按鈕Command1,并添加如下代碼:


  Private Sub Command1_Click()

   Dim CRC() As Byte

   Dim d() As Byte ’待傳輸數據

   ReDim d(2) As Byte

   d(0) = 123

   d(1) = 112

   d(2) = 135

   CRC = CRC16(d) ’調用CRC16計算函數

   ’CRC(0)為高位

   ’CRC(1)為低位

  End Sub

  注意:在數據傳輸時CRC的低位可能在前,而高位在后。


  Function CRC16(data() As Byte) As String

   Dim CRC16Lo As Byte, CRC16Hi As Byte   ’CRC寄存器

   Dim CL As Byte, CH As Byte        ’多項式碼&HA001

   Dim SaveHi As Byte, SaveLo As Byte

   Dim I As Integer

   Dim Flag As Integer

   CRC16Lo = &HFF

   CRC16Hi = &HFF

   CL = &H1

   CH = &HA0

   For I = 0 To Ubound(data)

    CRC16Lo = CRC16Lo Xor data(I) ’每一個數據與CRC寄存器進行異或

    For Flag = 0 To 7

     SaveHi = CRC16Hi

     SaveLo = CRC16Lo

     CRC16Hi = CRC16Hi \ 2      ’高位右移一位

     CRC16Lo = CRC16Lo \ 2      ’低位右移一位

     If ((SaveHi And &H1) = &H1) Then ’如果高位字節最后一位為1

      CRC16Lo = CRC16Lo Or &H80   ’則低位字節右移后前面補1

     End If              ’否則自動補0

     If ((SaveLo And &H1) = &H1) Then ’如果LSB為1,則與多項式碼進行異或

      CRC16Hi = CRC16Hi Xor CH

      CRC16Lo = CRC16Lo Xor CL

     End If

    Next Flag

   Next I

   Dim ReturnData(1) As Byte

   ReturnData(0) = CRC16Hi       ’CRC高位

   ReturnData(1) = CRC16Lo       ’CRC低位

   CRC16 = ReturnData

  End Function
huangpeng
級別: 論壇先鋒
精華主題: 0
發帖數量: 705 個
工控威望: 1051 點
下載積分: 3272 分
在線時間: 225(小時)
注冊時間: 2009-12-07
最后登錄: 2022-03-02
查看huangpeng的 主題 / 回貼
4樓  發表于: 2013-10-04 11:36
大家多是百度的吧,  誰有CRC子程序 跟注解
danny518
級別: 探索解密
精華主題: 0
發帖數量: 44 個
工控威望: 181 點
下載積分: 678 分
在線時間: 12(小時)
注冊時間: 2013-09-24
最后登錄: 2015-01-01
查看danny518的 主題 / 回貼
5樓  發表于: 2013-10-04 18:31
下載一個MODBUS 測試工具,里面有CRC 校驗  http://pan.baidu.com/share/home?uk=2688339055
huangpeng
級別: 論壇先鋒
精華主題: 0
發帖數量: 705 個
工控威望: 1051 點
下載積分: 3272 分
在線時間: 225(小時)
注冊時間: 2009-12-07
最后登錄: 2022-03-02
查看huangpeng的 主題 / 回貼
6樓  發表于: 2013-10-04 20:34
我的做modbus通信   的做CRC算法   不要說什么用庫 3U 有CRC 指令  我這不不是標準的MODBUS 我想知道CRC的算法 還有程序
supermax
級別: 工控俠客
精華主題: 0
發帖數量: 575 個
工控威望: 2540 點
下載積分: 3642 分
在線時間: 375(小時)
注冊時間: 2011-03-20
最后登錄: 2021-03-26
查看supermax的 主題 / 回貼
7樓  發表于: 2013-10-04 21:17
引用
引用第4樓huangpeng于2013-10-04 11:36發表的  :
大家多是百度的吧,  誰有CRC子程序 跟注解

坦白說!大家平水相逢!幫你百度一下算是不錯!說無保留幫你只是在騙你!你水平上來之前多是單向問人家索取,只有當你水平上來以后才有資格說交流,人家沒義務帶你!
supermax
級別: 工控俠客
精華主題: 0
發帖數量: 575 個
工控威望: 2540 點
下載積分: 3642 分
在線時間: 375(小時)
注冊時間: 2011-03-20
最后登錄: 2021-03-26
查看supermax的 主題 / 回貼
8樓  發表于: 2013-10-04 21:18
幫你百度一下已經是不錯,因為內容哪里對錯人家知道。
wjmdtt
級別: 略有小成
精華主題: 0
發帖數量: 126 個
工控威望: 268 點
下載積分: 1316 分
在線時間: 92(小時)
注冊時間: 2009-07-20
最后登錄: 2025-08-28
查看wjmdtt的 主題 / 回貼
9樓  發表于: 2013-10-05 11:31
這是我做的,西門子的。MODBUS用的是;CRC16的
描述:CRC
附件: crc校驗.zip (2 K) 下載次數:43

主站蜘蛛池模板: 日本一区二区专线 | 国产亚洲人成网站观看 | 加勒比精品视频 | 国产少妇自拍 | 国产在线精品视频你懂的 | 素人av在线 | 欧美性xxxx在线播放 | 另类亚洲欧美专区第一页 | 青青草国产精品免费观看 | 六月婷婷网 | 午夜成人免费视频 | 久久综合亚洲鲁鲁五月天 | 亚洲国产精品久久久久婷婷图片 | 人妻熟女 视频二区 视频一区 | 手机看片1024欧美 | 亚洲精品国产一二三无码av | 97夜夜澡人人爽人人喊中国片 | 成人在线观看免费爱爱 | 国产老妇av| 国产交换配偶在线视频 | 中国女人初尝黑人巨高清视频 | 亚洲综合小说另类图片五月天 | 理论片87福利理论电影 | 国产又白又嫩又爽又黄 | 久久综合久久久久88 | 久久久精品人妻一区二区三区四 | 夜夜天天 | 亚洲性色av私人影院无码 | 老子影院午夜伦手机不四虎卡 | 国产一级淫片a视频免费观看 | 久久九九热视频 | 国产精品第56页 | 爽爽爽av | 波多野结衣不打码视频 | 国语对白做受欧美 | 亚洲精品专区在线观看 | 一区精品在线 | 亚洲国产欧美精品 | 香蕉福利| 浪妇淫交小说 | 日韩内射美女片在线观看网站 | 成人午夜特黄aaaaa片男男 | 在线观看中文字幕码 | 亚洲va久久久噜噜噜久久男同 | 91成人久久| 超碰v| 涩涩屋视频 | 中文字幕无码视频专区 | 亚洲精品国产熟女久久久 | 成人国产精品免费观看动漫 | 1区2区3区高清视频 午夜激情小视频 | 欧美成人精品a∨在线观看 久久精品人妻无码一区二区三区 | 亚洲最大免费视频 | 国内自拍视频一区二区三区 | 婷婷网色偷偷亚洲男人甘肃 | 亚洲精品一区二区三区早餐 | 在线色国产 | 无码福利日韩神码福利片 | 亚洲欧美不卡高清在线 | 波多野结衣中文字幕一区二区 | 蜜臀色欲av在线播放国产日韩 | 亚洲国产精品成人天堂 | 日韩精品无码人妻一区二区三区 | 99久久国产综合精品女不卡 | 成人在色线视频在线观看免费大全 | 国产成人精品优优av | 亚洲精品一区二区三区影院忠贞 | 国产高清视频一区 | 国产视频一二三区 | 亚洲激情欧美 | 天天射网站 | 日日骚网 | 日韩午夜毛片 | 十八禁在线观看视频播放免费 | 四虎国产精品永久在线观看 | 日韩成人免费在线观看 | 777亚洲精品乱码久久久久久 | 午夜精品少妇 | 一级淫片aaaaaaaahd| 久操超碰 | 奇米影视777四色米奇影院 | 欧美午夜网站 | 伊人网色| 一道日本中文版高清视频 | 欧美牲交a欧美牲交aⅴ免费 | 91精品免费 | 色婷婷国产精品高潮呻吟av久久 | 少妇午夜福利水多多 | 成年日韩片av在线网站 | 欧美一级激情 | 精品欧美在线 | 免费精品国产自产拍在线观看 | 黑人上司粗大拔不出来电影 | 国产乱码精品一区二区三区五月婷 | 老太婆性杂交欧美肥老太 | 亚洲欲色欲香天天综合网 | 久久精品麻豆日日躁夜夜躁 | 国产精品一二三区成毛片视频 | 亚洲精品图区 |