From f8d3fccc01ef5378ee652a3431f7d9b676c443e4 Mon Sep 17 00:00:00 2001
From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Thu, 6 Aug 2009 20:24:41 +0000
Subject: [PATCH] get_tv() implementation for the CBM610 by Stefan Haubenthal.

git-svn-id: svn://svn.cc65.org/cc65/trunk@3998 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/cbm610/Makefile |  1 +
 libsrc/cbm610/get_tv.s | 20 ++++++++++++++++++++
 2 files changed, 21 insertions(+)
 create mode 100644 libsrc/cbm610/get_tv.s

diff --git a/libsrc/cbm610/Makefile b/libsrc/cbm610/Makefile
index 22f516c62..bd963d1da 100644
--- a/libsrc/cbm610/Makefile
+++ b/libsrc/cbm610/Makefile
@@ -48,6 +48,7 @@ OBJS =	_scrsize.o	\
        	crt0.o 		\
        	crtc.o 		\
         extzp.o         \
+        get_tv.o        \
        	kbhit.o		\
 	kclose.o	\
         kernal.o        \
diff --git a/libsrc/cbm610/get_tv.s b/libsrc/cbm610/get_tv.s
new file mode 100644
index 000000000..044ee0543
--- /dev/null
+++ b/libsrc/cbm610/get_tv.s
@@ -0,0 +1,20 @@
+;
+; Stefan Haubenthal, 2009-08-02
+;
+; unsigned char __fastcall__ get_tv (void);
+; /* Return the video mode the machine is using */
+;
+
+	.include	"get_tv.inc"
+
+
+;--------------------------------------------------------------------------
+; _get_tv
+
+.proc	_get_tv
+
+       	lda    	#<TV::OTHER	; CRTC
+	ldx	#>TV::OTHER
+	rts
+
+.endproc
-- 
2.39.5