1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 21:32:19 +00:00
cc65/libsrc/geos/conio/screensize.s
izydorst 8ce6c9bcac simple conio support for GEOS
git-svn-id: svn://svn.cc65.org/cc65/trunk@1093 b7a2c559-68d2-44c3-8de9-860c34a00d81
2001-10-27 17:13:22 +00:00

36 lines
528 B
ArmAsm

;
; Maciej 'YTM/Elysium' Witkowiak
;
; 27.10.2001
; void screensize (unsigned char* x, unsigned char* y);
;
.export _screensize
.import popax
.importzp ptr1, ptr2
.include "../inc/geossym.inc"
_screensize:
sta ptr1 ; Store the y pointer
stx ptr1+1
jsr popax ; get the x pointer
sta ptr2
stx ptr2+1
ldy #0
lda graphMode
bpl L1
lda #80 ; 80 columns (more or less)
.byte $2c
L1: lda #40 ; 40 columns (more or less)
sta (ptr2),y
lda #24 ; something like that for Y size
sta (ptr1),y
rts