]> git.sur5r.net Git - cc65/blob - libsrc/pce/vce.s
a5c91997092325cb7996d1cea2ecd29b3d606143
[cc65] / libsrc / pce / vce.s
1
2                                                 .include "pcengine.inc"
3             .export vce_init
4
5 vce_init:
6                         stz     VCE_ADDR_LO   ;
7                         stz     VCE_ADDR_HI   ; Set CTA to zero
8                         ldy     #$01
9 vce_clear_bank:         ldx     #$00
10 vce_clear_color:        stz     VCE_DATA_LO   ; Clear color (LSB)
11                         stz     VCE_DATA_HI   ; Clear color (MSB)
12                         dex
13                         bne     vce_clear_color
14                         dey
15                         bne     vce_clear_bank
16                         rts