>Can anyone give me example code on doing LRC on a string?
>

IIRC, the LRC character is a result of XOR of each byte of the string.

lcStr = "LRC - Longitudinal Redundancy Check"
lnLRC = 0
FOR i=1 TO len(lcStr)
	lnLRC = BITXOR(lnLRC, ASC(SUBSTR(lcStr,i ,1) ))
ENDFOR

? lnLRC 
lcLRC = CHR(lnLRC)