git.sur5r.net Git - cc65/blob - libsrc/atari5200/y2k.inc

   1 ;-----------------------------------------------------------
   2 ; Y2K FIX by Alan Davis, Dennis Debro, and Ronen Habot
   3 ;-----------------------------------------------------------
   4 Y2K     LDY     #$00            ; Copy BIOS opening screen to RAM
   5         LDA     #$FD
   6         STA     TEMPH
   7         LDA     #$58            ; Assume 2 port system
   8         LDX     $FD32
   9         CPX     #$E8            ; Is this a 4 port?
  10         BNE     Y2K0            ; Jump if not
  11         LDA     #$42            ; Yes, 4 port system
  12 Y2K0    STA     TEMPL
  13 Y2K1    LDA     (TEMPL),Y
  14         STA     $0600,Y
  15         INY
  16         BNE     Y2K1
  17         LDY     #$50
  18         INC     TEMPH
  19 Y2K2    LDA     (TEMPL),Y
  20         STA     $0700,Y
  21         DEY
  22         BPL     Y2K2
  23         LDA     #$D4            ; Point to copyright string
  24         STA     $0724
  25         LDA     #$BF
  26         STA     $0725
  27         LDX     #$0B            ; Store NOP's @ end
  28         LDA     #$EA
  29 Y2K3    STA     $0732,X
  30         DEX
  31         BPL     Y2K3
  32         LDA     #$60            ; Store RTS opcode @ end
  33         STA     $0750
  34         JSR     $0600           ; Show title screen
  35         LDY     #$00            ; Clear RAM from $0600-$3FFF
  36         STY     $80
  37         LDA     #$06
  38         STA     $81
  39         JSR     CLRRAM
  40         RTS
  41