cmder
级别: 探索解密
精华主题: 0
发帖数量: 25 个
工控威望: 142 点
下载积分: 735 分
在线时间: 43(小时)
注册时间: 2011-01-07
最后登录: 2021-10-15
查看cmder的 主题 / 回贴
楼主  发表于: 2011-12-06 15:58

Word = hex(....)
   Sd = ENQ + "00FFWW5D" + 0123 + "02" + Word
   frmMain.Rscom.Output = Sd
   Twrite = 1
   Timer1.Interval = 80
   Timer1.Enabled = True
Delay: DoEvents
   If Twrite = 1 Then GoTo Delay
   Timer1.Enabled = False
   RD = frmMain.Rscom.Input
   If Left(RD, 5) = ACK + "00FF" Then exit sub

.........
SD = ENQ + "00FFWR3D0120" + "02"
  Moncom.Output = SD
  Tread = 1
  Timer2.Interval = 100
  Timer2.Enabled = True
Delay4: DoEvents
  If Tread = 1 Then GoTo Delay4
  Timer2.Enabled = False
  RDD = Moncom.Input
  If Left(RDD, 5) = STX + "00FF" Then EXIT SUB
谁能帮忙解释下啊   ????


ENQ + "00FFWW5D"
yanzhi2008
级别: 略有小成
精华主题: 0
发帖数量: 354 个
工控威望: 397 点
下载积分: 9848 分
在线时间: 308(小时)
注册时间: 2008-01-30
最后登录: 2024-05-06
查看yanzhi2008的 主题 / 回贴
1楼  发表于: 2011-12-08 21:58
看下三菱通讯手册