mirror of
https://github.com/cc65/cc65.git
synced 2025-01-10 19:29:45 +00:00
Add get_tv.s
This commit is contained in:
parent
c577ec1383
commit
d0d0941a64
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…
x
Reference in New Issue
Block a user