From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Thu, 6 Aug 2009 20:24:41 +0000 (+0000)
Subject: get_tv() implementation for the CBM610 by Stefan Haubenthal.
X-Git-Tag: V2.13.0rc1~257
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=f8d3fccc01ef5378ee652a3431f7d9b676c443e4;p=cc65

get_tv() implementation for the CBM610 by Stefan Haubenthal.


git-svn-id: svn://svn.cc65.org/cc65/trunk@3998 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

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