|
快思聪的Cen-hprfgw网关在美国官网上标称室内最远距离是100-200英尺,也就是30.5-61米左右。8 j5 C, s/ `+ r! s7 o' y3 @
1 B6 I0 a6 n8 o6 n. J在VB中很容易编写一个开串口通信的软件,可以让电脑通过232接口和中控主机互相连接,成为一个有线的控制备份。如果该单位有笔记本电脑,中控主机也有空闲串口,那花点时间做个小程序也不错,起码不用追加投资了。
! U* k, e$ h' V2 `
+ e6 G- x7 G6 O q4 K8 X* q: b楼主是做中控的,可能对计算机语言比较熟悉。我也附上一个简单的VB下的开串口小程序代码,前三个是随便定义了三个按键命令,最后一段是以9600N81的方式开启串口的设置,供各位网友参考。- [0 F, E# e7 e
' _& J; W. L' o% B% ?
Private Sub Command1_Click()
3 z- j1 {. N2 I; e# E, ZMSComm1.Output = "loadp 1" & vbCr I( l( t; |6 q# N4 ~& I! U k* o
End Sub
/ L# {! L, c, d8 R; Y- P J
\1 t0 O* Y& \$ m* j/ n0 |3 IPrivate Sub Command2_Click()
( o( L) p6 Y; }2 D! X3 @MSComm1.Output = "0xAA 0xC5 0x00 0xC4 0x00 0x01 0x8A"
8 Z3 N1 g. p: w! D1 B1 I8 pEnd Sub* Y$ Q, f& c1 }1 C4 ?$ B+ h+ r1 S
9 b( _) _2 L8 v$ D0 M- w8 x
) i9 V6 i) o( p( x1 i
Private Sub Command3_Click()
5 `& p& @$ d- |. j7 cMSComm1.Output = "set 1 a 0 2" & vbCr
) D5 A) a- u2 ]! dEnd Sub
8 k A! j5 J- V" c
. J2 W* D9 Z/ |% G" V' Y2 E- x7 gPrivate Sub Form_Load()
% W J% \" a$ G- ~* t3 o0 \MSComm1.Settings = "9600,n,8,1"
8 ?- J' X9 ^" R+ T! qMSComm1.CommPort = 15 r9 w U) @6 K8 W7 B0 n- A
MSComm1.InputLen = 0( v9 M; M3 z" i) ?, s
MSComm1.PortOpen = True
' @$ \8 q: d3 N+ W+ e# q3 }: qMSComm1.InBufferCount = 0
) E5 A5 N n; h8 U* lMSComm1.SThreshold = 0/ R' z0 O I! v9 k# g
MSComm1.RThreshold = 1, R' ^0 J) l' Z6 i
End Sub |
|