Subroutine ee17

ee17 7d 00 ba    tst (0x00BA)
ee1a 26 06       bne [0xEE22]
ee1c 4f          clra
ee1d 5f          clrb
ee1e dd 21       std (0x0021)
ee20 97 1a       staa (0x001A) ; VSS2
ee22 13 38 01 59 brclr (0x0038), 0x01, [0xEE7F]		Branch Target from ee1a
ee26 15 38 01    bclr (0x0038), 0x01
ee29 7d 00 ba    tst (0x00BA)
ee2c 27 4c       beq [0xEE7A]
ee2e 0f          sei
ee2f 96 36       ldaa (0x0036)
ee31 97 c8       staa (0x00C8)
ee33 dc 34       ldd (0x0034)
ee35 0e          cli
ee36 ce 00 02    ldx 0x0002
ee39 78 00 c8    asl (0x00C8)		Branch Target from ee41
ee3c 59          rolb
ee3d 49          rola
ee3e 25 05       bcs [0xEE45]
ee40 09          dex
ee41 26 f6       bne [0xEE39]
ee43 20 03       bra [0xEE48]
ee45 cc ff ff    ldd 0xFFFF		Branch Target from ee3e
ee48 dd c7       std (0x00C7)		Branch Target from ee43
ee4a 8f          xgdx
ee4b bc c0 12    cpx (0xC012)
ee4e 23 2f       bls [0xEE7F]
ee50 fc c0 12    ldd (0xC012)
ee53 03          fdiv
ee54 df 21       stx (0x0021)
ee56 f3 c0 14    addd (0xC014)
ee59 de c7       ldx (0x00C7)
ee5b 02          idiv
ee5c 8f          xgdx
ee5d d3 21       addd (0x0021)
ee5f 05          asld
ee60 dd 21       std (0x0021)
ee62 fc c0 16    ldd (0xC016)
ee65 de c7       ldx (0x00C7)
ee67 02          idiv
ee68 8f          xgdx
ee69 05          asld
ee6a 4d          tsta
ee6b 27 05       beq [0xEE72]
ee6d c6 ff       ldab 0xFF
ee6f 14 39 10    bset (0x0039), 0x10
ee72 db 1a       addb (0x001A)		Branch Target from ee6b ; VSS2
ee74 56          rorb
ee75 d7 1a       stab (0x001A) ; VSS2
ee77 14 39 08    bset (0x0039), 0x08
ee7a b6 c0 18    ldaa (0xC018)		Branch Target from ee2c
ee7d 97 ba       staa (0x00BA)
ee7f 39          rts		Branch Target from ee22, ee4e