Does any one have guide routine in PICBasic to calculate CRC16bit MODBUS ?

Thank,
Grich