Hex War Onefile Loader

        .word   $0801
        *=$0801
        relocstart=$4000
        relocend=relocstart+(prgend-prgbgn)
        pages=(prgend-prgbgn+255)/256

        .word   basend, 10
        .byt    $9e, " 2062", 0
basend  .word   0

        lda     #<prgbgn
        sta     $fb
        lda     #>prgbgn
        sta     $fc
        lda     #<relocstart
        sta     $fd
        lda     #>relocstart
        sta     $fe
        ldx     #pages
        ldy     #$00
lp      lda     ($fb),y
        sta     ($fd),y
        iny
        bne     lp
        inc     $fc
        inc     $fe
        dex
        bne     lp
        lda     #>relocstart
        sta     44
        lda     #<relocend
        sta     45
        sta     47
        sta     49
        lda     #>relocend
        sta     46
        sta     48
        sta     50
        sei
        lda     #4
        sta     198
        lda     #82
        sta     631
        lda     #85
        sta     632
        lda     #78
        sta     633
        lda     #13
        sta     634
        cli
        jmp     ($a002)

prgbgn  .byt    0
        .bin    2,0,"hexwarmain.bin"
prgend