From 8b3dc380304f5955bc1de5b6ec831ba13b7e1a8e Mon Sep 17 00:00:00 2001
From: johanknol <johanknol@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Fri, 2 Feb 2001 16:12:03 +0000
Subject: [PATCH] just another example

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@567 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 device/examples/ds390/rtc390/Makefile |  19 ++++
 device/examples/ds390/rtc390/rtc390.c | 122 ++++++++++++++++++++++++++
 2 files changed, 141 insertions(+)
 create mode 100755 device/examples/ds390/rtc390/Makefile
 create mode 100755 device/examples/ds390/rtc390/rtc390.c

diff --git a/device/examples/ds390/rtc390/Makefile b/device/examples/ds390/rtc390/Makefile
new file mode 100755
index 00000000..3be8bb78
--- /dev/null
+++ b/device/examples/ds390/rtc390/Makefile
@@ -0,0 +1,19 @@
+CC = sdcc
+
+MFLAGS = -mds390 --model-flat24 --stack-10bit
+LFLAGS = --xram-loc 0x100080 --code-loc 0x10000 -Wl-r
+
+OBJECTS = rtc390.rel
+
+all: rtc390.hex
+
+clean:
+	rm -f *~ \#* *.asm *.cdb *.rel *.hex *.ihx *.lst *.map *.rst *.sym *.lnk
+
+rtc390.hex: $(OBJECTS)
+	$(CC) $(MFLAGS) $(LFLAGS) $(OBJECTS) 
+	packihx rtc390.ihx >rtc390.hex
+	#tinitalk -c execute rtc390.hex
+
+%.rel: %.c
+	$(CC) -c $(MFLAGS) -I . $<
diff --git a/device/examples/ds390/rtc390/rtc390.c b/device/examples/ds390/rtc390/rtc390.c
new file mode 100755
index 00000000..08880167
--- /dev/null
+++ b/device/examples/ds390/rtc390/rtc390.c
@@ -0,0 +1,122 @@
+/*-------------------------------------------------------------------------
+  rtc390.c - rtc demo for the DS1315 (tested on TINI)
+  
+   Written By - Johan Knol, johan.knol@iduna.nl
+    
+   This program is free software; you can redistribute it and/or modify it
+   under the terms of the GNU General Public License as published by the
+   Free Software Foundation; either version 2, or (at your option) any
+   later version.
+   
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+   
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+   
+   In other words, you are welcome to use, share and improve this program.
+   You are forbidden to forbid anyone else to use, share and improve
+   what you give them.   Help stamp out software-hoarding!  
+-------------------------------------------------------------------------*/
+
+#include <stdio.h>
+#include <ctype.h>
+
+//#define USE_LCD
+
+#ifdef USE_LCD
+#include "lcd.h"
+#endif
+
+int ScanInt(int current) {
+  char reply[32], *r;
+
+  gets(reply);
+  if (isdigit(*(r=reply))) {
+    current=0;
+    do {
+      current*=10;
+      current+=(*r++)-'0';
+    } while (isdigit(*r));
+  }
+  return current;
+}
+
+char GetTime(struct RTCDate *rtcDate) {
+  printf ("Enter year [%d]: ", rtcDate->year);
+  rtcDate->year=ScanInt(rtcDate->year);
+  printf ("Enter month [%d]: ", rtcDate->month);
+  rtcDate->month=ScanInt(rtcDate->month);
+  printf ("Enter day [%d]: ", rtcDate->day);
+  rtcDate->day=ScanInt(rtcDate->day);
+  printf ("Enter hour [%d]: ", rtcDate->hour);
+  rtcDate->hour=ScanInt(rtcDate->hour);
+  printf ("Enter minute [%d]: ", rtcDate->minute);
+  rtcDate->minute=ScanInt(rtcDate->minute);
+  printf ("Enter second [%d]: ", rtcDate->second);
+  rtcDate->second=ScanInt(rtcDate->second);
+  rtcDate->hundredth=0;
+}
+
+void PrintTime(struct RTCDate *rtcDate) {
+  printf ("%04d-%02bd-%02bd %02bd:%02bd:%02bd.%02bd\n", 
+	  rtcDate->year, rtcDate->month, rtcDate->day,
+	  rtcDate->hour, rtcDate->minute, rtcDate->second,
+	  rtcDate->hundredth);
+}
+
+void main (void) {
+  struct RTCDate rtcDate;
+  unsigned char seconds=0xff;
+
+  printf ("\nStarting RTC demo.\n");
+
+#ifdef USE_LCD
+  LcdInit();
+  LcdLPrintf (0, "Starting RTC demo.");
+#endif
+  
+  while(1) {
+    RtcRead(&rtcDate);
+
+#ifdef USE_LCD
+    // if lcd is enabled it only syncs the second time
+    RtcRead(&rtcDate);
+#endif    
+
+#ifdef USE_LCD
+    LcdLPrintf (2,"%04d-%02bd-%02bd",
+		rtcDate.year, rtcDate.month, rtcDate.day);
+    LcdLPrintf (3, "%02bd:%02bd:%02bd.%02bd", 
+		rtcDate.hour, rtcDate.minute, rtcDate.second,
+		rtcDate.hundredth);
+#endif
+    if (rtcDate.second!=seconds) {
+      PrintTime(&rtcDate);
+      seconds=rtcDate.second;
+    }
+    
+    if (Serial0CharArrived()) {
+      switch (getchar()) 
+	{
+	case 0:
+	  break;
+	case 'q': 
+	  printf ("Ok.\n");
+	  return;
+	default:
+	  if (GetTime(&rtcDate)) {
+#ifndef USE_LCD
+	    PrintTime(&rtcDate);
+	    RtcWrite(&rtcDate);
+	    printf ("Time written.\n");
+#endif
+	  }
+	}
+    }
+  }
+
+}
-- 
2.30.2