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:
parent
ed1e1db09b
commit
4f2a18d154
1 changed files with 8 additions and 1 deletions
|
@ -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
|
||||||
|
|
Loading…
Add table
Reference in a new issue