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 22f516c62a21cd8c3125b5a947d95da22f8d3887..bd963d1da362b6a5675e46babc8cd30485da91bd 100644 (file)
--- 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 (file)
index 0000000..044ee05
--- /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