THAT IS MY CODE IHAVE ALREADY WRITTEN BUT IT IS NOT WORKING PROPERTLY.
ANY IDEA?


Main:
SerData = 0
HSERIN [SerData]
IF SerData <> 0 THEN
hserout ["You typed:", SerData,10,13]
ELSE
Goto Main
ENDIF
PAUSE 1000
Goto OUT

Pause 1000


OUT:
I2CWRITE SDA0, SCL0, DISPLAYCONTROLBYTE1, DIGIT0BOTHPLANESADDRESS, ["SerData[1]"]

I2CWRITE SDA0, SCL0, DISPLAYCONTROLBYTE1, DIGIT1BOTHPLANESADDRESS, ["SerData[2]"]

I2CWRITE SDA0, SCL0, DISPLAYCONTROLBYTE1, DIGIT2BOTHPLANESADDRESS, ["SerData[3]"]

I2CWRITE SDA0, SCL0, DISPLAYCONTROLBYTE1, DIGIT3BOTHPLANESADDRESS, ["SerData[4]"]