git.sur5r.net Git - cc65/blob - libsrc/pce/vdc.s

   1         .export         vdc_init
   2
   3         .include        "pce.inc"
   4
   5 ; FIXME: implement selection of different video modes at runtime
   6 HIRES   = 1
   7
   8 vdc_init:
   9         lda     VDC_CTRL
  10
  11         VREG    $00, $0000      ; MAWR
  12         VREG    $01, $0000      ; MARR
  13         VREG    $05, $0000      ; CR
  14         VREG    $06, $0000      ; RCR
  15         VREG    $07, $0000      ; BXR
  16         VREG    $08, $0000      ; BYR
  17         VREG    $09, $0070      ; MWR
  18         VREG    $0C, $1702      ; CRTC - VSR
  19         VREG    $0D, $00DF      ; CRTC - VDS
  20         VREG    $0E, $000C      ; CRTC - VDE
  21         VREG    $0F, $0000      ; DCR
  22
  23 .if      HIRES
  24
  25         VREG    $0A, $0C02      ; CRTC - HSR
  26         VREG    $0B, $043C      ; CRTC - HDS
  27         lda     #$06
  28         sta     VCE_CTRL
  29
  30 .else
  31
  32         VREG    $0A, $0202      ; CRTC - HSR
  33         VREG    $0B, $041F      ; CRTC - HDS
  34         lda     #$04
  35         sta     VCE_CTRL
  36
  37 .endif
  38
  39         lda     VDC_CTRL
  40         rts