Use get_tv.inc. Fix high byte of returned value.

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

diff --git a/libsrc/atari/tvtype.s b/libsrc/atari/tvtype.s
index fc9d77e84d700134c12c213b7a15e6de28a16f44..84540b898e02f0ab1b56a3633472d9ca76982184 100644 (file)
--- a/libsrc/atari/tvtype.s
+++ b/libsrc/atari/tvtype.s
@@ -10,17 +10,17 @@
 
 
        .include        "atari.inc"
-       .export         _get_tv
+       .include        "get_tv.inc"
 
 .proc  _get_tv
 
-       lda     PAL             ; use hw register, PALNTS is only supported on XL/XE ROM
-       ldx     #0
+       ldx     #TV::NTSC       ; Assume NTSC
+       lda     PAL             ; use hw register, PALNTS is only supported on XL/XE ROM
        and     #$0e
        bne     @NTSC
-       lda     #1
-       rts
+       inx                     ; = TV::PAL
 @NTSC: txa
+       ldx     #0              ; Expand to int
        rts
 
 .endproc