I've been reading all posts here regarding the DS1307 RTC, but I really can't get it to work.
I just get the value '0' when trying to read it.
Is soething in my code is wrong ?

Code:
	RTCSec var byte		' Seconds
	RTCMin var byte		' Minutes
	RTCHour var byte	' Hours
	RTCWDay var byte	' Weekday
	RTCDay var byte		' Day
	RTCMonth var byte	' Months
	RTCYear var byte	' Year
	RTCCtrl var byte	' Control 
	SetTime var byte	' 12/24 Hour Clock
	SetSec var byte		' Seconds
	SetMin var byte		' Minutes
	SetHour var byte	' Hours
	SetDay var byte		' Day
	SetMonth var byte	' Months
	SetYear var byte	' Year
	TimeOut var word	' Variable for SetUp Menu Time-Out
RTCSec=1
RTCMin=4

I2CWRITE PORTC.4,PORTC.3,$D0,$00,[RTCSec,RTCMin,RTCHour,RTCWDay,RTCDay,RTCMonth,RTCYear,RTCCtrl]
pause 100
main:
I2CRead PORTC.4,PORTC.3,$D0,$00,[RTCSec,RTCMin,RTCHour,RTCWDay,RTCDay,RTCMonth,RTCYear,RTCCtrl]
SEROUT PORTC.6,6,[254,1]
toggle PORTD.7 : pause 1000
SEROUT PORTC.6,6,[254,128,#RTCSec]
pause 1000
goto main