style fixes
This commit is contained in:
@@ -1,30 +1,32 @@
|
||||
|
||||
.include "pce.inc"
|
||||
.include "pce.inc"
|
||||
|
||||
.export _clrscr
|
||||
.export _clrscr
|
||||
_clrscr:
|
||||
|
||||
st0 #VDC_MAWR
|
||||
st1 #<$0000
|
||||
st2 #>$0000
|
||||
st0 #VDC_MAWR
|
||||
st1 #<$0000
|
||||
st2 #>$0000
|
||||
|
||||
st0 #VDC_VWR
|
||||
ldy #$40
|
||||
rowloop: ldx #$80
|
||||
colloop: lda #' '
|
||||
sta a:VDC_DATA_LO
|
||||
lda #$02
|
||||
sta a:VDC_DATA_HI
|
||||
st0 #VDC_VWR
|
||||
ldy #$40
|
||||
rowloop:
|
||||
ldx #$80
|
||||
colloop:
|
||||
lda #' '
|
||||
sta a:VDC_DATA_LO
|
||||
lda #$02
|
||||
sta a:VDC_DATA_HI
|
||||
|
||||
dex
|
||||
bne colloop
|
||||
dey
|
||||
bne rowloop
|
||||
dex
|
||||
bne colloop
|
||||
dey
|
||||
bne rowloop
|
||||
|
||||
rts
|
||||
rts
|
||||
|
||||
;-------------------------------------------------------------------------------
|
||||
; force the init constructor to be imported
|
||||
|
||||
.import initconio
|
||||
conio_init = initconio
|
||||
conio_init = initconio
|
||||
|
||||
Reference in New Issue
Block a user