mirror of
https://github.com/cc65/cc65.git
synced 2024-12-22 12:30:41 +00:00
call setcursur when finished
git-svn-id: svn://svn.cc65.org/cc65/trunk@1662 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
b2b21175d6
commit
6116ee51ec
@ -7,6 +7,7 @@
|
||||
.export _clrscr
|
||||
.include "atari.inc"
|
||||
.importzp ptr1
|
||||
.import setcursor
|
||||
|
||||
_clrscr:lda SAVMSC ; screen memory
|
||||
sta ptr1
|
||||
@ -15,6 +16,7 @@ _clrscr:lda SAVMSC ; screen memory
|
||||
adc #>(40*24)
|
||||
sta ptr1+1
|
||||
lda #0 ; screen code of space char
|
||||
sta OLDCHR
|
||||
ldy #<(40*24) ; 40x24: size of default atari screen
|
||||
ldx #>(40*24)
|
||||
_clr1: sta (ptr1),y
|
||||
@ -31,5 +33,4 @@ _clr1: sta (ptr1),y
|
||||
|
||||
done: sta COLCRS
|
||||
sta ROWCRS
|
||||
rts
|
||||
|
||||
jmp setcursor
|
||||
|
Loading…
Reference in New Issue
Block a user