A shorter get.rtc for the PCF8563 RTC library:
: get.rtc ( -- tos> YY MM WD DD HH MM SS )
2 \ start address
1 i2c_addr_rtc >i2c \ send > rtc
7 i2c_addr_rtc r >r >r >r >r >r >r \ removes garbage
r> $7f and \ SS
r> $7f and \ MM
r> $3f and \ HH
r> $3f and \
Hi, enclosed pls find the driver for PCF8563 RTC. Enjoy, Pito.
\ i2c_rtc_PCF8563.frt
\ read/set time on PCF8563 real time clock
\ Pito 9/2010
\ based on EW lib 2008 PCF8583, bcd>dec, needs i2c.frt, twi.frt
\ words: get.rtc ( -- x0 .. x5 yy )
\set.rtc ( Y m wd d H M S -- )
\printdat
