Hmm..

This is from one of mine to change the I2C output to HEX then display the DEC via serial.
Code:
I2CRead DS_SDA, DS_SCL, RTC, SecReg, [sec,MINs,hr,day,date,mon,yr] 

SEC_T = sec & $70
SEC_T = SEC_T>>4 'Tens place
Serout2 PORTC.6, 16572,["SEC_T  ",DEC SEC_T, $d, $a]
SEC_O = sec & $0F  'Ones place
Serout2 PORTC.6, 16572,["SEC_O  ",DEC SEC_O, $d, $a]