1
0
mirror of https://github.com/cc65/cc65.git synced 2024-07-01 08:29:37 +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:
cpg 2002-11-27 15:05:01 +00:00
parent b2b21175d6
commit 6116ee51ec

View File

@ -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