Instruction Manual - Sierra Instruments
Instruction Manual - Sierra Instruments
Instruction Manual - Sierra Instruments
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
<strong>Sierra</strong> <strong>Instruction</strong> <strong>Manual</strong> SmartTrak ® Series 100crcWord = crcWord + &H100 ' make this byte &h01xxEnd IfIf (crcWord And &HFF) = &HD Then ' carriage char not allowedcrcWord = crcWord + 1 ' make this byte &hxx0eEnd IfIf (crcWord And &HFF) = &H0 Then ' zero char is deathcrcWord = crcWord + 1 ' make this byte &hxx01End IfReDim Preserve crcBytes(0 To crcLen + 3) ' make room for crc and carriage returncrcBytes(crcLen + 1) = Int(crcWord / &H100) ' high bytecrcBytes(crcLen + 2) = (crcWord And &HFF) ' low bytecrcBytes(crcLen + 3) = 13 ' carriage returnvpacket = crcBytescommQueue.Add vpacketEnd Sub101