; Disassembly of the file "D:\Game Tech\Test Equipment\Fluke\128c900+1+2.rom"
; 
; CPU Type: Z80
; 
; Created with dZ80 1.50
; 
; on Thursday, 07 of February 2002 at 10:56 PM
; 
        org     $0000

l0000:  ld      ix,l0000
l0004:  jr      l006a                   ; (+$64)
        ld      hl,($c3f4)
        add     a,(hl)
        ld      a,(hl)
        xor     (hl)
        jp      (hl)
        jp      lb353
l0010:  jp      l7f1a
        inc     d
        pop     af
        jp      lb184
l0018:  jp      lbe46
        ld      e,a
        di      
        jp      l8851
l0020:  jp      lbe77
        ld      a,$f1
        jp      l8b1d
l0028:  jp      l8112
        ld      h,b
        pop     af
        jp      l92f6
l0030:  jp      lbe68
        sub     (hl)
        inc     b
        jp      l93be
l0038:  jp      lb915
        push    hl
        ld      hl,($f42a)
        add     hl,bc
        ex      (sp),hl
        ret     

        push    hl
        ld      hl,($f42a)
        add     hl,de
        ex      (sp),hl
        ret     

        push    hl
        push    bc
        ld      bc,($f42a)
        add     hl,bc
        pop     bc
        ex      (sp),hl
        ret     

        exx     
        ret     p

        ld      e,(hl)
        pop     af
        ld      sp,$47f3
        di      
        ld      c,a
        di      
        jp      l736f
        jp      l947f
        jp      l425d
        ld      ix,$0001
l006a:  jr      l00de                   ; (+$72)
        ld      l,c
        jp      (hl)
        ld      b,b
        pop     af
        jp      l7fc5
        cp      b
        ret     p

        cp      d
        ret     p

        cp      (hl)
        ret     p

        pop     bc
        ret     p

        jp      c,l13f0
        pop     af
        dec     d
        pop     af
        ld      hl,$26f1
        pop     af
        daa     
        pop     af
        inc     (hl)
        pop     af
        dec     (hl)
l008a:  pop     af
        add     hl,sp
        pop     af
        ld      d,(hl)
        pop     af
        ld      e,a
        pop     af
        pop     hl
        jp      p,lf328
        ld      ($33f3),a
        di      
        scf     
        di      
        jp      la6f1
        jp      lb920
        jp      lba2d
        jp      lbb1d
        jp      lbd3e
        jp      lb96c
        jp      lbb91
        jp      lb4b7
        jp      lb54c
        jp      l784c
        jp      l7395
        jp      la3cd
        jp      l04ab
        jp      l767c
        jp      l8ec3
        jp      l92a2
        jp      l9513
        jp      l99ab
        jp      l7f65
        jp      l8623
        jp      l81ba
        and     c
        pop     af
        and     $f2
l00de:  in      a,($81)
        in      a,($e2)
        ex      af,af'
        ld      a,$30
        out     ($c1),a
        ld      a,$f9
        out     ($c0),a
        ld      a,$34
        out     ($c1),a
        ld      a,$34
        out     ($c3),a
        ld      a,$99
        out     ($c0),a
        ld      a,$3c
        out     ($c3),a
        ld      a,$ff
        ld      ($c000),a
        ld      hl,$c000
        ld      de,$c001
        ld      bc,$3fff
        ldir    
        ld      hl,$c000
        ld      bc,$4000
l0111:  cpi     
        jr      nz,l011a                ; (+$05)
        jp      po,l011f
        jr      l0111                   ; (-$09)
l011a:  ld      bc,l0002
        add     ix,bc
l011f:  ld      a,$00
        ld      ($c000),a
        ld      hl,$c000
        ld      de,$c001
        ld      bc,$3fff
        ldir    
        ld      hl,$c000
        ld      bc,$4000
l0135:  cpi     
        jr      nz,l013e                ; (+$05)
        jp      po,l0143
        jr      l0135                   ; (-$09)
l013e:  ld      bc,l0004
        add     ix,bc
l0143:  ld      sp,l0000
        push    ix
        pop     hl
        ex      af,af'
        ld      ($f0b8),a
        call    l01f1
l0150:  ld      bc,$bffe
        ld      de,l0000
        ld      hl,l0000
l0159:  ld      a,e
        add     a,(hl)
        ld      e,a
        ld      a,$00
        adc     a,d
        ld      d,a
        inc     hl
        dec     bc
        ld      a,c
        or      b
        jr      nz,l0159                ; (-$0d)
        ld      bc,($bffe)
        ex      de,hl
        add     hl,bc
        ld      c,l
        ld      b,h
        ret     

        ld      l,d
        ld      e,(hl)
        dec     d
        ld      a,$15
        ld      a,$15
        ld      a,$d1
        jr      l01da                   ; (+$60)
        ld      a,(de)
        adc     a,l
        add     hl,de
        adc     a,l
        add     hl,de
        adc     a,l
        add     hl,de
        adc     a,l
        add     hl,de
        ld      e,l
        ld      e,e
        nop     
        ld      e,e
        nop     
        nop     
        ld      h,(hl)
        ld      e,d
        nop     
        nop     
        dec     l
        ld      b,$7d
        rlca    
        ld      d,d
        add     hl,bc
        ld      d,d
        ex      af,af'
        ld      h,$0a
        rst     $08
l0198:  ld      a,(bc)
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        inc     e
        jr      l01e8                   ; (+$46)
        dec     a
        ld      e,c
        inc     c
l01a5:  or      (hl)
        ld      c,$ec
        ld      c,$64
        rrca    
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        ld      c,e
        jr      c,l0201                 ; (+$4b)
        jr      c,l0203                 ; (+$4b)
        jr      c,l0205                 ; (+$4b)
        jr      c,l0207                 ; (+$4b)
        jr      c,l0198                 ; (-$26)
        djnz    l01a5                   ; (-$1b)
        scf     
        ld      e,l
        ld      b,d
        ld      l,d
        ld      d,l
        ld      l,d
        ld      d,l
        push    bc
        ld      b,e
        sub     d
        add     hl,sp
        ld      c,h
        inc     de
        sub     b
        ld      b,l
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        push    hl
        scf     
        ld      l,d
l01da:  jr      l01dc                   ; (+$00)
l01dc:  nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
l01e8:  nop     
        nop     
        nop     
        nop     
        nop     
        sub     e
        jr      l0215                   ; (+$25)
l01f0:  rla     
l01f1:  rst     $20
        ld      hl,$fff5
        add     hl,sp
        ld      sp,hl
        ld      l,(ix+$04)
        call    l055b
l01fd:  ld      l,$11
        call    l7395
        ld      a,($f116)
l0205:  or      a
        jr      z,l022a                 ; (+$22)
        ld      l,$17
        call    l767c
        ld      a,c
        or      a
        jr      z,l022a                 ; (+$19)
        ld      a,($f126)
        cp      $28
        jr      nz,l024d                ; (+$35)
        ld      l,$08
        call    lb136
        ld      a,$7f
        ld      ($f126),a
        call    l181c
        ld      l,$08
        call    lb11f
l022a:  ld      a,($f140)
        cp      $02
        jp      nz,l02f5
        ld      a,($f125)
        ld      (ix-$0b),a
        ld      a,($f127)
        cp      $1d
        jr      z,l0284                 ; (+$45)
        ld      a,($f127)
        cp      $1a
        jr      z,l0284                 ; (+$3e)
        ld      a,$01
        ld      ($f125),a
        jr      l0284                   ; (+$37)
l024d:  ld      a,($f0b7)
        cp      $10
        jr      z,l027a                 ; (+$26)
        ld      a,($f0b7)
        ld      c,a
        sub     a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        sub     a
        ld      (hl),a
        inc     hl
        ld      (hl),a
        ld      a,($f126)
        inc     hl
        ld      (hl),a
        sub     a
        inc     hl
        ld      (hl),a
        ld      a,$10
        ld      ($f0b7),a
        ld      a,$7f
        ld      ($f126),a
        jr      l022a                   ; (-$50)
l027a:  call    l736f
        ld      a,$7f
        ld      ($f126),a
        jr      l022a                   ; (-$5a)
l0284:  ld      hl,$f127
        ld      a,$0f
        cp      (hl)
        jp      c,l02f5
        sub     a
        ld      ($f125),a
        ld      a,($f42a)
        ld      (ix-$0a),a
        ld      a,($f42b)
        ld      (ix-$09),a
l029d:  ld      l,(ix-$0a)
        ld      h,(ix-$09)
        ld      a,(hl)
        ld      (ix-$07),a
        ld      a,(ix-$07)
        cp      $50
        jr      z,l02d6                 ; (+$28)
        ld      a,(ix-$07)
        cp      $2b
        jr      nz,l02ea                ; (+$35)
        ld      l,(ix-$0a)
        ld      h,(ix-$09)
        inc     hl
        ld      a,($f127)
        ld      c,a
        ld      a,(hl)
        cp      c
        jr      nz,l02ea                ; (+$26)
        ld      l,(ix-$0a)
        ld      h,(ix-$09)
        inc     hl
        inc     hl
        ld      ($f35d),hl
        ld      a,$1a
        ld      ($f127),a
        jr      l02f5                   ; (+$1f)
l02d6:  ld      a,($f127)
        or      a
        jr      nz,l0309                ; (+$2d)
        ld      hl,($f42a)
        inc     hl
        ld      ($f35d),hl
        ld      a,$1a
        ld      ($f127),a
        jr      l0309                   ; (+$1f)
l02ea:  inc     (ix-$0a)
        jr      nz,l02f2                ; (+$03)
        inc     (ix-$09)
l02f2:  jp      l029d
l02f5:  ld      hl,$f127
        ld      a,$0f
        cp      (hl)
        jr      c,l0325                 ; (+$28)
        call    l736f
        ld      a,(ix-$0b)
        ld      ($f125),a
        jp      l01fd
l0309:  ld      a,($f127)
        cp      $0f
        jr      nz,l02f5                ; (-$1b)
        ld      hl,($f34d)
        ld      ($f355),hl
        call    l9b5f
        ld      l,c
        ld      h,b
        ld      ($f35d),hl
        ld      a,$1b
        ld      ($f127),a
        jr      l02f5                   ; (-$30)
l0325:  ld      a,($f127)
        add     a,a
        ld      l,a
        ld      c,l
        sub     a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$014f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        call    lbe71
        jp      l01fd
        nop     
        nop     
        ld      bc,l0000
        nop     
        ld      (bc),a
        nop     
        nop     
        nop     
        inc     b
        nop     
        nop     
        nop     
        ex      af,af'
        nop     
        nop     
        nop     
        djnz    l0351                   ; (+$00)
l0351:  nop     
        nop     
        jr      nz,l0355                ; (+$00)
l0355:  nop     
        nop     
        ld      b,b
        nop     
        nop     
        nop     
        add     a,b
        nop     
        nop     
        nop     
        nop     
        ld      bc,l0000
        nop     
        ld      (bc),a
        nop     
        nop     
        nop     
        inc     b
        nop     
        nop     
        nop     
        ex      af,af'
        nop     
        nop     
        nop     
        djnz    l0372                   ; (+$00)
l0372:  nop     
        nop     
        jr      nz,l0376                ; (+$00)
l0376:  nop     
        nop     
        ld      b,b
        nop     
        nop     
        nop     
        add     a,b
        ld      bc,l0000
        nop     
        ld      (bc),a
        nop     
        nop     
        nop     
        inc     b
        nop     
        nop     
        nop     
        ex      af,af'
        nop     
        nop     
        nop     
        djnz    l038f                   ; (+$00)
l038f:  nop     
        nop     
        jr      nz,l0393                ; (+$00)
l0393:  nop     
        nop     
        ld      b,b
        nop     
        nop     
        nop     
        add     a,b
        nop     
        nop     
        nop     
        nop     
        ld      bc,l0000
        nop     
        ld      (bc),a
        nop     
        nop     
        nop     
        inc     b
        nop     
        nop     
        nop     
        ex      af,af'
        nop     
        nop     
        nop     
        djnz    l03b0                   ; (+$00)
l03b0:  nop     
        nop     
        jr      nz,l03b4                ; (+$00)
l03b4:  nop     
        nop     
        ld      b,b
        nop     
        nop     
        nop     
        add     a,b
        nop     
        nop     
        nop     
        nop     
        ld      bc,l0000
        nop     
        inc     bc
        nop     
        nop     
        nop     
        rlca    
        nop     
        nop     
        nop     
        rrca    
        nop     
        nop     
        nop     
        rra     
        nop     
        nop     
        nop     
        ccf     
        nop     
        nop     
        nop     
        ld      a,a
        nop     
        nop     
        nop     
        rst     $38
        nop     
        nop     
        nop     
        rst     $38
        ld      bc,l0000
        rst     $38
        inc     bc
        nop     
        nop     
        rst     $38
        rlca    
        nop     
        nop     
        rst     $38
        rrca    
        nop     
        nop     
        rst     $38
        rra     
        nop     
        nop     
        rst     $38
        ccf     
        nop     
        nop     
        rst     $38
        ld      a,a
        nop     
        nop     
        rst     $38
        rst     $38
        ld      bc,$ff00
        rst     $38
        inc     bc
        nop     
        rst     $38
        rst     $38
        rlca    
        nop     
        rst     $38
        rst     $38
        rrca    
        nop     
        rst     $38
        rst     $38
        rra     
        nop     
        rst     $38
        rst     $38
        ccf     
        nop     
        rst     $38
        rst     $38
        ld      a,a
        nop     
        rst     $38
        rst     $38
        rst     $38
        nop     
        rst     $38
        rst     $38
        rst     $38
        ld      bc,$ffff
        rst     $38
        inc     bc
        rst     $38
        rst     $38
        rst     $38
        rlca    
        rst     $38
        rst     $38
        rst     $38
        rrca    
        rst     $38
        rst     $38
        rst     $38
        rra     
        rst     $38
        rst     $38
        rst     $38
        ccf     
        rst     $38
        rst     $38
        rst     $38
        ld      a,a
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        rst     $38
        nop     
        nop     
        nop     
        nop     
        adc     a,d
        inc     b
        ld      a,a
        inc     b
        halt    
        inc     b
        ld      l,a
        inc     b
        ld      h,(hl)
        inc     b
        ld      e,l
        inc     b
        ld      d,e
        inc     b
        ld      c,h
        ld      c,c
        ld      c,(hl)
        ld      b,l
        ld      d,e
        ld      c,c
        ld      e,d
        ld      b,l
        jr      nz,l045d                ; (+$00)
l045d:  ld      c,(hl)
        ld      b,l
        ld      d,a
        ld      c,h
        ld      c,c
        ld      c,(hl)
        ld      b,l
        jr      nz,l0466                ; (+$00)
l0466:  ld      d,l
        ld      c,(hl)
        ld      d,e
        ld      d,h
        ld      b,c
        ld      c,h
        ld      c,h
        jr      nz,l046f                ; (+$00)
l046f:  ld      d,e
        ld      d,h
        ld      b,c
        ld      c,h
        ld      c,h
        jr      nz,l0476                ; (+$00)
l0476:  ld      d,h
        ld      c,c
        ld      c,l
        ld      b,l
        ld      c,a
        ld      d,l
        ld      d,h
        jr      nz,l047f                ; (+$00)
l047f:  ld      d,d
        ld      d,l
        ld      c,(hl)
        jr      nz,l04d9                ; (+$55)
        ld      d,l
        ld      d,h
        jr      nz,l04c8                ; (+$40)
        jr      nz,l048a                ; (+$00)
l048a:  ld      b,d
        ld      d,l
        ld      d,e
        jr      nz,l04e3                ; (+$54)
        ld      b,l
        ld      d,e
        ld      d,h
        jr      nz,l04d4                ; (+$40)
        jr      nz,l0496                ; (+$00)
l0496:  ld      a,(l0000)
        ld      a,(bc)
        dec     c
        nop     
        nop     
        ld      c,a
        nop     
        nop     
        nop     
        inc     de
        nop     
        nop     
        nop     
        ret     z

        nop     
        nop     
        nop     
        ld      de,$f700
        ld      hl,$f0ba
        push    hl
        ld      hl,$0497
        push    hl
        rst     $18
        pop     af
        ld      a,$01
        ld      ($f0be),a
        sub     a
        ld      ($f0da),a
        ld      ($f113),a
        ld      a,$01
        ld      ($f115),a
        sub     a
l04c8:  ld      ($f13e),a
        ld      a,$ef
        ld      ($f114),a
        ld      hl,$f135
        push    hl
l04d4:  ld      hl,$049b
        push    hl
        rst     $18
l04d9:  pop     af
        ld      hl,lf328
        push    hl
        ld      hl,$049f
        push    hl
        rst     $18
l04e3:  pop     af
        ld      hl,lf333
        push    hl
        ld      hl,$04a3
        push    hl
        rst     $18
        pop     af
        ld      hl,$f337
        push    hl
        ld      hl,$04a7
        push    hl
        rst     $18
        pop     af
        sub     a
        ld      ($f34f),a
        ld      a,$c0
        ld      ($f350),a
        ld      hl,$00c8
        push    hl
        ld      hl,$f35f
        call    lb8c3
        ld      hl,$0100
        push    hl
        ld      hl,$e800
        call    lb8c3
        sub     a
        ld      ($f157),a
        call    l9513
        jp      lbe72
        ld      c,a
        ld      c,e
        jr      nz,l0543                ; (+$20)
        ld      d,(hl)
        ld      b,l
        ld      d,d
        dec     l
        nop     
        ld      b,(hl)
        ld      b,c
        ld      c,c
        ld      c,h
        jr      nz,l054e                ; (+$20)
        nop     
        jr      nz,l0584                ; (+$53)
        ld      b,l
        ld      c,h
        ld      b,(hl)
        dec     l
        ld      d,h
        ld      b,l
        ld      d,e
        ld      d,h
        nop     
        ld      d,b
        ld      c,a
        ld      d,a
        ld      b,l
        ld      d,d
        dec     l
        ld      d,l
        ld      d,b
        jr      nz,l0544                ; (+$00)
l0544:  ld      d,d
        ld      b,l
        ld      d,e
        ld      d,h
        ld      b,c
        ld      d,d
        ld      d,h
        ld      b,l
        ld      b,h
        jr      nz,l054f                ; (+$00)
l054f:  ld      b,(hl)
        ld      c,h
        ld      d,l
        ld      c,e
        ld      b,l
        jr      nz,l058f                ; (+$39)
        jr      nc,l0588                ; (+$30)
        jr      nc,l057a                ; (+$20)
        nop     
l055b:  rst     $20
        ld      l,$e0
        call    lb54c
        ld      l,$58
        rst     $08
        ld      l,$71
        rst     $08
        ld      hl,l054f
        rst     $28
        ld      l,(ix+$04)
        bit     0,l
        jr      z,l0578                 ; (+$06)
        ld      hl,l0544
        rst     $28
        jr      l057c                   ; (+$04)
l0578:  ld      hl,$053a
        rst     $28
l057c:  ld      hl,$052f
        rst     $28
        ld      l,$72
        rst     $08
        call    l0150
        ld      a,c
        or      b
l0588:  jr      z,l0592                 ; (+$08)
        ld      a,(ix+$04)
        or      $08
l058f:  ld      (ix+$04),a
l0592:  ld      l,$71
        rst     $08
        ld      l,$5d
        rst     $08
        ld      l,(ix+$04)
        ld      a,l
        and     $0e
        jr      z,l05ac                 ; (+$0c)
        ld      hl,$0528
        rst     $28
        ld      a,(ix+$04)
        ld      ($f0c7),a
        jr      l05b6                   ; (+$0a)
l05ac:  ld      hl,$051f
        rst     $28
        ld      a,(l0496)
        ld      ($f0c7),a
l05b6:  ld      l,$02
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f0c5
        call    l7fc5
        ld      l,$72
        rst     $08
        call    l736f
        ld      hl,$f0d4
        push    hl
        ld      hl,$043d
        push    hl
        rst     $18
        pop     af
        ld      a,$01
        ld      ($f0d8),a
        ld      a,$08
        ld      ($f0d9),a
        ld      a,$7f
        ld      ($f126),a
        ld      hl,$f12c
        push    hl
        ld      hl,$0441
        push    hl
        rst     $18
        pop     af
        ld      hl,$f130
        push    hl
        ld      hl,$0441
        push    hl
        rst     $18
        pop     af
        ld      a,$01
        ld      ($f140),a
        ld      a,$0f
        ld      ($f15e),a
        ld      a,$80
        ld      ($f15f),a
        ld      a,$01
        ld      ($f1a0),a
        ld      a,$02
        ld      ($f331),a
        ld      a,($f0b8)
        and     $1f
        ld      l,a
        cp      $10
        jr      nz,l061c                ; (+$04)
        ld      c,$01
        jr      l061e                   ; (+$02)
l061c:  ld      c,$00
l061e:  ld      a,c
        ld      ($f0b8),a
        ld      l,$20
        call    lba5c
        call    l04ab
        jp      lbe84
        rst     $30
        push    af
        push    af
        push    af
        push    af
        ld      l,$58
        rst     $08
        ld      l,$1f
        rst     $10
        ld      l,$5b
        rst     $08
        ld      l,$17
        call    l7395
        ld      a,($f127)
        cp      $1e
        jr      nz,l065b                ; (+$14)
        ld      l,$5c
        rst     $08
        ld      l,$64
        rst     $10
        ld      l,$1e
        rst     $10
        ld      hl,$06b1
        ld      (ix-$08),l
        ld      (ix-$07),h
        jr      l0682                   ; (+$27)
l065b:  call    lb8e6
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jr      nz,l0679                ; (+$03)
        jp      lbe72
l0679:  ld      hl,$071e
        ld      (ix-$08),l
        ld      (ix-$07),h
l0682:  ld      a,($f140)
        cp      $02
        jr      z,l0692                 ; (+$09)
        ld      l,$62
        rst     $10
        ld      l,$60
        rst     $10
        ld      l,$78
        rst     $10
l0692:  ld      hl,l0000
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l06a8                ; (+$04)
        ld      c,$01
        jr      l06aa                   ; (+$02)
l06a8:  ld      c,$00
l06aa:  ld      l,c
        call    l8851
        jp      lbe72
        rst     $20
        ld      hl,$fff7
        add     hl,sp
        ld      sp,hl
        ld      a,($f114)
        ld      (ix-$08),a
        sub     a
        ld      ($f114),a
        ld      l,$08
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      z,l06ea                 ; (+$1a)
        call    l7fb4
        ld      (ix-$09),c
        ld      a,(ix-$09)
        cp      $78
        jr      z,l06f6                 ; (+$19)
        ld      hl,$f190
        push    hl
        ld      hl,$f42c
        push    hl
        call    lbad9
        jr      nz,l06f6                ; (+$0c)
l06ea:  ld      a,(ix-$08)
        ld      ($f114),a
        ld      c,(ix-$07)
        jp      lbe84
l06f6:  ld      l,$71
        rst     $08
        ld      l,$59
        rst     $08
        ld      l,$21
        push    hl
        ld      l,$02
        push    hl
        ld      hl,$f190
        call    l7fc5
        ld      l,$63
        rst     $10
        ld      l,(ix-$09)
        rst     $10
        ld      l,$72
        rst     $08
        ld      hl,$f42c
        push    hl
        ld      hl,$f190
        push    hl
        rst     $18
        pop     af
        jr      l06ea                   ; (-$34)
        rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      l,$05
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      z,l074c                 ; (+$1a)
        call    l7fb4
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $78
        jr      z,l0752                 ; (+$13)
        ld      hl,$f198
        push    hl
        ld      hl,$f430
        push    hl
        call    lbad9
        jr      nz,l0752                ; (+$06)
l074c:  ld      c,(ix-$07)
        jp      lbe84
l0752:  ld      l,$71
        rst     $08
        ld      l,$59
        rst     $08
        ld      a,($f0d8)
        add     a,a
        ld      l,a
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f198
        call    l7fc5
        ld      l,$63
        rst     $10
        ld      l,(ix-$08)
        rst     $10
        ld      l,$72
        rst     $08
        ld      hl,$f430
        push    hl
        ld      hl,$f198
        push    hl
        rst     $18
        pop     af
        jr      l074c                   ; (-$31)
        rst     $30
        ld      hl,$fff4
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        ld      l,$5b
        rst     $08
        ld      l,$20
        rst     $10
        ld      l,$17
        call    l7395
        ld      a,($f127)
        cp      $1e
        jr      nz,l07bf                ; (+$27)
        ld      l,$5c
        rst     $08
        ld      l,$65
        rst     $10
        ld      l,$1e
        rst     $10
        ld      hl,$0840
        ld      (ix-$08),l
        ld      (ix-$07),h
        ld      hl,$f190
        ld      (ix-$0c),l
        ld      (ix-$0b),h
        ld      (ix-$09),$02
        ld      hl,$03d9
        ld      ($f434),hl
        jr      l07f9                   ; (+$3a)
l07bf:  call    lb8e6
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jr      nz,l07dd                ; (+$03)
        jp      lbe72
l07dd:  ld      hl,$0849
        ld      (ix-$08),l
        ld      (ix-$07),h
        ld      hl,$f198
        ld      (ix-$0c),l
        ld      (ix-$0b),h
        ld      (ix-$09),$10
        ld      hl,$f0d4
        ld      ($f434),hl
l07f9:  ld      l,$62
        rst     $10
        ld      hl,($f434)
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,(ix-$09)
        push    hl
        ld      l,(ix-$0c)
        ld      h,(ix-$0b)
        call    l784c
        ld      a,c
        or      a
        jr      z,l083d                 ; (+$25)
        ld      a,($f192)
        ld      ($f156),a
        ld      l,$7f
        rst     $10
        ld      hl,l0000
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l0837                ; (+$04)
        ld      c,$01
        jr      l0839                   ; (+$02)
l0837:  ld      c,$00
l0839:  ld      l,c
        call    l8851
l083d:  jp      lbe72
        rst     $20
        ld      l,$0a
        call    l8b1d
        jp      lbe84
        rst     $20
        ld      l,$03
        call    l8b1d
        jp      lbe84
        rst     $30
        ld      l,$58
        rst     $08
        ld      a,($f127)
        ld      l,a
        rst     $10
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jp      z,l08d2
        ld      l,$62
        rst     $10
        ld      a,($f0d9)
        add     a,$ff
        ld      l,a
        ld      ($f43a),a
        add     a,a
        sbc     a,a
        ld      ($f43b),a
        ld      hl,($f43a)
        add     hl,hl
        add     hl,hl
        ld      bc,$03bd
        add     hl,bc
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f198
        call    l784c
        ld      a,c
        or      a
        jr      z,l08d2                 ; (+$2f)
        ld      l,$7f
        rst     $10
        ld      hl,$f436
        push    hl
        ld      hl,($f43a)
        add     hl,hl
        add     hl,hl
        ld      bc,$033d
        add     hl,bc
        push    hl
        rst     $18
        pop     af
        ld      hl,l0000
        push    hl
        ld      hl,$08db
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l08c9                ; (+$04)
        ld      c,$01
        jr      l08cb                   ; (+$02)
l08c9:  ld      c,$00
l08cb:  ld      l,c
        call    l8851
        jp      lbe72
l08d2:  ld      c,$02
        jp      lbe72
        nop     
        nop     
        nop     
        nop     
        rst     $20
        ld      hl,$fff7
        add     hl,sp
        ld      sp,hl
        ld      (ix-$08),$00
        ld      (ix-$07),$00
l08e9:  ld      hl,$f0d9
        ld      a,(ix-$07)
        cp      (hl)
        jp      p,l0907
        ld      l,$03
        call    l8b1d
        ld      (ix-$09),c
        ld      a,(ix-$09)
        cp      $02
        jr      nz,l090d                ; (+$0b)
        ld      c,$02
        jp      lbe84
l0907:  ld      c,(ix-$08)
        jp      lbe84
l090d:  ld      a,(ix-$08)
        or      (ix-$09)
        ld      (ix-$08),a
        ld      hl,$f198
        push    hl
        ld      a,($f19a)
        and     $01
        jr      z,l092a                 ; (+$09)
        ld      hl,$f436
        ld      de,$f935
        rst     $38
        jr      l0931                   ; (+$07)
l092a:  ld      hl,$08d7
        ld      de,$f935
        rst     $38
l0931:  ld      hl,$f935
        push    hl
        ld      hl,$f198
        ld      de,$f93d
        rst     $38
        ld      hl,$f93d
        push    hl
        ld      hl,$0001
        push    hl
        call    lbd0f
        call    lbdd4
        rst     $18
        pop     af
        inc     (ix-$07)
        jp      l08e9
        rst     $30
        ld      l,$58
        rst     $08
        ld      a,($f127)
        ld      l,a
        rst     $10
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jr      z,l09a9                 ; (+$36)
        ld      l,$7f
        rst     $10
        ld      hl,$f43c
        push    hl
        ld      a,($f0d9)
        add     a,a
        add     a,a
        ld      l,a
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$03b9
        add     hl,bc
        push    hl
        rst     $18
        pop     af
        ld      hl,l0000
        push    hl
        ld      hl,$09ae
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l09a0                ; (+$04)
        ld      c,$01
        jr      l09a2                   ; (+$02)
l09a0:  ld      c,$00
l09a2:  ld      l,c
        call    l8851
        jp      lbe72
l09a9:  ld      c,$02
        jp      lbe72
        rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f198),a
        ld      ($f199),a
        ld      ($f19a),a
        ld      ($f19b),a
l09c4:  ld      l,$03
        call    l8b1d
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l0a21                 ; (+$4e)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f43c
        push    hl
        ld      hl,$f198
        push    hl
        call    lbad9
        jr      nz,l09ef                ; (+$06)
        ld      c,(ix-$07)
        jp      lbe84
l09ef:  ld      hl,$f198
        push    hl
        ld      a,$00
        add     a,a
        sbc     a,a
        ld      ($f935),a
        ld      ($f936),a
        ld      a,$00
        ld      ($f938),a
        ld      a,$01
        ld      ($f937),a
        ld      hl,$f935
        push    hl
        call    lba62
        pop     af
        ld      a,($f19a)
        and     $1f
        jr      nz,l09c4                ; (-$52)
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jp      nz,l09c4
l0a21:  ld      c,$02
        jp      lbe84
        rst     $30
        ld      l,$58
        rst     $08
        ld      l,$23
        rst     $10
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jp      z,l0a92
        ld      l,$6a
        rst     $10
        ld      a,$1f
        ld      ($f0c7),a
        ld      hl,$f0c5
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f194
        call    l784c
        ld      a,c
        or      a
        jr      z,l0a92                 ; (+$2c)
        ld      l,$7f
        rst     $10
        ld      hl,$f33b
        push    hl
        ld      hl,($f196)
        add     hl,hl
l0a71:  add     hl,hl
        ld      bc,$033d
        add     hl,bc
        push    hl
        rst     $18
        pop     af
        ld      hl,l0000
        push    hl
        ld      hl,$0a95
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l0a8c                ; (+$04)
        ld      c,$01
        jr      l0a8e                   ; (+$02)
l0a8c:  ld      c,$00
l0a8e:  ld      l,c
        call    l8851
l0a92:  jp      lbe72
        rst     $20
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      l,$05
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        or      a
        jr      nz,l0ac9                ; (+$20)
        ld      hl,$f19c
        push    hl
        ld      hl,$f33b
        push    hl
        call    lbe23
        pop     af
        ld      l,$05
        call    l8b1d
        ld      (ix-$07),c
        ld      hl,$f19c
        push    hl
        ld      hl,$f33b
        push    hl
        call    lbe23
        pop     af
l0ac9:  ld      c,(ix-$07)
        jp      lbe84
        rst     $30
        ld      hl,$fff4
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        ld      l,$24
        rst     $10
        ld      l,$5b
        rst     $08
        ld      l,$17
        call    l7395
        ld      a,($f127)
        cp      $1e
        jr      nz,l0b16                ; (+$2c)
        ld      l,$5c
        rst     $08
        ld      l,$65
        rst     $10
        ld      l,$1e
        rst     $10
        ld      hl,$0bc9
        ld      (ix-$08),l
        ld      (ix-$07),h
        ld      hl,$f190
        ld      (ix-$0c),l
        ld      (ix-$0b),h
        ld      (ix-$09),$02
        ld      hl,$03d9
        ld      ($f440),hl
        ld      a,$07
        ld      ($f0c7),a
        jr      l0b5a                   ; (+$44)
l0b16:  call    lb8e6
        ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f19c
        call    l784c
        ld      a,c
        or      a
        jr      nz,l0b34                ; (+$03)
        jp      lbe72
l0b34:  ld      hl,$0bfb
        ld      (ix-$08),l
        ld      (ix-$07),h
        ld      hl,$f198
        ld      (ix-$0c),l
        ld      (ix-$0b),h
        ld      (ix-$09),$10
        ld      hl,$f0d4
        ld      ($f440),hl
        ld      a,($f0d9)
        add     a,$ff
        ld      l,a
        ld      a,l
        ld      ($f0c7),a
l0b5a:  ld      l,$62
        rst     $10
        ld      hl,($f440)
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,(ix-$09)
        push    hl
        ld      l,(ix-$0c)
        ld      h,(ix-$0b)
        call    l784c
        ld      a,c
        cp      $01
        jp      nz,l0bc6
        ld      l,$6a
        rst     $10
        ld      hl,$f0c5
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f194
        call    l784c
        ld      a,c
        cp      $01
        jr      nz,l0bc6                ; (+$2f)
        ld      hl,$f33b
        push    hl
        ld      hl,($f196)
        add     hl,hl
        add     hl,hl
        ld      bc,$033d
        add     hl,bc
        push    hl
        rst     $18
        pop     af
        ld      l,$7f
        rst     $10
        ld      hl,l0000
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l0bc0                ; (+$04)
        ld      c,$01
        jr      l0bc2                   ; (+$02)
l0bc0:  ld      c,$00
l0bc2:  ld      l,c
        call    l8851
l0bc6:  jp      lbe72
        rst     $20
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      a,($f192)
        ld      ($f156),a
        ld      l,$0a
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        or      a
        jr      nz,l0bf5                ; (+$12)
        ld      hl,$f33d
        ld      a,($f156)
        xor     (hl)
        ld      ($f156),a
        ld      l,$0a
        call    l8b1d
        ld      (ix-$07),c
l0bf5:  ld      c,(ix-$07)
        jp      lbe84
        rst     $20
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      l,$03
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        or      a
        jr      nz,l0c2f                ; (+$20)
        ld      hl,$f198
        push    hl
        ld      hl,$f33b
        push    hl
        call    lbe23
        pop     af
        ld      l,$03
        call    l8b1d
        ld      (ix-$07),c
        ld      hl,$f198
        push    hl
        ld      hl,$f33b
        push    hl
        call    lbe23
        pop     af
l0c2f:  ld      c,(ix-$07)
        jp      lbe84
        jr      nz,l0c79                ; (+$42)
        ld      e,c
        ld      d,h
        ld      b,l
        ld      d,e
        nop     
        ld      b,e
        ld      d,d
        ld      b,l
        ld      b,c
        ld      d,h
        ld      b,l
        ld      b,h
        nop     
        ld      b,e
        ld      d,d
        ld      b,l
        ld      b,c
        ld      d,h
        ld      b,l
        jr      nz,l0c9c                ; (+$50)
        ld      d,d
        ld      c,a
        ld      b,a
        nop     
        ld      d,b
        ld      d,d
        ld      c,a
        ld      b,a
        ld      d,d
        ld      b,c
        ld      c,l
        jr      nz,l0c59                ; (+$00)
l0c59:  rst     $30
        ld      hl,$fff2
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        sub     a
        ld      ($f125),a
        ld      hl,($f34f)
        ld      ($f427),hl
        ld      a,($f140)
        cp      $01
        jr      nz,l0c8f                ; (+$1c)
        ld      hl,$0c50
        rst     $28
        ld      l,$5b
l0c79:  rst     $08
        ld      l,$17
        call    l7395
        ld      a,c
        or      a
        jr      nz,l0c92                ; (+$0f)
        ld      a,($f127)
        cp      $2f
        jr      nz,l0c95                ; (+$0b)
        call    la927
        jr      l0c92                   ; (+$03)
l0c8f:  call    l5be0
l0c92:  jp      lbe72
l0c95:  call    lb8e6
        ld      a,$63
        ld      ($f0c7),a
        ld      hl,$f0c5
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$04
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f12c
        call    l784c
        ld      a,c
        cp      $01
        jr      nz,l0c92                ; (-$24)
        ld      a,($f12e)
        ld      ($f429),a
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        or      (hl)
        jr      nz,l0ce6                ; (+$1a)
        ld      a,($f34f)
        sub     $cf
        ld      a,($f350)
        sbc     a,$e7
        jp      c,l0d69
        ld      l,$58
        rst     $08
        ld      l,$5f
        rst     $10
        ld      hl,$0c44
        rst     $28
        jp      lbe72
l0ce6:  ld      a,($f429)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      ($f42a),hl
        ld      a,($f429)
        ld      l,a
        call    l9b31
        ld      (ix-$0c),c
        ld      (ix-$0b),b
        ld      l,$71
        rst     $08
        ld      hl,($f42a)
        ld      a,(hl)
        ld      (ix-$08),a
        ld      l,(ix-$08)
        rst     $10
        ld      l,(ix-$0c)
        ld      h,(ix-$0b)
        ld      bc,($f42a)
        ld      a,l
        sub     c
        ld      l,a
        ld      a,h
        sbc     a,b
        ld      h,a
        ld      ($f349),hl
        sub     a
        ld      ($f347),a
        ld      ($f348),a
        ld      l,$01
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f347
        call    l7fc5
        ld      hl,$0c35
        rst     $28
        ld      l,$72
        rst     $08
        ld      a,(ix-$08)
        cp      $51
        jp      nz,l0e13
l0d4b:  ld      l,$05
        call    l7395
        ld      a,($f127)
        cp      $1c
        jr      nz,l0d5c                ; (+$05)
        ld      bc,$0001
        jr      l0d5f                   ; (+$03)
l0d5c:  ld      bc,l0000
l0d5f:  ld      a,c
        or      b
        jp      z,l0e8d
        call    l736f
        jr      l0d4b                   ; (-$1e)
l0d69:  ld      a,($f429)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        push    hl
        ld      a,($f429)
        ld      l,a
        call    l9b31
        ld      (ix-$0e),c
        pop     hl
        ld      (ix-$0d),b
        ld      a,(ix-$0e)
        ld      (hl),a
        ld      a,(ix-$0d)
        inc     hl
        ld      (hl),a
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        inc     hl
        inc     hl
        push    hl
        ld      hl,($f34f)
        ld      bc,$ffff
        add     hl,bc
        push    hl
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        call    l9ad7
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        inc     (ix-$0e)
        jr      nz,l0db7                ; (+$03)
        inc     (ix-$0d)
l0db7:  ld      (hl),$53
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        ld      (hl),$50
        ld      a,($f429)
        inc     a
        ld      l,a
        ld      (ix-$09),l
l0dc9:  ld      a,(ix-$09)
        cp      $64
        jp      p,l0dfd
        ld      a,(ix-$09)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        or      (hl)
        jr      z,l0e0e                 ; (+$2a)
        ld      a,(ix-$09)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        add     a,$02
        ld      (hl),a
        inc     hl
        ld      a,(hl)
        adc     a,$00
        ld      (hl),a
        jr      l0e0e                   ; (+$11)
l0dfd:  ld      hl,($f34f)
        inc     hl
        inc     hl
        ld      ($f34f),hl
        ld      ($f427),hl
        ld      hl,$0c3c
        rst     $28
        jr      l0e13                   ; (+$05)
l0e0e:  inc     (ix-$09)
        jr      l0dc9                   ; (-$4a)
l0e13:  ld      a,($f429)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      ($f42a),hl
        ld      ($f35d),hl
        inc     hl
        ld      ($f355),hl
        ld      hl,($f35d)
        call    l9b21
        ld      l,c
        ld      h,b
        ld      ($f34d),hl
        ld      a,($f429)
        ld      l,a
        call    l9b31
        ld      l,c
        ld      h,b
        ld      bc,$ffff
        add     hl,bc
        ld      ($f357),hl
        ld      hl,$e7ff
        ld      bc,($f34f)
        ld      de,($f357)
        ld      a,c
        sub     e
        ld      c,a
        ld      a,b
        sbc     a,d
        ld      b,a
        ld      a,l
        sub     c
        ld      l,a
        ld      a,h
        sbc     a,b
        ld      h,a
        inc     hl
        inc     hl
        ld      ($f35b),hl
        push    hl
        ld      hl,($f34f)
        ld      bc,$ffff
        add     hl,bc
        push    hl
        ld      hl,($f357)
        inc     hl
        call    l9ad7
        ld      hl,($f35b)
        ld      bc,$ffcf
        add     hl,bc
        ld      ($f353),hl
        ld      a,$02
        ld      ($f140),a
        ld      l,$02
        call    lb11f
        jp      l0c92
l0e8d:  ld      a,($f127)
        cp      $1d
        jr      nz,l0eb0                ; (+$1c)
        ld      hl,($f34f)
        ld      bc,$ffff
        add     hl,bc
        push    hl
        ld      l,(ix-$0c)
        ld      h,(ix-$0b)
        call    lab95
        ld      a,c
        or      a
        jr      nz,l0eb3                ; (+$0a)
        ld      a,$28
        ld      ($f126),a
        jr      l0eb3                   ; (+$03)
l0eb0:  call    lb8e6
l0eb3:  jp      lbe72
        rst     $30
        ld      l,$58
        rst     $08
        ld      a,($f140)
        cp      $02
        jr      nz,l0eda                ; (+$19)
        ld      l,$2b
        rst     $10
        ld      l,$5b
        rst     $08
        ld      l,$11
        call    l7395
        ld      a,c
        or      a
        jr      nz,l0ee4                ; (+$14)
        ld      a,($f127)
        ld      l,a
        rst     $10
        call    l9a22
        jr      l0ee7                   ; (+$0d)
l0eda:  ld      hl,($f359)
        inc     hl
        ld      ($f359),hl
l0ee1:  jp      lbe72
l0ee4:  call    lb8e6
l0ee7:  ld      l,$5c
        rst     $08
        jr      l0ee1                   ; (-$0b)
        rst     $30
        push    af
        push    af
        push    af
        push    af
        ld      l,$58
        rst     $08
        ld      a,($f140)
        cp      $02
        jr      nz,l0f14                ; (+$19)
        ld      l,$2c
        rst     $10
        ld      l,$5b
        rst     $08
        ld      l,$11
        call    l7395
        ld      a,c
        or      a
        jr      nz,l0f46                ; (+$3c)
        ld      a,($f127)
        ld      l,a
        rst     $10
        call    l9a22
        jr      l0f49                   ; (+$35)
l0f14:  ld      hl,($f359)
        ld      a,(hl)
        ld      ($f127),a
        ld      a,($f351)
        ld      (ix-$08),a
        ld      a,($f352)
        ld      (ix-$07),a
l0f27:  ld      l,(ix-$08)
        ld      h,(ix-$07)
        ld      a,($f127)
        ld      c,a
        ld      a,(hl)
        cp      c
        jr      z,l0f4e                 ; (+$19)
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        inc     hl
        inc     hl
        inc     hl
        ld      (ix-$08),l
        ld      (ix-$07),h
        jr      l0f27                   ; (-$1f)
l0f46:  call    lb8e6
l0f49:  ld      l,$5c
        rst     $08
        jr      l0f61                   ; (+$13)
l0f4e:  ld      l,(ix-$08)
        ld      h,(ix-$07)
        inc     hl
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      bc,($f42a)
        add     hl,bc
        ld      ($f359),hl
l0f61:  jp      lbe72
        rst     $30
        ld      hl,$fff4
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        ld      l,$2d
        rst     $10
l0f70:  ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$09
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f343
        call    l784c
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      nz,l0f93                ; (+$05)
        call    l736f
        jr      l0f70                   ; (-$23)
l0f93:  ld      a,(ix-$07)
        cp      $01
        jr      nz,l0fbd                ; (+$23)
        ld      l,$5b
        rst     $08
        ld      a,($f127)
        cp      $2e
        jr      nz,l0fc0                ; (+$1c)
        ld      (ix-$0c),$01
        ld      l,$17
        call    l7395
        ld      a,($f127)
        cp      $2f
        jr      nz,l0fee                ; (+$3a)
        ld      l,$2f
        rst     $10
        ld      (ix-$0b),$01
        jr      l0fc8                   ; (+$0b)
l0fbd:  jp      lbe72
l0fc0:  ld      (ix-$0c),$00
        ld      (ix-$0b),$01
l0fc8:  ld      l,$63
        rst     $10
l0fcb:  ld      hl,$043d
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$0a
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f347
        call    l784c
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      nz,l0ff7                ; (+$0e)
        call    l736f
        jr      l0fcb                   ; (-$23)
l0fee:  call    lb8e6
        ld      (ix-$0b),$00
        jr      l0fc8                   ; (-$2f)
l0ff7:  ld      a,(ix-$07)
        cp      $01
        jp      nz,l0fbd
        ld      l,$5b
        rst     $08
        ld      l,$17
        call    l7395
        ld      a,($f127)
        and     $f0
        jr      nz,l1023                ; (+$15)
        ld      l,$5c
        rst     $08
        ld      a,($f127)
        ld      l,a
        rst     $10
        ld      a,($f140)
        cp      $02
        jr      nz,l1029                ; (+$0c)
        call    l9a22
        jp      l0fbd
l1023:  call    lb8e6
        jp      l0fbd
l1029:  ld      a,(ix-$0c)
        or      a
        jr      z,l103c                 ; (+$0d)
        ld      hl,$f347
        push    hl
        ld      hl,$f343
        push    hl
        call    lbab0
        jr      c,l1051                 ; (+$15)
l103c:  ld      a,(ix-$0b)
        or      a
        jp      z,l0fbd
        ld      hl,$f343
        push    hl
        ld      hl,$f347
        push    hl
        call    lbad9
        jp      nz,l0fbd
l1051:  ld      a,($f351)
        ld      (ix-$0a),a
        ld      a,($f352)
        ld      (ix-$09),a
l105d:  ld      l,(ix-$0a)
        ld      h,(ix-$09)
        ld      a,($f127)
        ld      c,a
        ld      a,(hl)
        cp      c
        jr      z,l107c                 ; (+$11)
        ld      l,(ix-$0a)
        ld      h,(ix-$09)
        inc     hl
        inc     hl
        inc     hl
        ld      (ix-$0a),l
        ld      (ix-$09),h
        jr      l105d                   ; (-$1f)
l107c:  ld      l,(ix-$0a)
        ld      h,(ix-$09)
        inc     hl
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      bc,($f42a)
        add     hl,bc
        ld      ($f359),hl
        jp      l0fbd
        ld      b,(hl)
        ld      b,c
        ld      d,h
        ld      b,c
        ld      c,h
        dec     l
        nop     
        ld      b,c
        ld      d,h
        ld      d,h
        ld      b,l
        ld      c,l
        ld      d,b
        ld      d,h
        ld      b,l
        ld      b,h
        jr      nz,l10f6                ; (+$52)
        ld      b,l
        ld      b,e
        ld      d,l
        ld      d,d
        ld      d,e
        ld      c,c
        ld      c,a
        ld      c,(hl)
        nop     
        ld      d,b
        ld      d,d
        ld      c,a
        ld      b,a
        ld      d,d
        ld      b,c
        ld      c,l
        jr      nz,l1104                ; (+$4e)
        ld      c,a
        ld      d,h
        jr      nz,l1100                ; (+$46)
        ld      c,a
        ld      d,l
        ld      c,(hl)
        ld      b,h
        nop     
        dec     l
        jr      nz,l1110                ; (+$4e)
        ld      c,a
        ld      d,h
        jr      nz,l110c                ; (+$46)
        ld      c,a
        ld      d,l
        ld      c,(hl)
        ld      b,h
        nop     
        ld      b,h
        ld      b,l
        ld      d,b
        ld      d,h
        ld      c,b
        jr      nz,l1117                ; (+$45)
        ld      e,b
        ld      b,e
        ld      b,l
        ld      b,l
        ld      b,h
        ld      b,l
        ld      b,h
        nop     
        rst     $30
        ld      hl,$fff1
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        ld      l,$37
        rst     $10
        ld      a,$63
        ld      ($f0c7),a
        ld      a,($f140)
        cp      $02
        jr      nz,l111b                ; (+$29)
l10f2:  ld      hl,$f0c5
        push    hl
l10f6:  ld      hl,$0441
        push    hl
        ld      l,$08
        push    hl
        ld      l,$0a
        push    hl
l1100:  ld      hl,$f347
        call    l784c
        ld      (ix-$09),c
        ld      a,(ix-$09)
l110c:  cp      $02
        jr      nz,l1140                ; (+$30)
l1110:  ld      l,$5a
        rst     $08
        ld      l,$5a
        rst     $08
        call    l736f
        jr      l10f2                   ; (-$29)
l111b:  ld      hl,$f347
        push    hl
        ld      hl,$f130
        push    hl
        rst     $18
        pop     af
        ld      hl,$f0c5
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f347
        call    l784c
        ld      a,c
        or      a
        jr      nz,l114f                ; (+$12)
        jp      lbe72
l1140:  ld      a,(ix-$09)
        or      a
        jr      nz,l1149                ; (+$03)
        jp      lbe72
l1149:  call    l9a22
        jp      l12c0
l114f:  ld      a,($f349)
        ld      (ix-$0b),a
        ld      a,($f34b)
        cp      $0a
        jp      m,l1169
        ld      hl,$10cb
        ld      (ix-$08),l
        ld      (ix-$07),h
        jp      l11d1
l1169:  ld      a,(ix-$0b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        or      (hl)
        jr      nz,l118a                ; (+$0e)
        ld      a,($f140)
        cp      $01
        jr      nz,l119d                ; (+$1a)
        ld      hl,$10bf
        rst     $28
        jp      l12c0
l118a:  ld      a,($f140)
        cp      $01
        jr      nz,l11a8                ; (+$17)
        ld      hl,$f130
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        pop     af
        jr      l11a8                   ; (+$0b)
l119d:  ld      hl,$10ad
        ld      (ix-$08),l
        ld      (ix-$07),h
        jr      l11d1                   ; (+$29)
l11a8:  ld      (ix-$0a),$00
l11ac:  ld      hl,$f34b
        ld      a,(ix-$0a)
        cp      (hl)
        jp      p,l1210
        ld      hl,$f117
        ld      a,(ix-$0a)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        add     hl,de
        ld      a,(hl)
        cp      (ix-$0b)
        jp      nz,l1286
        ld      hl,$1099
        ld      (ix-$08),l
        ld      (ix-$07),h
l11d1:  ld      a,$01
        ld      ($f140),a
        ld      l,$58
        rst     $08
        ld      hl,$1092
        rst     $28
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        rst     $28
        ld      a,($f34b)
        ld      l,a
        ld      a,($f34b)
        add     a,$01
        ld      ($f34b),a
        ld      a,l
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$f117
        add     hl,bc
        ld      a,(ix-$0b)
        ld      (hl),a
        call    la86f
        ld      a,($f126)
        ld      ($e969),a
        ld      a,$45
        ld      ($f126),a
        jp      lbe72
l1210:  ld      hl,$f117
        ld      a,($f34b)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        add     hl,de
        ld      a,(ix-$0b)
        ld      ($f429),a
        ld      (hl),a
        ld      a,($f429)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      ($f42a),hl
        ld      a,($f140)
        cp      $03
        jp      nz,l128c
        ld      hl,($f42a)
        ld      a,(hl)
        cp      $53
        jp      nz,l12c3
        ld      hl,$f160
        ld      (ix-$0e),l
        ld      (ix-$0d),h
        ld      a,($f34b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        push    bc
        ld      hl,l0020
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$f181
        add     hl,bc
        push    hl
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        ld      bc,$001f
        add     hl,bc
        push    hl
        ld      l,(ix-$0e)
        ld      h,(ix-$0d)
        call    l9ad7
        ld      hl,l0020
        push    hl
        ld      hl,$f160
        call    lb8c3
        jr      l12c3                   ; (+$3d)
l1286:  inc     (ix-$0a)
        jp      l11ac
l128c:  ld      a,$03
        ld      ($f140),a
        ld      l,$01
        call    lb11f
        ld      hl,$0003
        sub     a
        ld      ($f116),a
        ld      ($f0bf),hl
        ld      a,$10
        ld      ($f0b7),a
l12a5:  ld      a,($f34b)
        add     a,$01
        ld      ($f34b),a
        ld      hl,($f42a)
        call    l9b21
        ld      l,c
        ld      h,b
        inc     hl
        ld      ($f351),hl
        ld      hl,($f42a)
        inc     hl
        ld      ($f359),hl
l12c0:  jp      lbe72
l12c3:  ld      a,($f34b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f141
        add     hl,bc
        ld      a,($f359)
        ld      (hl),a
        ld      a,($f35a)
        inc     hl
        ld      (hl),a
        jr      l12a5                   ; (-$37)
        jr      nc,l130f                ; (+$31)
        ld      ($3433),a
        dec     (hl)
        ld      (hl),$37
        jr      c,l131f                 ; (+$39)
        ld      b,c
        ld      b,d
        ld      b,e
        ld      b,h
        ld      b,l
        ld      b,(hl)
        daa     
        ld      hl,($2325)
        ld      e,h
        ld      ($2f24),hl
        nop     
        nop     
        nop     
        nop     
        nop     
        nop     
        jr      nz,l1343                ; (+$47)
        ld      c,b
        ld      c,h
        ld      c,l
        ld      d,c
        ld      d,d
        ld      d,(hl)
        dec     sp
        inc     l
        ld      d,a
        ld      b,b
        ld      c,c
        ld      d,h
        ld      d,l
        ld      c,(hl)
        ld      c,a
        ld      d,b
        ld      e,b
        dec     a
        ld      e,c
l130f:  inc     a
        ld      e,d
        ld      a,$2d
        ld      c,d
        dec     hl
        ccf     
        nop     
        nop     
        nop     
        ld      l,$53
        ld      c,e
        ld      b,$24
        ld      b,b
l131f:  dec     h
        cpl     
        ld      e,h
        ccf     
        adc     a,h
        dec     d
        ld      l,e
        ld      d,$c1
        dec     d
        pop     bc
        dec     d
        adc     a,a
        dec     d
        dec     a
        dec     d
        dec     a
        dec     d
        ex      af,af'
        inc     hl
        inc     h
        ld      b,b
        dec     h
        cpl     
        ld      e,h
        ccf     
        dec     hl
        inc     bc
        rla     
        sbc     a,$16
        sbc     a,h
        inc     d
        sbc     a,h
        inc     d
        sbc     a,h
l1343:  inc     d
        sbc     a,h
        inc     d
        sbc     a,h
        inc     d
        sbc     a,h
        inc     d
        add     a,l
        inc     d
l134c:  rst     $30
        ld      hl,$ffee
        add     hl,sp
        ld      sp,hl
        ld      a,($f140)
        cp      $02
        jr      nz,l138e                ; (+$35)
        ld      l,$58
        rst     $08
        ld      a,($f127)
        ld      l,a
        rst     $10
        ld      l,$5b
        rst     $08
        ld      (ix-$0b),$00
l1368:  ld      l,$17
        call    l7395
        ld      a,($f127)
        cp      $1c
        jr      z,l1379                 ; (+$05)
        ld      bc,$0001
        jr      l137c                   ; (+$03)
l1379:  ld      bc,l0000
l137c:  ld      a,c
        or      b
        jr      z,l13c4                 ; (+$44)
        ld      a,($f127)
        cp      $1d
        jp      nz,l13d0
        call    lb8e6
        jp      lbe72
l138e:  ld      a,$01
        ld      ($f140),a
        ld      (ix-$08),$01
        ld      a,($f127)
        cp      $3f
        jr      nz,l13a2                ; (+$04)
        ld      c,$01
        jr      l13a4                   ; (+$02)
l13a2:  ld      c,$00
l13a4:  ld      (ix-$07),c
        ld      a,(ix-$07)
        or      a
        jp      nz,l142b
        ld      l,$71
        rst     $08
        ld      hl,($f359)
        ld      a,(hl)
        cp      $ab
        jp      nz,l1428
        ld      hl,($f359)
        inc     hl
        ld      ($f359),hl
        jp      l142b
l13c4:  ld      l,$5c
        rst     $08
        ld      l,$74
        rst     $10
        call    l9a22
        jp      l1722
l13d0:  ld      a,($f127)
        cp      $1a
        jr      nz,l13e3                ; (+$0c)
        ld      a,(ix-$0b)
        or      a
        jr      nz,l13f1                ; (+$14)
        call    l736f
        jp      l1368
l13e3:  ld      a,(ix-$0b)
        cp      $1b
        jp      m,l13fa
        call    l736f
        jp      l1368
l13f1:  ld      l,$5a
        rst     $08
        dec     (ix-$0b)
        jp      l1368
l13fa:  ld      hl,$12dc
        ld      a,($f127)
        ld      e,a
        sub     a
        ld      d,a
        add     hl,de
        ld      a,(hl)
        ld      (ix-$0a),a
        ld      a,(ix-$0a)
        or      a
        jr      nz,l1414                ; (+$06)
        call    l736f
        jp      l1368
l1414:  ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      a,l
        or      $80
        ld      l,a
        rst     $10
        inc     (ix-$0b)
        jp      l1368
l1428:  ld      l,$58
        rst     $08
l142b:  ld      a,$03
        ld      ($f140),a
        ld      l,$17
        call    l7395
        ld      a,$01
        ld      ($f140),a
        ld      a,($f127)
        cp      $74
        jr      z,l1446                 ; (+$05)
        ld      bc,$0001
        jr      l1449                   ; (+$03)
l1446:  ld      bc,l0000
l1449:  ld      a,c
        or      b
        jr      z,l145e                 ; (+$11)
        sub     a
        ld      ($f0b9),a
        ld      a,($f127)
        cp      $45
        jr      nz,l1472                ; (+$1a)
        call    lb8e6
        jp      lbe72
l145e:  ld      a,(ix-$07)
        or      a
        jp      z,l171a
        ld      a,(ix-$08)
        or      a
        jp      z,l171d
        call    la5e1
        jp      l171d
l1472:  ld      a,($f127)
        and     $7f
        ld      l,a
        ld      (ix-$0a),l
        ld      l,(ix-$0a)
        ld      c,l
        ld      hl,$1331
        jp      lb8ed
        ld      a,(ix-$07)
        or      a
        jr      z,l1493                 ; (+$08)
        ld      l,$07
        call    la661
        jp      l142b
l1493:  call    l736f
        jp      l142b
        jp      l142b
        ld      a,(ix-$0a)
        ld      (ix-$12),a
        ld      hl,($f359)
        push    hl
        inc     hl
        ld      ($f359),hl
        pop     hl
        ld      a,(hl)
        ld      ($f127),a
        and     $7f
        ld      l,a
        ld      (ix-$0a),l
        ld      a,(ix-$0a)
        cp      (ix-$12)
        jr      nz,l14cc                ; (+$0f)
        ld      a,(ix-$07)
        or      a
        jr      z,l14ee                 ; (+$2b)
        ld      l,(ix-$12)
        call    la661
        jp      l142b
l14cc:  ld      a,(ix-$0a)
        cp      $30
        jp      m,l14fd
        ld      a,$46
        cp      (ix-$0a)
        jp      m,l14fd
        ld      a,$39
        cp      (ix-$0a)
        jp      p,l150f
        ld      a,(ix-$0a)
        cp      $41
        jp      p,l150f
        jr      l14fd                   ; (+$0f)
l14ee:  ld      c,(ix-$12)
        sub     a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      a,l
        or      $80
        ld      l,a
        rst     $10
        jp      l142b
l14fd:  call    lb8e6
        ld      a,(ix-$07)
        or      a
        jr      z,l152e                 ; (+$28)
        ld      l,(ix-$12)
        call    la661
        jp      l142b
l150f:  ld      a,$39
        cp      (ix-$0a)
        jp      m,l151b
        ld      c,$30
        jr      l151d                   ; (+$02)
l151b:  ld      c,$37
l151d:  ld      a,(ix-$0a)
        sub     c
        ld      (ix-$0a),a
        ld      l,(ix-$12)
        ld      c,l
        ld      hl,$131c
        jp      lb8ed
l152e:  ld      c,(ix-$12)
        sub     a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      a,l
        or      $80
        ld      l,a
        rst     $10
        jp      l142b
        ld      a,(ix-$12)
        cp      $24
        jr      nz,l154a                ; (+$06)
        ld      (ix-$09),$10
        jr      l154e                   ; (+$04)
l154a:  ld      (ix-$09),$0a
l154e:  ld      a,(ix-$07)
        or      a
        jr      z,l1570                 ; (+$1c)
        ld      l,$01
        push    hl
        ld      l,(ix-$09)
        push    hl
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        call    laa31
        jp      l142b
l1570:  ld      l,$01
        push    hl
        ld      l,(ix-$09)
        push    hl
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        call    l7fc5
        jp      l142b
        jp      l142b
        ld      a,(ix-$07)
        or      a
        jr      z,l15ab                 ; (+$16)
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f162
        add     hl,bc
        ld      l,(hl)
        call    la661
        jp      l142b
l15ab:  ld      a,($f0b7)
        cp      (ix-$0a)
        jr      nz,l15b7                ; (+$04)
        ld      c,$10
        jr      l15ba                   ; (+$03)
l15b7:  ld      c,(ix-$0a)
l15ba:  ld      a,c
        ld      ($f0b7),a
        jp      l142b
        ld      a,(ix-$07)
        or      a
        jr      z,l1607                 ; (+$40)
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        push    hl
        ld      hl,$0441
        push    hl
        rst     $18
        pop     af
        ld      a,(ix-$12)
        cp      $2f
        jp      nz,l164b
        ld      a,$03
        ld      ($f140),a
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f162
        add     hl,bc
        push    hl
        call    la690
        pop     hl
        ld      (hl),c
        ld      a,$01
        ld      ($f140),a
        jp      l142b
l1607:  ld      l,$72
        rst     $08
        ld      a,($f134)
        ld      (ix-$0d),a
        ld      l,$04
        call    lb11f
        ld      l,$08
        call    lb136
        ld      a,(ix-$12)
        cp      $2f
        jr      nz,l1625                ; (+$04)
        ld      c,$10
        jr      l1627                   ; (+$02)
l1625:  ld      c,$0a
l1627:  push    bc
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        call    la4e5
        ld      l,$04
        call    lb136
        ld      l,(ix-$0d)
        call    lb11f
        ld      l,$71
        rst     $08
        jp      l142b
l164b:  ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f162
        add     hl,bc
        push    hl
        ld      l,$e2
        call    lba5c
        ld      a,c
        and     $1f
        ld      c,a
        pop     hl
        sub     a
        ld      b,a
        ld      (hl),c
        jp      l142b
        ld      a,(ix-$07)
        or      a
        jr      z,l1679                 ; (+$08)
        ld      l,$3f
        call    la661
        jp      l142b
l1679:  ld      hl,$00bf
        rst     $10
        ld      l,$72
        rst     $08
        ld      a,($f134)
        ld      (ix-$0d),a
        ld      l,$04
        call    lb11f
        ld      l,$08
        call    lb136
        ld      hl,$0085
        call    l7395
        ld      a,c
        or      a
        jr      nz,l16ca                ; (+$30)
        ld      a,(ix-$0a)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        add     hl,hl
        ld      bc,$f160
        add     hl,bc
        push    hl
        ld      a,($f127)
        cp      $1c
        jr      nz,l16b5                ; (+$04)
        ld      c,$01
        jr      l16b7                   ; (+$02)
l16b5:  ld      c,$00
l16b7:  pop     hl
        ld      a,c
        inc     hl
        inc     hl
        ld      (hl),a
        add     a,a
        sbc     a,a
        inc     hl
        ld      (hl),a
        dec     hl
        dec     hl
        ld      (hl),a
        dec     hl
        ld      (hl),a
        ld      l,$5a
        rst     $08
        jr      l16cd                   ; (+$03)
l16ca:  call    lb8e6
l16cd:  ld      l,$04
        call    lb136
        ld      l,(ix-$0d)
        call    lb11f
        ld      l,$71
        rst     $08
        jp      l142b
        ld      a,(ix-$07)
        or      a
        jr      z,l16f3                 ; (+$0f)
        ld      hl,($f359)
        ld      a,(hl)
        cp      $74
        jr      nz,l16fb                ; (+$0f)
        ld      (ix-$08),$00
        jp      l142b
l16f3:  ld      a,($f127)
        ld      l,a
        rst     $10
        jp      l142b
l16fb:  ld      l,$2b
        call    la661
        jp      l142b
        ld      a,(ix-$07)
        or      a
        jr      z,l1712                 ; (+$09)
        ld      l,(ix-$0a)
        call    la661
        jp      l142b
l1712:  ld      a,($f127)
        ld      l,a
        rst     $10
        jp      l142b
l171a:  ld      l,$72
        rst     $08
l171d:  ld      a,$03
        ld      ($f140),a
l1722:  jp      lbe72
        rst     $30
        push    af
        push    af
        push    af
        push    af
        ld      a,($f34b)
        sub     $01
        ld      ($f34b),a
        or      a
        jr      nz,l174b                ; (+$16)
        ld      a,($f116)
        or      a
        jp      z,l1789
        ld      a,$01
        ld      ($f34b),a
        ld      hl,($f42a)
        inc     hl
        ld      ($f359),hl
        jp      l1819
l174b:  ld      hl,($f42a)
        ld      a,(hl)
        cp      $53
        jp      nz,l17d8
        ld      a,($f34b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        push    bc
        ld      hl,l0020
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$f181
        add     hl,bc
        ld      (ix-$08),l
        ld      (ix-$07),h
        ld      hl,$f160
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        ld      bc,$001f
        add     hl,bc
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        call    l9ad7
        jp      l17d8
l1789:  ld      l,$01
        call    lb136
        ld      a,$01
        ld      ($f140),a
        ld      l,$0f
        call    l7395
        ld      a,($f127)
        cp      $27
        jr      nz,l17a9                ; (+$0a)
        ld      a,$01
        ld      ($f116),a
        ld      l,$08
        call    lb11f
l17a9:  ld      a,($f127)
        cp      $26
        jr      z,l17b6                 ; (+$06)
        ld      a,($f116)
        or      a
        jr      z,l17d3                 ; (+$1d)
l17b6:  ld      l,$01
        call    lb11f
        ld      a,$03
        ld      ($f140),a
        ld      a,$01
        ld      ($f34b),a
        ld      hl,($f42a)
        inc     hl
        ld      ($f359),hl
        ld      a,$10
        ld      ($f0b7),a
        jr      l1819                   ; (+$46)
l17d3:  call    lb8e6
        jr      l1819                   ; (+$41)
l17d8:  ld      a,($f34b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$f116
        add     hl,bc
        ld      a,(hl)
        ld      ($f429),a
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f35f
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      ($f42a),hl
        call    l9b21
        ld      l,c
        ld      h,b
        inc     hl
        ld      ($f351),hl
        ld      a,($f34b)
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        add     hl,hl
        ld      bc,$f141
        add     hl,bc
        ld      a,(hl)
        inc     hl
        ld      h,(hl)
        ld      l,a
        ld      ($f359),hl
l1819:  jp      lbe72
l181c:  rst     $30
        ld      l,$58
        rst     $08
        ld      a,($f140)
        cp      $02
        jr      nz,l182f                ; (+$08)
        ld      l,$28
        rst     $10
        call    l9a22
        jr      l1867                   ; (+$38)
l182f:  ld      a,($f140)
        cp      $01
        jr      nz,l183b                ; (+$05)
        ld      l,$4c
        rst     $10
        jr      l1867                   ; (+$2c)
l183b:  ld      l,$04
        call    lb11f
l1840:  ld      l,$42
        call    l767c
        ld      a,c
        or      a
        jr      z,l1840                 ; (-$09)
        ld      a,($f126)
        cp      $25
        jr      nz,l1857                ; (+$07)
        ld      a,$7f
        ld      ($f126),a
        jr      l1862                   ; (+$0b)
l1857:  ld      a,($f126)
        ld      ($e969),a
        ld      a,$45
        ld      ($f126),a
l1862:  ld      l,$04
        call    lb136
l1867:  jp      lbe72
        rst     $30
        ld      a,($e969)
        ld      ($f126),a
        sub     a
        ld      ($f34b),a
        ld      ($f116),a
        ld      a,($f140)
        cp      $03
        jr      nz,l1884                ; (+$05)
        ld      a,$01
        ld      ($f140),a
l1884:  ld      l,$09
        call    lb136
        ld      l,$72
        rst     $08
        sub     a
        ld      ($f125),a
        jp      lbe72
        rst     $30
l1894:  ld      hl,($f42a)
        push    hl
        ld      bc,($f0bf)
        add     hl,bc
        ld      c,l
        ld      b,h
        pop     hl
        call    lb91e
        ld      l,c
        ld      h,b
        ld      ($f0bf),hl
        ld      a,h
        or      l
        jr      z,l18c8                 ; (+$1c)
        ld      l,$81
        call    lba5c
        bit     0,c
        jr      z,l1894                 ; (-$21)
        ld      a,($f359)
        sub     $01
        ld      ($f359),a
        ld      a,($f35a)
        sbc     a,$00
        ld      ($f35a),a
        jp      lbe72
l18c8:  ld      hl,$0003
        ld      ($f0bf),hl
        jp      lbe72
        rst     $30
        ld      l,$58
        rst     $08
        ld      l,$14
        rst     $10
        ld      l,$7f
        rst     $10
        ld      hl,l0000
        push    hl
        ld      hl,$18f7
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l18ee                ; (+$04)
        ld      c,$01
        jr      l18f0                   ; (+$02)
l18ee:  ld      c,$00
l18f0:  ld      l,c
        call    l8851
        jp      lbe72
        rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        ld      l,$01
        call    l1a86
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1957                 ; (+$48)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    l226e
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1957                 ; (+$30)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    l1fda
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1957                 ; (+$18)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    l1f24
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l195c                ; (+$05)
l1957:  ld      c,$02
        jp      lbe84
l195c:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      c,(ix-$07)
        jp      lbe84
        jp      c,l6b1f
        inc     hl
        ld      l,(hl)
l1970:  ld      (l1f24),hl
        add     a,b
        jr      nz,l1970                ; (-$06)
        inc     hl
        ld      (l1fc2),iy
        ld      (bc),a
        ld      d,$19
        ld      e,d
        ld      a,(de)
        dec     sp
        ld      a,(de)
        add     hl,de
        ld      a,(de)
        ld      (bc),a
        nop     
        ld      (bc),a
        rst     $30
        add     hl,de
        or      (hl)
        add     hl,de
        or      c
        add     hl,de
        rst     $30
        ld      hl,$fff5
        add     hl,sp
        ld      sp,hl
        ld      l,$58
        rst     $08
        ld      a,($f127)
        ld      (ix-$0a),a
        ld      l,(ix-$0a)
        rst     $10
        ld      l,$00
        call    la3cd
        ld      (ix-$09),c
        ld      c,(ix-$09)
        ld      hl,$1984
        jp      lb8ed
l19b1:  ld      c,$02
        jp      lbe72
        ld      l,(ix-$0a)
        ld      a,l
        add     a,a
        ld      l,a
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$193f
        add     hl,bc
        ld      a,(hl)
        ld      (ix-$08),a
        inc     hl
        ld      a,(hl)
        ld      (ix-$07),a
l19cf:  ld      l,$7f
        rst     $10
        ld      hl,l0000
        push    hl
        ld      l,(ix-$08)
        ld      h,(ix-$07)
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l19e8                ; (+$04)
        ld      c,$01
        jr      l19ea                   ; (+$02)
l19e8:  ld      c,$00
l19ea:  ld      l,c
        call    l8851
        ld      (ix-$0b),c
        ld      c,(ix-$0b)
        jp      lbe72
        ld      l,(ix-$0a)
        ld      a,l
        add     a,a
        ld      l,a
        ld      c,a
        add     a,a
        sbc     a,a
        ld      b,a
        ld      l,c
        ld      h,b
        ld      bc,$1947
        add     hl,bc
        ld      a,(hl)
        ld      (ix-$08),a
        inc     hl
        ld      a,(hl)
        ld      (ix-$07),a
        ld      c,(ix-$0a)
        ld      hl,$197b
        jp      lb8ed
        ld      l,$54
        rst     $10
        ld      hl,$03f9
        push    hl
        ld      hl,$0441
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f18c
        call    l784c
        ld      a,c
        or      a
        jp      nz,l19cf
        jp      l19b1
        jp      l19cf
        ld      l,$55
        rst     $10
        ld      hl,$f0d4
        push    hl
        ld      hl,$03bd
        push    hl
        ld      l,$00
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f188
        call    l784c
        ld      a,c
        or      a
        jp      nz,l19cf
        jp      l19b1
        ld      l,$63
        rst     $10
        jp      l19cf
        rst     $30
        ld      l,$58
        rst     $08
        ld      l,$15
        rst     $10
        ld      l,$7f
        rst     $10
        ld      hl,l0000
        push    hl
        ld      hl,l1a86
        push    hl
        ld      a,($f140)
        cp      $03
        jr      nz,l1a7d                ; (+$04)
        ld      c,$01
        jr      l1a7f                   ; (+$02)
l1a7d:  ld      c,$00
l1a7f:  ld      l,c
        call    l8851
        jp      lbe72
l1a86:  rst     $20
        ld      hl,$fff7
        add     hl,sp
        ld      sp,hl
        ld      a,($f114)
        ld      (ix-$09),a
        ld      a,($f114)
        and     $f8
        ld      ($f114),a
        ld      l,$00
        call    l947f
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jp      z,l1b52
        ld      l,$04
        call    l8b1d
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jp      z,l1b52
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f347
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1ae6                 ; (+$17)
        ld      hl,$1e02
        push    hl
        ld      hl,$1e5e
        call    lb184
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1b01                ; (+$1e)
        jp      l1b52
l1ae6:  ld      a,$6c
        ld      ($f44d),a
        ld      a,(ix-$07)
        or      a
        jr      nz,l1b0c                ; (+$1b)
        ld      l,(ix-$09)
        ld      a,l
        and     $04
        ld      l,a
        ld      a,($f114)
        or      l
        ld      ($f114),a
        jr      l1b0c                   ; (+$0b)
l1b01:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        jr      l1ae6                   ; (-$26)
l1b0c:  call    l1b72
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1b52                 ; (+$39)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f19c
        push    hl
        ld      hl,$f0c1
        push    hl
        rst     $18
        pop     af
        ld      a,$6d
        ld      ($f44d),a
        ld      a,(ix-$07)
        or      a
        jr      nz,l1b45                ; (+$0e)
        ld      l,(ix-$09)
        ld      a,l
        and     $02
        ld      l,a
        ld      a,($f114)
        or      l
        ld      ($f114),a
l1b45:  call    l1b72
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1b5d                ; (+$0b)
l1b52:  ld      a,(ix-$09)
        ld      ($f114),a
        ld      c,$02
        jp      lbe84
l1b5d:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      a,(ix-$09)
        ld      ($f114),a
        ld      c,(ix-$07)
        jp      lbe84
l1b72:  rst     $30
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f448),a
        ld      ($f449),a
        ld      ($f44a),a
        ld      ($f44b),a
        call    l1bfa
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1be6                 ; (+$51)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f448
        push    hl
        ld      a,($f44d)
        cp      $6c
        jr      nz,l1bb2                ; (+$09)
        ld      hl,$043d
        ld      de,$f935
        rst     $38
        jr      l1bb9                   ; (+$07)
l1bb2:  ld      hl,$f0d4
        ld      de,$f935
        rst     $38
l1bb9:  ld      hl,$f935
        push    hl
        rst     $18
        pop     af
        call    l1bfa
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l1be6                 ; (+$1a)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      a,($f44d)
        ld      l,a
        call    l26b0
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1beb                ; (+$05)
l1be6:  ld      c,$02
        jp      lbe72
l1beb:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      c,(ix-$07)
        jp      lbe72
l1bfa:  rst     $30
        ld      hl,$fff6
        add     hl,sp
        ld      sp,hl
        ld      (ix-$09),$00
        ld      a,($f44d)
        cp      $6c
        jr      nz,l1c27                ; (+$1c)
        ld      hl,$f19c
        push    hl
        ld      hl,$f448
        push    hl
        rst     $18
        pop     af
        ld      l,$09
        call    l8b1d
        ld      (ix-$0a),c
        ld      a,(ix-$0a)
        cp      $02
        jr      nz,l1c43                ; (+$1f)
        jp      l1cca
l1c27:  ld      hl,$f198
        push    hl
        ld      hl,$f448
        push    hl
        rst     $18
        pop     af
        ld      l,$07
        call    l8b1d
        ld      (ix-$0a),c
        ld      a,(ix-$0a)
        cp      $02
        jr      nz,l1c56                ; (+$16)
        jp      l1cca
l1c43:  ld      a,(ix-$09)
        or      (ix-$0a)
        ld      (ix-$09),a
        ld      (ix-$08),$20
        ld      (ix-$07),$00
        jr      l1c6a                   ; (+$14)
l1c56:  ld      a,(ix-$09)
        or      (ix-$0a)
        ld      (ix-$09),a
        ld      a,($f0d9)
        ld      (ix-$08),a
        add     a,a
        sbc     a,a
        ld      (ix-$07),a
l1c6a:  ld      hl,$f442
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        pop     hl
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jp      z,l1ccf
        sub     a
        ld      ($f446),a
        ld      ($f447),a
l1c85:  ld      a,($f446)
        sub     (ix-$08)
        ld      a,($f447)
        sbc     a,(ix-$07)
        jp      p,l1ccf
        ld      hl,($f446)
        add     hl,hl
        add     hl,hl
        ld      bc,$033d
        add     hl,bc
        ld      de,$f935
        rst     $38
        ld      hl,$f935
        push    hl
        ld      hl,$f442
        push    hl
        call    lba8d
        pop     hl
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1cd5                 ; (+$1f)
        ld      hl,$1cea
        push    hl
        ld      hl,$1d58
        call    lb184
        ld      (ix-$0a),c
        ld      a,(ix-$0a)
        cp      $02
        jr      nz,l1cdf                ; (+$15)
l1cca:  ld      c,$02
        jp      lbe72
l1ccf:  ld      c,(ix-$09)
        jp      lbe72
l1cd5:  ld      hl,($f446)
        inc     hl
        ld      ($f446),hl
        jp      l1c85
l1cdf:  ld      a,(ix-$09)
        or      (ix-$0a)
        ld      (ix-$09),a
        jr      l1cd5                   ; (-$15)
        rst     $20
        ld      a,(ix+$04)
        or      a
        jp      z,l1d39
        ld      l,$71
        rst     $08
        ld      l,$58
        rst     $08
        ld      a,($f44d)
        ld      l,a
        rst     $10
        ld      l,$6a
        rst     $10
        ld      l,$60
        rst     $10
        ld      a,($f446)
        ld      ($f0c7),a
        ld      l,$01
        push    hl
        ld      l,$0a
        push    hl
        ld      hl,$f0c5
        call    l7fc5
        ld      l,$63
        rst     $10
        ld      hl,$f448
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1d28                 ; (+$04)
        ld      c,$6f
        jr      l1d2a                   ; (+$02)
l1d28:  ld      c,$6e
l1d2a:  ld      a,c
        ld      ($f44c),a
        ld      l,a
        rst     $10
        ld      l,$7d
        rst     $10
        ld      l,$72
        rst     $08
        call    lb8d0
l1d39:  ld      a,(ix+$04)
        or      a
        jr      z,l1d43                 ; (+$04)
        ld      c,$0a
        jr      l1d45                   ; (+$02)
l1d43:  ld      c,$10
l1d45:  ld      l,c
        call    l767c
        ld      a,c
        or      a
        jr      z,l1d39                 ; (-$14)
        ld      l,$7f
        push    hl
        ld      l,$ff
        call    l7f65
        jp      lbe84
        rst     $30
        ld      hl,$fff7
        add     hl,sp
        ld      sp,hl
        ld      (ix-$07),$00
        ld      a,($f44d)
        cp      $6c
        jr      nz,l1d6d                ; (+$04)
        ld      c,$09
        jr      l1d6f                   ; (+$02)
l1d6d:  ld      c,$07
l1d6f:  ld      l,c
        call    l8b1d
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1d82                ; (+$05)
        ld      c,$02
        jp      lbe72
l1d82:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,($f446)
        add     hl,hl
        add     hl,hl
        ld      bc,$033d
        add     hl,bc
        ld      de,$f935
        rst     $38
        ld      hl,$f935
        push    hl
        ld      hl,$f442
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        call    lba8d
        pop     hl
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1de6                 ; (+$34)
        ld      (ix-$07),$01
        ld      hl,$f448
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1dc6                 ; (+$04)
        ld      c,$6f
        jr      l1dc8                   ; (+$02)
l1dc6:  ld      c,$6e
l1dc8:  ld      (ix-$09),c
        ld      hl,$f44c
        ld      a,(ix-$09)
        cp      (hl)
        jr      z,l1dfc                 ; (+$28)
        ld      a,(ix-$09)
        ld      ($f44c),a
        ld      l,a
        push    hl
        ld      l,$fe
        call    l7f65
        call    lb8d0
        jr      l1dfc                   ; (+$16)
l1de6:  ld      a,($f44c)
        cp      $6b
        jr      z,l1dfc                 ; (+$0f)
        ld      a,$6b
        ld      ($f44c),a
        ld      l,a
        push    hl
        ld      l,$fe
        call    l7f65
        call    lb8d0
l1dfc:  ld      c,(ix-$07)
        jp      lbe72
        rst     $20
        ld      a,(ix+$04)
        or      a
        jp      z,l1e3f
        ld      l,$71
        rst     $08
        ld      l,$58
        rst     $08
        ld      l,$65
        rst     $10
        ld      a,$67
        ld      ($f44c),a
        ld      l,a
        rst     $10
        ld      l,$63
        rst     $10
        ld      l,$60
        rst     $10
        ld      hl,$f442
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        pop     af
        ld      l,$22
        push    hl
        ld      l,$02
        push    hl
        ld      hl,$f442
        call    l7fc5
        ld      l,$7d
        rst     $10
        ld      l,$72
        rst     $08
        call    lb8d0
l1e3f:  ld      a,(ix+$04)
        or      a
        jr      z,l1e49                 ; (+$04)
        ld      c,$0a
        jr      l1e4b                   ; (+$02)
l1e49:  ld      c,$10
l1e4b:  ld      l,c
        call    l767c
        ld      a,c
        or      a
        jr      z,l1e3f                 ; (-$14)
        ld      l,$7f
        push    hl
        ld      l,$ff
        call    l7f65
        jp      lbe84
        rst     $30
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        ld      l,$04
        call    l8b1d
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1e7b                ; (+$05)
        ld      c,$02
        jp      lbe72
l1e7b:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f347
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l1eb1                 ; (+$21)
        ld      a,(ix-$07)
        or      $01
        ld      (ix-$07),a
        ld      a,($f44c)
        cp      $67
        jp      z,l1eef
        ld      a,$67
        ld      ($f44c),a
        ld      l,a
        push    hl
        ld      l,$01
        call    l7f65
        call    lb8d0
        jr      l1eef                   ; (+$3e)
l1eb1:  ld      a,($f44c)
        cp      $6b
        jp      z,l1f1e
        ld      l,$71
        rst     $08
        ld      a,$6b
        ld      ($f44c),a
        ld      l,a
        push    hl
        ld      l,$01
        call    l7f65
        ld      l,$59
        rst     $08
        sub     a
        ld      ($f442),a
        ld      ($f443),a
        ld      ($f444),a
        ld      ($f445),a
        ld      l,$22
        push    hl
        ld      l,$02
        push    hl
        ld      hl,$f442
        call    l7fc5
        ld      l,$7f
        rst     $10
        ld      l,$72
        rst     $08
        call    lb8d0
        jr      l1f1e                   ; (+$2f)
l1eef:  ld      hl,$f442
        push    hl
        ld      hl,$f347
        push    hl
        call    lbad9
        jr      z,l1f1e                 ; (+$22)
        ld      l,$71
        rst     $08
        ld      l,$59
        rst     $08
        ld      hl,$f442
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        pop     af
        ld      l,$22
        push    hl
        ld      l,$02
        push    hl
        ld      hl,$f442
        call    l7fc5
        ld      l,$7f
        rst     $10
        ld      l,$72
        rst     $08
l1f1e:  ld      c,(ix-$07)
        jp      lbe72
l1f24:  rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f44e),a
        ld      ($f44f),a
l1f34:  ld      a,($f13e)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        ld      a,($f44e)
        sub     e
        ld      a,($f44f)
        sbc     a,d
        jp      p,l1f9a
        ld      hl,($f44e)
        push    hl
        ld      hl,$0012
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$e9ae
        add     hl,bc
        ld      ($f450),hl
        ld      bc,l0008
        add     hl,bc
        ld      a,(hl)
        cp      $01
        jp      nz,l1fa0
        ld      hl,$f139
        push    hl
        ld      hl,($f450)
        push    hl
        rst     $18
        pop     af
        ld      hl,$f121
        push    hl
        ld      hl,($f450)
        inc     hl
        inc     hl
        inc     hl
        inc     hl
        push    hl
        rst     $18
        pop     af
        ld      hl,$f188
        push    hl
        ld      hl,($f450)
        ld      bc,$000e
        add     hl,bc
        push    hl
        rst     $18
        pop     af
        ld      l,$01
        call    l1fc2
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l1faa                ; (+$12)
        jr      l1fbd                   ; (+$23)
l1f9a:  ld      c,(ix-$07)
        jp      lbe84
l1fa0:  ld      hl,($f44e)
        inc     hl
        ld      ($f44e),hl
        jp      l1f34
l1faa:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      nz,l1fa0                ; (-$1d)
l1fbd:  ld      c,$02
        jp      lbe84
l1fc2:  rst     $20
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        call    la466
        ld      hl,$f188
        call    l24a5
        ld      (ix-$07),c
        ld      c,(ix-$07)
        jp      lbe84
l1fda:  rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f453),a
        ld      ($f454),a
l1fea:  ld      a,($f13e)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        ld      a,($f453)
        sub     e
        ld      a,($f454)
        sbc     a,d
        jp      p,l2058
        ld      hl,($f453)
        push    hl
        ld      hl,$0012
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$e9ae
        add     hl,bc
        ld      (lf455),hl
        ld      bc,l0008
        add     hl,bc
        ld      a,(hl)
        cp      $03
        jr      nz,l205e                ; (+$46)
        ld      hl,$f139
        push    hl
        ld      hl,(lf455)
        push    hl
        rst     $18
        pop     af
        ld      hl,$f121
        push    hl
        ld      hl,(lf455)
        inc     hl
        inc     hl
        inc     hl
        inc     hl
        push    hl
        rst     $18
        pop     af
        ld      hl,(lf455)
        ld      bc,$000e
        add     hl,bc
        sub     a
        ld      ($f18c),a
        ld      ($f18d),a
        ld      a,(hl)
        ld      ($f18e),a
        inc     hl
        ld      a,(hl)
        ld      ($f18f),a
        ld      l,$01
        call    l2080
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l2068                ; (+$12)
        jr      l207b                   ; (+$23)
l2058:  ld      c,(ix-$07)
        jp      lbe84
l205e:  ld      hl,($f453)
        inc     hl
        ld      ($f453),hl
        jp      l1fea
l2068:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      nz,l205e                ; (-$1d)
l207b:  ld      c,$02
        jp      lbe84
l2080:  rst     $20
        push    af
        push    af
        push    af
        push    af
        call    la466
        ld      l,$01
        push    hl
        ld      hl,$f121
        push    hl
        ld      hl,$f139
        call    lacfa
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      z,l20c3                 ; (+$24)
        ld      hl,$f345
        ld      a,($f18e)
        cp      (hl)
        jr      nz,l20ad                ; (+$05)
        ld      a,($f18f)
        inc     hl
        cp      (hl)
l20ad:  jr      z,l20c8                 ; (+$19)
        ld      hl,l215c
        push    hl
        ld      hl,$20d9
        call    lb184
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l20ce                ; (+$0b)
l20c3:  ld      c,$02
        jp      lbe84
l20c8:  ld      c,(ix-$07)
        jp      lbe84
l20ce:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        jr      l20c8                   ; (-$11)
        rst     $30
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      l,$01
        push    hl
        ld      hl,$f121
        push    hl
        ld      hl,$f139
        call    lacfa
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      z,l2121                 ; (+$2b)
        ld      hl,$f18c
        push    hl
        ld      hl,$f343
        push    hl
        call    lbad9
        jr      z,l2127                 ; (+$24)
        ld      a,(ix-$07)
        or      $01
        ld      (ix-$07),a
        ld      a,($f452)
        cp      $67
        jr      z,l2121                 ; (+$0f)
        call    lb8d0
        ld      a,$67
        ld      ($f452),a
        ld      l,a
        push    hl
        ld      l,$06
        call    l7f65
l2121:  ld      c,(ix-$07)
        jp      lbe72
l2127:  ld      a,($f452)
        cp      $6b
        jr      z,l2121                 ; (-$0d)
        call    lb8d0
        ld      a,$6b
        ld      ($f452),a
        ld      l,a
        push    hl
        ld      l,$06
        call    l7f65
        jr      l2121                   ; (-$1e)
        ld      (bc),a
        nop     
        ld      bc,$220b
        ld      c,$22
        ld      a,(hl)
        ld      hl,$4e20
        ld      c,a
        ld      d,h
        jr      nz,l214e                ; (+$00)
l214e:  ld      d,e
        ld      c,c
        ld      b,a
        jr      nz,l21aa                ; (+$57)
        ld      b,c
        ld      d,e
        jr      nz,l2157                ; (+$00)
l2157:  ld      d,d
        ld      c,a
        ld      c,l
        jr      nz,l215c                ; (+$00)
l215c:  rst     $20
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      (ix-$07),$00
        ld      a,(ix+$04)
        or      a
        jr      z,l216f                 ; (+$03)
        call    lb8d0
l216f:  ld      l,$71
        rst     $08
        ld      l,$58
        rst     $08
        ld      c,(ix-$07)
        ld      hl,$213f
        jp      lb8ed
        ld      hl,l2157
        rst     $28
        ld      hl,$f18c
        push    hl
        ld      hl,$f343
        push    hl
        call    lbad9
        jr      z,l2193                 ; (+$04)
        ld      c,$67
        jr      l2195                   ; (+$02)
l2193:  ld      c,$6b
l2195:  ld      a,c
        ld      ($f452),a
        ld      l,a
        rst     $10
        ld      l,$63
        rst     $10
        ld      l,$76
        rst     $10
        ld      l,$60
        rst     $10
        ld      l,$04
        push    hl
        ld      l,$10
        push    hl
l21aa:  ld      hl,$f139
        call    l7fc5
        ld      l,$77
        rst     $10
        ld      l,$60
        rst     $10
        ld      l,$04
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f121
        call    l7fc5
        ld      a,(ix+$04)
        or      a
        jr      z,l21cc                 ; (+$04)
        ld      c,$7d
        jr      l21ce                   ; (+$02)
l21cc:  ld      c,$7f
l21ce:  ld      l,c
        rst     $10
        ld      l,$72
        rst     $08
        ld      l,$10
        call    lb11f
        ld      a,(ix+$04)
        or      a
        jr      z,l21e2                 ; (+$04)
        ld      c,$12
        jr      l21e4                   ; (+$02)
l21e2:  ld      c,$13
l21e4:  ld      l,c
        call    l7395
        ld      l,$10
        call    lb136
        ld      a,($f127)
        cp      $1b
        jr      z,l2204                 ; (+$10)
        ld      l,$7f
        push    hl
        ld      l,$ff
        call    l7f65
        call    lb8e6
        ld      c,$02
        jp      lbe84
l2204:  ld      (ix-$07),$01
        jp      l216f
        jp      l216f
        ld      hl,l214e
        rst     $28
        ld      l,$60
        rst     $10
        ld      l,$04
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f343
        call    l7fc5
        ld      hl,$f18c
        push    hl
        ld      hl,$f343
        push    hl
        call    lbad9
        jr      z,l2241                 ; (+$13)
        ld      hl,$2148
        rst     $28
        ld      l,$60
        rst     $10
        ld      l,$04
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f18c
        call    l7fc5
l2241:  ld      a,(ix+$04)
        or      a
        jr      z,l224a                 ; (+$03)
        ld      l,$7d
        rst     $10
l224a:  ld      l,$72
        rst     $08
        ld      a,(ix+$04)
        or      a
        jr      z,l2257                 ; (+$04)
        ld      c,$14
        jr      l2259                   ; (+$02)
l2257:  ld      c,$15
l2259:  ld      l,c
        call    l7395
        ld      a,($f127)
        cp      $1a
        jr      z,l2267                 ; (+$03)
        call    lb8e6
l2267:  ld      (ix-$07),$00
        jp      l216f
l226e:  rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f457),a
        ld      ($f458),a
l227e:  ld      a,($f13e)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        ld      a,($f457)
        sub     e
        ld      a,($f458)
        sbc     a,d
        jp      p,l22d5
        ld      hl,($f457)
        push    hl
        ld      hl,$0012
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$e9ae
        add     hl,bc
        ld      ($f459),hl
        ld      bc,l0008
        add     hl,bc
        ld      a,(hl)
        cp      $02
        jr      nz,l22db                ; (+$2f)
        ld      hl,$f139
        push    hl
        ld      hl,($f459)
        push    hl
        rst     $18
        pop     af
        ld      hl,$f121
        push    hl
        ld      hl,($f459)
        inc     hl
        inc     hl
        inc     hl
        inc     hl
        push    hl
        rst     $18
        pop     af
        ld      l,$01
        call    l22fd
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l22e5                ; (+$12)
        jr      l22f8                   ; (+$23)
l22d5:  ld      c,(ix-$07)
        jp      lbe84
l22db:  ld      hl,($f457)
        inc     hl
        ld      ($f457),hl
        jp      l227e
l22e5:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      nz,l22db                ; (-$1d)
l22f8:  ld      c,$02
        jp      lbe84
l22fd:  rst     $20
        push    af
        push    af
        push    af
        push    af
        call    la466
        ld      (ix-$07),$00
        ld      hl,$f0d4
        call    l24a5
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l235b                 ; (+$42)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      a,(ix-$07)
        or      a
        jr      nz,l2339                ; (+$11)
        ld      l,$7e
        call    l26b0
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l233f                ; (+$08)
        jr      l235b                   ; (+$22)
l2339:  ld      c,(ix-$07)
        jp      lbe84
l233f:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      a,(ix-$07)
        or      a
        jr      nz,l2339                ; (-$15)
        call    l2a88
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l2360                ; (+$05)
l235b:  ld      c,$02
        jp      lbe84
l2360:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        jr      l2339                   ; (-$32)
        rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        sub     a
        ld      ($f45b),a
        ld      ($f45c),a
l237b:  ld      a,($f13e)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        ld      a,($f45b)
        sub     e
        ld      a,($f45c)
        sbc     a,d
        jp      p,l23d2
        ld      hl,($f45b)
        push    hl
        ld      hl,$0012
        push    hl
        call    lba2d
        pop     hl
        ld      bc,$e9ae
        add     hl,bc
        ld      ($f45d),hl
        ld      bc,l0008
        add     hl,bc
        ld      a,(hl)
        cp      $02
        jr      nz,l23d8                ; (+$2f)
        ld      hl,$f139
        push    hl
        ld      hl,($f45d)
        push    hl
        rst     $18
        pop     af
        ld      hl,$f121
        push    hl
        ld      hl,($f45d)
        inc     hl
        inc     hl
        inc     hl
        inc     hl
        push    hl
        rst     $18
        pop     af
        ld      l,$01
        call    l23fa
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l23e2                ; (+$12)
        jr      l23f5                   ; (+$23)
l23d2:  ld      c,(ix-$07)
        jp      lbe84
l23d8:  ld      hl,($f45b)
        inc     hl
        ld      ($f45b),hl
        jp      l237b
l23e2:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      nz,l23d8                ; (-$1d)
l23f5:  ld      c,$02
        jp      lbe84
l23fa:  rst     $20
        push    af
        push    af
        push    af
        push    af
        call    la466
        ld      (ix-$07),$00
        ld      hl,$f0d4
        call    l24a5
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jp      z,l2494
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jp      z,l2494
        ld      a,(ix-$07)
        or      a
        jr      nz,l2442                ; (+$11)
        ld      l,$7e
        call    l26b0
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l2448                ; (+$08)
        jr      l2494                   ; (+$52)
l2442:  ld      c,(ix-$07)
        jp      lbe84
l2448:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      z,l2494                 ; (+$39)
        ld      a,(ix-$07)
        or      a
        jr      nz,l2442                ; (-$1f)
        call    l2f4f
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      z,l2494                 ; (+$26)
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      z,l2494                 ; (+$13)
        ld      a,(ix-$07)
        or      a
        jr      nz,l2442                ; (-$45)
        call    l325f
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l2499                ; (+$05)
l2494:  ld      c,$02
        jp      lbe84
l2499:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        jp      l2442
l24a5:  rst     $20
        push    af
        push    af
        push    af
        push    af
        ld      (ix-$07),$00
        ld      hl,$f469
        push    hl
        ld      l,(ix+$04)
        ld      h,(ix+$05)
        push    hl
        rst     $18
        pop     af
        ld      hl,$f463
        push    hl
        ld      hl,$f139
        push    hl
        rst     $18
        pop     af
l24c5:  ld      hl,$f19c
        push    hl
        ld      hl,$f463
        push    hl
        rst     $18
        pop     af
        ld      l,$0d
        call    l8b1d
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jp      z,l2541
        ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        ld      hl,$f347
        push    hl
        ld      hl,$f469
        push    hl
        call    lba8d
        pop     hl
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l2513                 ; (+$16)
        ld      hl,l2571
        push    hl
        ld      hl,$25e9
        call    lb184
        ld      (ix-$08),c
        ld      a,(ix-$08)
        cp      $02
        jr      nz,l2526                ; (+$15)
        jr      l2541                   ; (+$2e)
l2513:  ld      hl,$f463
        push    hl
        ld      hl,$f121
        push    hl
        call    lbad9
        jr      nz,l2531                ; (+$11)
        ld      c,(ix-$07)
        jp      lbe84
l2526:  ld      a,(ix-$07)
        or      (ix-$08)
        ld      (ix-$07),a
        jr      l2513                   ; (-$1e)
l2531:  ld      a,($f19e)
        or      a
        jr      nz,l2546                ; (+$0f)
        ld      l,$01
        call    lb2ce
        ld      a,c
        cp      $02
        jr      nz,l2546                ; (+$05)
l2541:  ld      c,$02
        jp      lbe84
l2546:  ld      hl,$f463
        push    hl
        ld      a,($f0b6)
        ld      ($f937),a
        add     a,a
        sbc     a,a
        ld      ($f938),a
        ld      ($f936),a
        ld      ($f935),a
        ld      hl,$f935
        push    hl
        call    lba62
        pop     af
        jp      l24c5
        jr      nz,l25aa                ; (+$42)
        ld      d,h
        ld      d,e
        jr      nz,l256c                ; (+$00)
l256c:  ld      d,d
        cpl     
        ld      d,a
        jr      nz,l2571                ; (+$00)
l2571:  rst     $20
        ld      a,(ix+$04)
        or      a
        jp      z,l25ca
        ld      l,$71
        rst     $08
        ld      l,$58
        rst     $08
        ld      hl,l256c
        rst     $28
        ld      a,$67
        ld      ($f467),a
        ld      l,a
        rst     $10
        ld      l,$63
        rst     $10
        ld      l,$76
        rst     $10
        ld      l,$04
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f463
        call    l7fc5
        ld      hl,$2566
        rst     $28
        ld      l,$60
        rst     $10
        ld      hl,$f45f
        push    hl
        ld      hl,$f347
l25aa:  push    hl
        rst     $18
        pop     af
        ld      a,($f0d8)
        add     a,a
        ld      l,a
        ld      a,l
        ld      ($f468),a
        ld      l,a
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f45f
        call    l7fc5
        ld      l,$7d
        rst     $10
        ld      l,$72
        rst     $08
        call    lb8d0
l25ca:  ld      a,(ix+$04)
        or      a
        jr      z,l25d4                 ; (+$04)
        ld      c,$0a
        jr      l25d6                   ; (+$02)
l25d4:  ld      c,$10
l25d6:  ld      l,c
        call    l767c
        ld      a,c
        or      a
        jr      z,l25ca                 ; (-$14)
        ld      l,$7f
        push    hl
        ld      l,$ff
        call    l7f65
        jp      lbe84
        rst     $30
        ld      hl,$fff9
        add     hl,sp
        ld      sp,hl
        ld      l,$0d
        call    l8b1d
        ld      (ix-$07),c
        ld      a,(ix-$07)
        cp      $02
        jr      z,l2634                 ; (+$36)
        ld      hl,$f347
        push    hl
        ld      hl,$f469
        push    hl
        call    lba8d
        pop     hl
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l263a                 ; (+$27)
        ld      a,(ix-$07)
        or      $01
        ld      (ix-$07),a
        ld      a,($f467)
        cp      $67
        jp      z,l267e
        call    lb8d0
        ld      a,$67
        ld      ($f467),a
        ld      l,a
        push    hl
        ld      l,$06
        call    l7f65
        jr      l267e                   ; (+$4a)
l2634:  ld      c,(ix-$07)
        jp      lbe72
l263a:  ld      a,(ix-$07)
        or      $00
        ld      (ix-$07),a
        ld      a,($f467)
        cp      $6b
        jr      z,l2634                 ; (-$15)
        call    lb8d0
        ld      l,$71
        rst     $08
        ld      a,$6b
        ld      ($f467),a
        ld      l,a
        push    hl
        ld      l,$06
        call    l7f65
        sub     a
        ld      ($f45f),a
        ld      ($f460),a
        ld      ($f461),a
        ld      ($f462),a
        ld      l,$59
        rst     $08
        ld      a,($f468)
        ld      l,a
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f45f
        call    l7fc5
        ld      l,$72
        rst     $08
        jr      l2634                   ; (-$4a)
l267e:  ld      hl,$f347
        push    hl
        ld      hl,$f45f
        push    hl
        call    lbad9
        jp      z,l2634
        ld      l,$71
        rst     $08
        ld      hl,$f45f
        push    hl
        ld      hl,$f347
        push    hl
        rst     $18
        pop     af
        ld      l,$59
        rst     $08
        ld      a,($f468)
        ld      l,a
        push    hl
        ld      l,$10
        push    hl
        ld      hl,$f45f
        call    l7fc5
        ld      l,$72
        rst     $08
        jp      l2634
l26b0:  rst     $20
        ld      hl,$fff2
        add     hl,sp
        ld      sp,hl
        ld      a,(ix+$04)
        ld      ($f47e),a
        ld      (ix-$0d),$00
        ld      a,($f47e)
        cp      $6c
        jr      nz,l26d7                ; (+$10)
        ld      hl,$f471
        push    hl
        ld      hl,$043d
        push    hl
        rst     $18
        pop     af
        ld      (ix-$07),$1f
        jr      l26ea                   ; (+$13)
l26d7:  ld      hl,$f471
        push    hl
        ld      hl,$f0d4
        push    hl
        rst     $18
        pop     af
        ld      a,($f0d9)
        add     a,$ff
        ld      l,a
        ld      (ix-$07),l
l26ea:  ld      hl,$f19c
        push    hl
        ld      a,($f47e)
        cp      $7e
        jr      nz,l26fe                ; (+$09)
        ld      hl,$f139
        ld      de,$f935
        rst     $38
        jr      l2705                   ; (+$07)
l26fe:  ld      hl,$f0c1
        ld      de,$f935
        rst     $38
l2705:  ld      hl,$f935
        push    hl
        rst     $18
        pop     af
        sub     a
        ld      (ix-$0c),a
        ld      (ix-$0b),a
        ld      (ix-$0a),a
        ld      (ix-$09),a
        ld      ($f475),a
        ld      ($f476),a
l271e:  ld      a,(ix-$07)
        ld      e,a
        add     a,a
        sbc     a,a
        ld      d,a
        ld      a,($f475)
        sub     e
        ld      a,($f476)
        sbc     a,d
        jp      p,l2740
        call    l28ef
        ld      (ix-$0e),c
        ld      a,(ix-$0e)
        cp      $02
        jr      nz,l274f                ; (+$12)
        jp      l2827
l2740:  ld      c,(ix-$0d)
        jp      lbe84
l2746:  ld      hl,($f475)
        inc     hl
        ld      ($f475),hl
        jr      l271e                   ; (-$31)
l274f:  ld      a,(ix-$0d)
        or      (ix-$0e)
        ld      (ix-$0d),a
        ld      hl,$f46d
        ld      a,(hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        inc     hl
        or      (hl)
        jr      z,l2746                 ; (-$1e)
        ld      a,(ix-$07)
        ld      ($f47c),a
        add     a,a
        sbc     a,a
        ld      ($f47d),a
l276f:  ld      hl,$f475
       