I2CRead & I2CWrite not working as expected

[richard]

works perfectly on simulator

had to increase some delays for slow old lcd
pause 1000
' Set LCD Data port
DEFINE LCD_DREG PORTC
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 44
lcdout $fe, $1, "ready " ;added to prove lcd working
pause 1000