1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-24 11:31:31 +00:00
cc65/libsrc/gamate/clrscr.s

36 lines
629 B
ArmAsm
Raw Normal View History

2015-11-29 00:14:59 +00:00
.include "gamate.inc"
.include "extzp.inc"
.import plot
.export _clrscr
_clrscr:
ldy #$0
2015-11-29 19:04:10 +00:00
tya
2015-11-29 00:14:59 +00:00
rowloop:
sty LCD_X
sta LCD_Y
ldx #$0
colloop:
sta LCD_DATA
inx
bne colloop
iny
bne rowloop
; Go to the home position.
sta CURS_X
sta CURS_Y
jmp plot
;-------------------------------------------------------------------------------
; force the init constructor to be imported
.import initconio
conio_init = initconio