Calculating LCR:
nMen:=NUMXOR( '30', '36', '03')
if len(alltrim(hb_NumToHex(nMen))) = 1
mLcr="0"+alltrim(hb_NumToHex(nMen))
else
mLcr=alltrim(hb_NumToHex(nMen))
endif
The value is: mLcr=05
WriteComm( nComPos, Chr(0x02)+Chr(0x02)+Chr(0x30)+Chr(0x36)+Chr(0x03)+Chr(0x01) )
How to change the value 01 Chr(0x01) to 05 (mLcr) Chr(0x05)?
Best regards,
Miloš
Writecomm and CHR()
Writecomm and CHR()
Best regards
Milos
[ FWH 21.11 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20150603) ]
Milos
[ FWH 21.11 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20150603) ]
- Antonio Linares
- Site Admin
- Posts: 42519
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Has thanked: 31 times
- Been thanked: 75 times
- Contact:
Re: Writecomm and CHR()
Miloš,
WriteComm( nComPos, Chr(0x02)+Chr(0x02)+Chr(0x30)+Chr(0x36)+Chr(0x03)+Chr(0x05) ) ??
Please explain it better, thanks
WriteComm( nComPos, Chr(0x02)+Chr(0x02)+Chr(0x30)+Chr(0x36)+Chr(0x03)+Chr(0x05) ) ??
Please explain it better, thanks