atari5200: fix _clrscr to use correct screen size
Could be different than default when linking with atari5200-conioscreen-20x12.o.
This commit is contained in:
@@ -15,7 +15,7 @@ MEMORY {
|
|||||||
SEGMENTS {
|
SEGMENTS {
|
||||||
ZEROPAGE: load = ZP, type = zp, optional = yes;
|
ZEROPAGE: load = ZP, type = zp, optional = yes;
|
||||||
EXTZP: load = ZP, type = zp, optional = yes;
|
EXTZP: load = ZP, type = zp, optional = yes;
|
||||||
DLIST: load = ROM , type = ro, define = yes, optional = yes;
|
DLIST: load = ROM, type = ro, define = yes, optional = yes;
|
||||||
STARTUP: load = ROM, type = ro, define = yes, optional = yes;
|
STARTUP: load = ROM, type = ro, define = yes, optional = yes;
|
||||||
LOWCODE: load = ROM, type = ro, define = yes, optional = yes;
|
LOWCODE: load = ROM, type = ro, define = yes, optional = yes;
|
||||||
ONCE: load = ROM, type = ro, optional = yes;
|
ONCE: load = ROM, type = ro, optional = yes;
|
||||||
|
|||||||
@@ -7,8 +7,9 @@
|
|||||||
.export _clrscr
|
.export _clrscr
|
||||||
.include "atari5200.inc"
|
.include "atari5200.inc"
|
||||||
.importzp ptr1
|
.importzp ptr1
|
||||||
|
.importzp screen_width, screen_height
|
||||||
|
|
||||||
SCRSIZE = 480 ; 20x24: size of default conio atari5200 screen
|
SCRSIZE = screen_width * screen_height
|
||||||
|
|
||||||
_clrscr:lda SAVMSC ; screen memory
|
_clrscr:lda SAVMSC ; screen memory
|
||||||
sta ptr1
|
sta ptr1
|
||||||
|
|||||||
Reference in New Issue
Block a user