; SAVE#D3:KINGEND.M65
      .OPT NO EJECT
;
;     GEND.M65
; CLASH OF KINGS 8K
;
INADD =   $2AEC
STADD =   $2AEC
CTEND =   $B500
CTADD = $A000
CTDST = $2000
BUILD = $6000
OFFSET = CTADD-CTDST-BUILD
;
    *=  $5FFA-$4D
START
    LDA #$FF
    STA $D301   ;KILL BASIC HARD
    LDA #$01
    STA $09     ;SAY BOOTED
    STA $03F8   ;KILL BASIC SOFT
    LDA # <STADD ;LOAD
    STA $0A     ;DOSVEC WITH
    STA $0C     ;DOSINI AND
    STA $02     ;CASINI WITH
    LDA # >STADD ;STARTADD
    STA $0B     ;DOSVEC+1
    STA $0D     ;DOSINI+1
    STA $03     ;CASINI+1
    LDA # <CTADD
    STA $E0     ;STANDARD LOADER
    LDA # >CTADD
    STA $E1
    LDA # <CTDST
    STA $E2
    LDA # >CTDST
    STA $E3
    LDY #$00
L1  LDA ($E0),Y
    STA ($E2),Y
    INY 
    BNE L1
    INC $E1
    INC $E3
    LDA $E1
    CMP # >CTEND
    BNE L1
    JMP STADD
;
INIT
    STX $03E9   ;CKEY=0
    STX $03EA   ;CASSBT=0
    STX $09     ;BOOT=1 MEANS
    INC $09     ;NO CASS CODE!
    RTS 
;
XTLEN = *-START
    *=  $5FFA
    .WORD START+BUILD
    .BYTE $00   ;MUST BE 0
    .BYTE $04   ;DOS=5,NODOS=4
    .WORD INIT+BUILD
;ORIGIN AT 130