2003-04-14 21:28:51 +00:00
|
|
|
;
|
|
|
|
|
; Ullrich von Bassewitz, 2003-04-14
|
2008-04-10 20:15:28 +00:00
|
|
|
; Stefan Haubenthal, 2007-01-21
|
2003-04-14 21:28:51 +00:00
|
|
|
;
|
|
|
|
|
; Screen size function
|
|
|
|
|
;
|
|
|
|
|
|
2008-04-10 20:15:28 +00:00
|
|
|
.export screensize
|
2003-04-14 21:28:51 +00:00
|
|
|
|
2008-04-10 20:15:28 +00:00
|
|
|
.include "nes.inc"
|
|
|
|
|
.include "get_tv.inc"
|
2003-04-14 21:28:51 +00:00
|
|
|
|
|
|
|
|
|
2008-04-10 20:15:28 +00:00
|
|
|
.proc screensize
|
2003-04-14 21:28:51 +00:00
|
|
|
|
2008-04-10 20:15:28 +00:00
|
|
|
jsr _get_tv
|
|
|
|
|
ldx #charsperline
|
|
|
|
|
ldy #screenrows
|
|
|
|
|
cmp #TV::NTSC
|
|
|
|
|
beq nopal
|
|
|
|
|
dey
|
|
|
|
|
nopal: rts
|
2003-04-14 21:28:51 +00:00
|
|
|
|
|
|
|
|
.endproc
|
