1
0
mirror of https://github.com/cc65/cc65.git synced 2024-07-18 00:29:02 +00:00

clrscr now puts the cursor into home position

git-svn-id: svn://svn.cc65.org/cc65/trunk@1839 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
izydorst 2002-12-25 02:49:42 +00:00
parent ed1e1db09b
commit 4f2a18d154

View File

@ -2,7 +2,7 @@
; ;
; Maciej 'YTM/Elysium' Witkowiak ; Maciej 'YTM/Elysium' Witkowiak
; ;
; 27.10.2001 ; 27.10.2001, 23.12.2002
; void clrscr (void); ; void clrscr (void);
@ -12,6 +12,9 @@
.include "../inc/geossym.inc" .include "../inc/geossym.inc"
.include "../inc/const.inc" .include "../inc/const.inc"
.import fixcursor
.importzp cursor_c, cursor_r
_clrscr: _clrscr:
lda #ST_WR_FORE | ST_WR_BACK lda #ST_WR_FORE | ST_WR_BACK
sta dispBufferOn sta dispBufferOn
@ -21,6 +24,10 @@ _clrscr:
sta r3L sta r3L
sta r3H sta r3H
sta r2L sta r2L
sta cursor_c
lda #1
sta cursor_r
jsr fixcursor ; home cursor
lda #199 lda #199
sta r2H sta r2H
lda graphMode lda graphMode