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