git.sur5r.net Git - cc65/blob - libsrc/atari/tvtype.s

   1 ;
   2 ; Christian Groessler, June 2004
   3 ;
   4 ; unsigned char _get_tv(void)
   5 ;
   6 ; returns the TV system the machine is using
   7 ; 0 - NTSC
   8 ; 1 - PAL
   9 ;
  10
  11
  12         .include        "atari.inc"
  13         .export         __get_tv
  14
  15 .proc   __get_tv
  16
  17         lda     PAL             ; use hw register, PALNTS is only supported on XL/XE ROM
  18         ldx     #0
  19         and     #$0e
  20         bne     @NTSC
  21         lda     #1
  22         rts
  23 @NTSC:  txa
  24         rts
  25
  26 .endproc