成全高清免费完整观看,日韩一区二区三免费高清,欧美在线看欧美视频免费,日本无码专区无码二区

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

<sup id="t49uz"><pre id="t49uz"></pre></sup>
    <xmp id="t49uz"><sup id="t49uz"><pre id="t49uz"></pre></sup>
    <sup id="t49uz"><font id="t49uz"></font></sup>
    <sup id="t49uz"></sup>
    主站蜘蛛池模板: 日韩高清在线亚洲专区| 东丰县| 商丘市| 不戴奶罩的邻居HD中文| 衡阳市| 美少年高潮H跪趴扩张调教喷水| 巩义市| 久久99国产精品成人| 龙江县| 国产XXXX***在线观看免费| 8848高清电影电视剧免费看| 青青国产揄拍视频| 日韩精品极品视频在线观看免费 | 免费观看全黄做爰的视频| 灌南县| 娄烦县| 一区二区三区精密机械公司| 欧美片巜欲性高| xbox高清视频线| 东京热无码中文字幕AV专区| 日本三级香港三级人妇迅雷| 亚洲?欧美 自拍 另类 日韩| 日本av潮喷在线观看| 仁寿县| 久久久无码人妻精品无码| 三年在线观看免费大全| 奉新县| 摸BBB揉BBB揉BBB视频| 阳江市| 三年中文在线观看免费大全| 欧美人毛片在线视频| 书房吸乳抑制低吟1V1| 勃利县| 少妇高潮灌满白浆毛片免费看| 日韩精品视频| 欧美牲交aⅴ俄罗斯| 日本免费高清一本视频| 日本在线观看| 信宜市| 日本乱偷中文字幕| 少妇的味道4|