'' EEPROM_1.spin '' +--VGA.spin '' +--ASCII0_STR '' +--DS1307.spin
RTC_CLK = 0 RTC_DAT = 1
rtc : "DS1307.spin" str : "ASCII0_STR"
'Treiber Aktivieren
rtc.rtcEngineStart(RTC_DAT, RTC_CLK, -1)
'Treiber deaktivieren
rtc.RTCEngineStop
'aktuelle Zeit vom RTC in Propeller laden 'eingelesene Zeit ausgeben
rtc.readTime
'den Wochentag ausgeben in Textform
vga.pr_str(lookup(rtc.clockDay: string("Sonntag"), { } string("Montag"), { } string("Dienstag"), { } string("Mittwoch"), { } string("Donnerstag"), { } string("Freitag"), { } string("Samstag")))
'den Monat ausgeben in Textform
vga.pr_str(lookup(rtc.clockMonth: string("Januar"), { } string("Feburar"), { } string("Maerz"), { } string("April"), { } string("May"), { } string("Juni"), { } string("Juli"), { } string("August"), { } string("September"), { } string("Oktober"), { } string("November"), { } string("Dezember")))
'vom Datum den Tag ausgeben als Zahl 2 stellig
vga.pr_str(1 + str.integerToDecimal(rtc.clockDate, 2))
'vom Datum den Jahr ausgeben als Zahl 4 stellig
vga.pr_str(1 + str.integerToDecimal(rtc.clockYear, 4))
'komplette ausgabe der Zeit im 24h Format
if(rtc.clockMeridiemTime) '24h Anzeige vga.pr_str(1 + str.integerToDecimal(rtc.clockMeridiemHour+12, 2)) else vga.pr_str(1 + str.integerToDecimal(rtc.clockMeridiemHour, 2)) vga.pr_chr(":") vga.pr_str(1 + str.integerToDecimal(rtc.clockMinute, 2)) vga.pr_chr(":") vga.pr_str(1 + str.integerToDecimal(rtc.clockSecond, 2))
'Zeit stellen Werte im BCD-Format
rtc.writeTime(second, minute, hour, day, date, month, year)
'Eine Zelle Auslesen
value:=rtc.readSRAM(index)
'Eine Zelle beschreiben
rtc.writeSRAM(index, value)