That doesn't look like PicBasicPro to me...
Maybe you should try the correct forums...Code:Dim rtcyear as byte Dim rtcday as byte Dim rtcmonth as byte Dim rtcdate as byte Dim rtchr as byte Dim rtcmin as byte Dim rtchr1 as byte Dim rtcmin1 as byte Dim rtcsec as byte Dim rtccontrol as byte dim b0 as byte dim b1 as byte Delayms 100 ' Wait for LCD to startup print at 3,1, dec2 rtchr, ";", dec2 rtcmin Shout IO,SCLK,LSBFIRST,[$8e,0] ' Enable write Shout IO,SCLK,LSBFIRST,[$be,rtcsec,rtcmin,rtchr,rtcdate,rtcmonth,rtcday,rtcyear,0]




Bookmarks