1
0
mirror of https://github.com/cc65/cc65.git synced 2024-09-16 09:56:13 +00:00
cc65/libsrc/pce/clrscr.s

31 lines
713 B
ArmAsm
Raw Normal View History

2015-07-12 12:27:24 +00:00
.include "pce.inc"
.export _clrscr
_clrscr:
st0 #VDC_MAWR
st1 #<$0000
st2 #>$0000
st0 #VDC_VWR
ldy #$40
rowloop: ldx #$80
2015-07-15 11:18:12 +00:00
colloop: lda #' '
sta a:VDC_DATA_LO
lda #$02
sta a:VDC_DATA_HI
dex
bne colloop
dey
bne rowloop
rts
;-------------------------------------------------------------------------------
; force the init constructor to be imported
.import initconio
conio_init = initconio