久久99精品视频一区97_亚洲a免费在线观看_美欧日韩av无码一区二区_国产精品视频123_东京热一本无码av_99精品国产闺蜜国产在线闺蜜

wxz11
級別: 略有小成
精華主題: 0
發帖數量: 305 個
工控威望: 338 點
下載積分: 1245 分
在線時間: 384(小時)
注冊時間: 2006-10-01
最后登錄: 2020-11-29
查看wxz11的 主題 / 回貼
樓主  發表于: 2010-10-14 20:36
1)、LRC 演算法校驗的實現

Public Function LRC(str As String) As String
c = 0
l = Len(str)
For c = c + 1 To l
c_data = Mid$(str, c, 2)
d_lrc = d_lrc + Val("&H" + c_data)
c = c + 1
Next c
If d_lrc > &HFF Then
    d_lrc = d_lrc Mod &H100
End If
h_lrc = Hex(&HFF - d_lrc + 1)
wxz11
級別: 略有小成
精華主題: 0
發帖數量: 305 個
工控威望: 338 點
下載積分: 1245 分
在線時間: 384(小時)
注冊時間: 2006-10-01
最后登錄: 2020-11-29
查看wxz11的 主題 / 回貼
1樓  發表于: 2010-10-14 20:38
不好意思還有一點  接上面的

If Len(h_lrc) > 2 Then
     h_lrc = Mid(h_lrc, Len(h_lrc) - 1, 2)
End If
LRC = h_lrc
End Function
ydp
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看ydp的 主題 / 回貼
2樓  發表于: 2010-10-14 20:55
好似是解決一段字符串,然後生成16進制碼送到PLC

主站蜘蛛池模板: 国产精品高清一区 | 蜜桃一本色道久久综合亚洲精品冫 | 狠狠五月 | 视频一区国产精品 | av完全免费在线 | 9191精品国产综合久久久久久 | 国产传媒av在线 | 久久日本片精品aaaaa国产 | 麻豆传传媒久久久爱 | 在线观看欧美 | 国产午夜精品久久 | 亚洲视频免费播放 | 香蕉久久精品 | 黄色高清在线观看 | 国产精品视频偷伦精品视频 | 法国1997年的迷宫 | 逼特逼在线视频 | 国产精品视频免费一区 | 出租屋嫖妓大龄熟妇露脸在线播放 | 国产一区中文 | 久草成人在线 | 亚洲网久久 | 免费在线观看电视网站 | 久久嫩草精品久久久久 | av亚洲一区| 日韩欧美一区二区三区免费观看 | 亚洲国产成人资源在线软件 | 久久久久极品 | 国产精品99久久久久久人 | 国产综合视频 | 密臀av一区二区 | 亚洲精品区 | 久久bb| 黄频网址| 国产日产91亚洲精品 | 公好大太涨快点深一点 | 91人人爱| 久久亚洲精品人成综合网 | 欧美一区二粉嫩精品国产一线天 | 亚洲精品7777 | 亚洲国产精品日韩av不卡在线 |