the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Further optimizations in common/conio.

Browse Source
This commit is contained in:
IrgendwerA8
2018-05-22 15:59:05 +02:00
parent d7da827be8
commit ba2c6d9008
5 changed files with 81 additions and 88 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
libsrc/conio/scrsize.s
View File

@@ -6,29 +6,30 @@
.export _screensize
.import popsreg
.import popptr1
.import screensize
.importzp ptr1, sreg
.importzp ptr1, ptr2
.macpack cpu
.proc _screensize
sta ptr1 ; Store the y pointer
stx ptr1+1
jsr popsreg ; Get the x pointer into sreg
sta ptr2 ; Store the y pointer
stx ptr2+1
jsr popptr1 ; Get the x pointer into ptr1
jsr screensize ; Get screensize into X/Y
tya ; Get Y size into A
.IFP02
ldy #0
sta (ptr1),y
.if (.cpu .bitand ::CPU_ISET_65SC02)
sta (ptr2)
txa
sta (sreg),y
.ELSE
sta (ptr1)
.else
ldy #0
sta (ptr2),y
txa
sta (sreg)
.ENDIF
sta (ptr1),y
.endif
rts
.endproc