Added get_ostype.s

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

diff --git a/libsrc/c64/Makefile b/libsrc/c64/Makefile
index 5d8eeea5f3adb6ec3b79aed95d8f7df995148c26..246f4773e9d9f4686741bdf6d7ea672eeb0bb81c 100644 (file)
--- a/libsrc/c64/Makefile
+++ b/libsrc/c64/Makefile
@@ -35,6 +35,7 @@ OBJS =        _scrsize.o              \
                color.o                 \
                conio.o                 \
                cputc.o                 \
+        get_ostype.o            \
         get_tv.o                \
        joy_stddrv.o            \
                kbhit.o                 \

diff --git a/libsrc/c64/get_ostype.s b/libsrc/c64/get_ostype.s
new file mode 100644 (file)
index 0000000..b04c985
--- /dev/null
+++ b/libsrc/c64/get_ostype.s
@@ -0,0 +1,22 @@
+;
+; Stefan Haubenthal, Jul 10 2003
+;
+; unsigned char get_ostype(void)
+;
+; $AA US
+; $64 PET-64
+; $43 SX-64
+; $03 EU_NEW
+; $00 EU_OLD
+;
+
+       .export         _get_ostype
+
+.proc  _get_ostype
+
+       lda     $ff80
+       rts
+
+.endproc
+
+