Add get_tv.s
This commit is contained in:
parent
c577ec1383
commit
d0d0941a64
1 changed files with 26 additions and 0 deletions
26
libsrc/atari7800/get_tv.s
Normal file
26
libsrc/atari7800/get_tv.s
Normal file
|
@ -0,0 +1,26 @@
|
|||
;
|
||||
; Stefan Haubenthal, 2007-01-21
|
||||
;
|
||||
; unsigned char get_tv (void);
|
||||
; /* Return the video mode the machine is using */
|
||||
;
|
||||
|
||||
.include "atari7800.inc"
|
||||
.include "get_tv.inc"
|
||||
.importzp tmp1, tmp2
|
||||
.import _paldetected
|
||||
|
||||
;--------------------------------------------------------------------------
|
||||
; _get_tv
|
||||
|
||||
.proc _get_tv
|
||||
|
||||
lda _paldetected
|
||||
beq ntsc
|
||||
lda #TV::PAL
|
||||
rts
|
||||
ntsc:
|
||||
lda #TV::NTSC
|
||||
rts
|
||||
|
||||
.endproc
|
Loading…
Add table
Reference in a new issue