
;; new zealand story - hit squad
;; 2 data block loader, multi-colour then darker blue and black

a662 06f6      ld      b,$f6
a664 af        xor     a
a665 ed79      out     (c),a
a667 dd7700    ld      (ix+$00),a
a66a dd2b      dec     ix
a66c 18f9      jr      $a667            ; (-$07)
a66e d1        pop     de
a66f 08        ex      af,af'
a670 fe01      cp      $01
a672 067f      ld      b,$7f
a674 3e10      ld      a,$10
a676 ed79      out     (c),a
a678 3e54      ld      a,$54
a67a ed79      out     (c),a
a67c d9        exx     
a67d e1        pop     hl
a67e d9        exx     
a67f d8        ret     c

a680 18e0      jr      $a662            ; (-$20)
a682 3d        dec     a
a683 20fd      jr      nz,$a682         ; (-$03)
a685 a7        and     a
a686 24        inc     h
a687 c8        ret     z

a688 06f5      ld      b,$f5
a68a ed78      in      a,(c)
a68c a9        xor     c
a68d e680      and     $80
a68f 28f5      jr      z,$a686          ; (-$0b)
a691 067f      ld      b,$7f
a693 3e10      ld      a,$10
a695 ed79      out     (c),a
a697 79        ld      a,c
a698 2f        cpl     
a699 4f        ld      c,a
a69a d9        exx     
a69b 7d        ld      a,l
a69c 3c        inc     a
a69d e60f      and     $0f
a69f 6f        ld      l,a
a6a0 f620      or      $20
a6a2 d9        exx     
a6a3 17        rla     
a6a4 ed79      out     (c),a
a6a6 37        scf     
a6a7 c9        ret     

a6a8 3d        dec     a
a6a9 20fd      jr      nz,$a6a8         ; (-$03)
a6ab a7        and     a
a6ac 24        inc     h
a6ad c8        ret     z

a6ae 06f5      ld      b,$f5
a6b0 ed78      in      a,(c)
a6b2 a9        xor     c
a6b3 e680      and     $80
a6b5 28f5      jr      z,$a6ac          ; (-$0b)
a6b7 067f      ld      b,$7f
a6b9 3e10      ld      a,$10
a6bb ed79      out     (c),a
a6bd 79        ld      a,c
a6be 2f        cpl     
a6bf 4f        ld      c,a
a6c0 1f        rra     
a6c1 3e2a      ld      a,$2a
a6c3 17        rla     
a6c4 3d        dec     a
a6c5 ed79      out     (c),a
a6c7 37        scf     
a6c8 c9        ret     

a6c9 06f6      ld      b,$f6
a6cb 3e10      ld      a,$10
a6cd ed79      out     (c),a
a6cf d9        exx     
a6d0 e5        push    hl
a6d1 2e00      ld      l,$00
a6d3 d9        exx     
a6d4 2172a6    ld      hl,$a672
a6d7 e5        push    hl
a6d8 06f5      ld      b,$f5
a6da ed78      in      a,(c)
a6dc e680      and     $80
a6de 4f        ld      c,a
a6df cd82a6    call    $a682
a6e2 30fb      jr      nc,$a6df         ; (-$05)
a6e4 211504    ld      hl,$0415
a6e7 10fe      djnz    $a6e7            ; (-$02)
a6e9 2b        dec     hl
a6ea 7c        ld      a,h
a6eb b5        or      l
a6ec 20f9      jr      nz,$a6e7         ; (-$07)
a6ee 3e0a      ld      a,$0a
a6f0 cd82a6    call    $a682
a6f3 30ea      jr      nc,$a6df         ; (-$16)
a6f5 26c4      ld      h,$c4
a6f7 3e1c      ld      a,$1c
a6f9 cd82a6    call    $a682
a6fc 30e1      jr      nc,$a6df         ; (-$1f)
a6fe 3eda      ld      a,$da
a700 bc        cp      h
a701 38f2      jr      c,$a6f5          ; (-$0e)
a703 26c4      ld      h,$c4
a705 3e1c      ld      a,$1c
a707 cd82a6    call    $a682
a70a 30d3      jr      nc,$a6df         ; (-$2d)
a70c 3eda      ld      a,$da
a70e bc        cp      h
a70f 38e4      jr      c,$a6f5          ; (-$1c)
a711 fd21b4a8  ld      iy,$a8b4
a715 fd6e00    ld      l,(iy+$00)
a718 26c4      ld      h,$c4
a71a 3e1c      ld      a,$1c
a71c cd82a6    call    $a682
a71f 30be      jr      nc,$a6df         ; (-$42)
a721 3ed7      ld      a,$d7
a723 bc        cp      h
a724 30dd      jr      nc,$a703         ; (-$23)
a726 2c        inc     l
a727 20ef      jr      nz,$a718         ; (-$11)
a729 2670      ld      h,$70
a72b 3e1c      ld      a,$1c
a72d cd82a6    call    $a682
a730 30ad      jr      nc,$a6df         ; (-$53)
a732 3e1c      ld      a,$1c
a734 cd82a6    call    $a682
a737 30a6      jr      nc,$a6df         ; (-$5a)
a739 7c        ld      a,h
a73a fecd      cp      $cd
a73c 300e      jr      nc,$a74c         ; (+$0e)
a73e fe9c      cp      $9c
a740 30cf      jr      nc,$a711         ; (-$31)
a742 fd23      inc     iy
a744 fd7d      ld      a,iyl
a746 feb8      cp      $b8
a748 20cb      jr      nz,$a715         ; (-$35)
a74a 18c5      jr      $a711            ; (-$3b)
a74c 3e0b      ld      a,$0b
a74e 2680      ld      h,$80
a750 2e08      ld      l,$08
a752 3e0b      ld      a,$0b
a754 1802      jr      $a758            ; (+$02)
a756 3e09      ld      a,$09
a758 cda8a6    call    $a6a8
a75b d0        ret     nc

a75c 3e0b      ld      a,$0b
a75e cda8a6    call    $a6a8
a761 d0        ret     nc

a762 3e9f      ld      a,$9f
a764 bc        cp      h
a765 cb15      rl      l
a767 2680      ld      h,$80
a769 d256a7    jp      nc,$a756
a76c 3e1d      ld      a,$1d
a76e bd        cp      l
a76f c262a6    jp      nz,$a662
a772 00        nop     
a773 af        xor     a
a774 08        ex      af,af'
a775 26a1      ld      h,$a1
a777 2e01      ld      l,$01
a779 fd2100ac  ld      iy,$ac00
a77d 3e04      ld      a,$04
a77f 1817      jr      $a798            ; (+$17)
a781 3e55      ld      a,$55
a783 ad        xor     l
a784 c6da      add     a,$da
a786 dd7700    ld      (ix+$00),a
a789 dd23      inc     ix
a78b 1b        dec     de
a78c 26a1      ld      h,$a1
a78e 2e01      ld      l,$01
a790 2e01      ld      l,$01
a792 3e01      ld      a,$01
a794 1802      jr      $a798            ; (+$02)
a796 3e09      ld      a,$09
a798 cda8a6    call    $a6a8
a79b d0        ret     nc

a79c 3e0b      ld      a,$0b
a79e cda8a6    call    $a6a8
a7a1 d0        ret     nc

a7a2 3ec0      ld      a,$c0
a7a4 bc        cp      h
a7a5 cb15      rl      l
a7a7 26a1      ld      h,$a1
a7a9 d296a7    jp      nc,$a796
a7ac 08        ex      af,af'
a7ad ad        xor     l
a7ae 08        ex      af,af'
a7af 7a        ld      a,d
a7b0 b3        or      e
a7b1 20ce      jr      nz,$a781         ; (-$32)
a7b3 c36ea6    jp      $a66e
a7b6 3e55      ld      a,$55
a7b8 ad        xor     l
a7b9 c6da      add     a,$da
a7bb dd7700    ld      (ix+$00),a
a7be dd23      inc     ix
a7c0 1b        dec     de
a7c1 2e02      ld      l,$02
a7c3 3e04      ld      a,$04
a7c5 26b3      ld      h,$b3
a7c7 cd33a8    call    $a833
a7ca d0        ret     nc

a7cb fd7e04    ld      a,(iy+$04)
a7ce b7        or      a
a7cf 285a      jr      z,$a82b          ; (+$5a)
a7d1 69        ld      l,c
a7d2 01007f    ld      bc,$7f00
a7d5 00        nop     
a7d6 00        nop     
a7d7 00        nop     
a7d8 fd4e00    ld      c,(iy+$00)
a7db fd4601    ld      b,(iy+$01)
a7de dd210000  ld      ix,$0000
a7e2 dd09      add     ix,bc
a7e4 4d        ld      c,l
a7e5 3e01      ld      a,$01
a7e7 2e02      ld      l,$02
a7e9 26b3      ld      h,$b3
a7eb cd33a8    call    $a833
a7ee d0        ret     nc

a7ef 3e7f      ld      a,$7f
a7f1 bd        cp      l
a7f2 2803      jr      z,$a7f7          ; (+$03)
a7f4 32b3a8    ld      ($a8b3),a
a7f7 2e02      ld      l,$02
a7f9 3e08      ld      a,$08
a7fb 26b3      ld      h,$b3
a7fd cd33a8    call    $a833
a800 d0        ret     nc

a801 fd5e02    ld      e,(iy+$02)
a804 fd5603    ld      d,(iy+$03)
a807 69        ld      l,c
a808 010500    ld      bc,$0005
a80b fd09      add     iy,bc
a80d 4d        ld      c,l
a80e 7b        ld      a,e
a80f b2        or      d
a810 26a1      ld      h,$a1
a812 2e01      ld      l,$01
a814 3e01      ld      a,$01
a816 c298a7    jp      nz,$a798
a819 116ea6    ld      de,$a66e
a81c ed53b4a7  ld      ($a7b4),de
a820 119ba7    ld      de,$a79b
a823 d5        push    de
a824 ed5bd6a8  ld      de,($a8d6)
a828 c3aca6    jp      $a6ac
a82b 3e06      ld      a,$06
a82d 00        nop     
a82e 00        nop     
a82f 18b6      jr      $a7e7            ; (-$4a)
a831 3e0d      ld      a,$0d
a833 cda8a6    call    $a6a8
a836 3e10      ld      a,$10
a838 cda8a6    call    $a6a8
a83b d0        ret     nc

a83c 3edb      ld      a,$db
a83e bc        cp      h
a83f cb15      rl      l
a841 26b3      ld      h,$b3
a843 d231a8    jp      nc,$a831
a846 c9        ret     

a847 cdc9a6    call    $a6c9
a84a 210080    ld      hl,$8000
a84d 06ff      ld      b,$ff
a84f c5        push    bc
a850 1e00      ld      e,$00
a852 4b        ld      c,e
a853 16ff      ld      d,$ff
a855 06f5      ld      b,$f5
a857 ed78      in      a,(c)
a859 e680      and     $80
a85b a9        xor     c
a85c 2850      jr      z,$a8ae          ; (+$50)
a85e 1c        inc     e
a85f 79        ld      a,c
a860 2f        cpl     
a861 e680      and     $80
a863 4f        ld      c,a
a864 15        dec     d
a865 c255a8    jp      nz,$a855
a868 73        ld      (hl),e
a869 23        inc     hl
a86a c1        pop     bc
a86b 10e2      djnz    $a84f            ; (-$1e)
a86d 210000    ld      hl,$0000
a870 113280    ld      de,$8032
a873 0632      ld      b,$32
a875 c5        push    bc
a876 1a        ld      a,(de)
a877 0600      ld      b,$00
a879 4f        ld      c,a
a87a 09        add     hl,bc
a87b 13        inc     de
a87c c1        pop     bc
a87d 10f6      djnz    $a875            ; (-$0a)
a87f e5        push    hl
a880 210000    ld      hl,$0000
a883 11cd80    ld      de,$80cd
a886 0632      ld      b,$32
a888 c5        push    bc
a889 1a        ld      a,(de)
a88a 0600      ld      b,$00
a88c 4f        ld      c,a
a88d 09        add     hl,bc
a88e 13        inc     de
a88f c1        pop     bc
a890 10f6      djnz    $a888            ; (-$0a)
a892 c1        pop     bc
a893 7c        ld      a,h
a894 b7        or      a
a895 2013      jr      nz,$a8aa         ; (+$13)
a897 a7        and     a
a898 ed42      sbc     hl,bc
a89a 013200    ld      bc,$0032
a89d a7        and     a
a89e ed42      sbc     hl,bc
a8a0 d8        ret     c

a8a1 09        add     hl,bc
a8a2 01cdff    ld      bc,$ffcd
a8a5 a7        and     a
a8a6 ed42      sbc     hl,bc
a8a8 d0        ret     nc

a8a9 3c        inc     a
a8aa 32b3a8    ld      ($a8b3),a
a8ad c9        ret     

a8ae 00        nop     
a8af 00        nop     
a8b0 c364a8    jp      $a864
a8b3 00        nop     
a8b4 1e2a      ld      e,$2a
a8b6 2822      jr      z,$a8da          ; (+$22)
a8b8 00        nop     
a8b9 00        nop     
a8ba 00        nop     
a8bb 00        nop     
a8bc 00        nop     
a8bd 00        nop     
a8be 00        nop     
a8bf 00        nop     
a8c0 00        nop     
a8c1 00        nop     
a8c2 00        nop     
a8c3 00        nop     
a8c4 00        nop     
a8c5 00        nop     
a8c6 00        nop     
a8c7 00        nop     
a8c8 00        nop     
a8c9 00        nop     
a8ca 00        nop     
a8cb 00        nop     
a8cc 00        nop     
a8cd 00        nop     
a8ce 00        nop     
a8cf 00        nop     
a8d0 00        nop     
a8d1 00        nop     
a8d2 00        nop     
a8d3 00        nop     
a8d4 00        nop     
a8d5 00        nop     
a8d6 00        nop     
a8d7 00        nop     
a8d8 dd21b8a8  ld      ix,$a8b8
a8dc 11ab00    ld      de,$00ab
a8df cd47a8    call    $a847
a8e2 52        ld      d,d
a8e3 e5        push    hl
a8e4 02        ld      (bc),a
a8e5 04        inc     b
a8e6 00        nop     
