aFC9DAC: MOVE.L $0000293E,A0
aFC9DB2: MOVE.W  $0002(A0),D0
aFC9DB6: SUBQ.W  #1,D0
aFC9DB8: MOVEA.L $00002946,A0
aFC9DBE LEA     $0000167A,A1
aFC9DC4 MOVE.W  #$0000,$000025BE
aFC9DCC MOVE.W  $0006(A0),D1
aFC9DD0 MOVE.W  $0002(A0),D2
aFC9DD4 SUB.W   D2,D1
aFC9DD6 BEQ.S   $00FC9E0E
aFC9DD8 MOVE.W  $00002962,D3
aFC9DDE MOVE.W  D3,D4
aFC9DE0 SUB.W   D2,D4
aFC9DE2 SUB.W   $0006(A0),D3
aFC9DE6 MOVE.W  D4,D2
aFC9DE8 EOR.W   D3,D2
aFC9DEA BPL.S   $00FC9E0E
aFC9DEC MOVE.W  $0004(A0),D2
aFC9DF0 SUB.W   $0000(A0),D2
aFC9DF4 ASL.W   #1,D2
aFC9DF6 MULS    D2,D4
aFC9DF8 DIVS    D1,D4
aFC9DFA BMI     $00FC9EAC
aFC9DFE ADDQ.W  #1,D4
aFC9E00 ASR.W   #1,D4
aFC9E02 ADD.W   $0000(A0),D4
aFC9E06 MOVE.W  D4,(A1)+
aFC9E08 ADDQ.W  #1,$000025BE
aFC9E0E LEA     $0004(A0),A0
aFC9E12 DBRA    D0,$00FC9DCC
aFC9E16 MOVE.W  $000025BE,D0
aFC9E1C BNE.S   $00FC9E20
aFC9E1E RTS
                           
aFC9E20 LEA     $0000167A,A0
aFC9E26 BSR     $00FC9EB8
aFC9E2A MOVE.W  $000025BE,D0
aFC9E30 ASR.W   #1,D0
aFC9E32 SUBQ.W  #1,D0
aFC9E34 TST.W   $00002970
aFC9E3A BNE.S   $00FC9E5A
aFC9E3C MOVE.W  (A1)+,$00002960
aFC9E42 MOVE.W  (A1)+,$00002964
aFC9E48 MOVE.W  D0,-(A7)
aFC9E4A MOVE.L  A1,-(A7)
aFC9E4C BSR     $00FCA2DE
aFC9E50 MOVEA.L (A7)+,A1
aFC9E52 MOVE.W  (A7)+,D0
aFC9E54 DBRA    D0,$00FC9E3C
aFC9E58 RTS
                           
aFC9E5A MOVE.W  (A1)+,$00002960
aFC9E60 MOVE.W  (A1)+,$00002964
aFC9E66 MOVE.W  $00002972,D1
aFC9E6C MOVE.W  $00002960,D2
aFC9E72 MOVE.W  $00002964,D3
aFC9E78 CMP.W   D1,D2
aFC9E7A BGE.S   $00FC9E86
aFC9E7C CMP.W   D1,D3
aFC9E7E BLT.S   $00FC9EA6
aFC9E80 MOVE.W  D1,$00002960
aFC9E86 MOVE.W  $00002976,D1
aFC9E8C CMP.W   D1,D3
aFC9E8E BLE.S   $00FC9E9A
aFC9E90 CMP.W   D1,D2
aFC9E92 BGT.S   $00FC9EA6
aFC9E94 MOVE.W  D1,$00002964
aFC9E9A MOVE.W  D0,-(A7)
aFC9E9C MOVE.L  A1,-(A7)
aFC9E9E BSR     $00FCA2DE
aFC9EA2 MOVEA.L (A7)+,A1
aFC9EA4 MOVE.W  (A7)+,D0
aFC9EA6 DBRA    D0,$00FC9E5A
aFC9EAA RTS
                           
aFC9EAC NEG.W   D4
aFC9EAE ADDQ.W  #1,D4
aFC9EB0 ASR.W   #1,D4
aFC9EB2 NEG.W   D4
aFC9EB4 BRA     $00FC9E02
aFC9EB8 TST.W   D0
aFC9EBA BEQ.S   $00FC9EDE
aFC9EBC SUBQ.W  #1,D0
aFC9EBE BEQ.S   $00FC9EDE
aFC9EC0 SUBQ.W  #1,D0
aFC9EC2 MOVE.W  D0,D1
aFC9EC4 MOVEA.L A0,A1
aFC9EC6 MOVE.W  D1,D0
aFC9EC8 MOVEA.L A1,A0
aFC9ECA MOVE.W  (A0)+,D2
aFC9ECC CMP.W   (A0),D2
aFC9ECE BLE.S   $00FC9ED6
aFC9ED0 MOVE.W  (A0),$FFFE(A0)
aFC9ED4 MOVE.W  D2,(A0)
aFC9ED6 DBRA    D0,$00FC9ECA
aFC9EDA DBRA    D1,$00FC9EC6
aFC9EDE RTS
                           
aFC9EE0 MOVEQ   #$01,D1
aFC9EE2 MOVE.W  $0006(A7),D0
aFC9EE6 MULS    $0004(A7),D0
aFC9EEA BPL.S   $00FC9EEE
aFC9EEC NEG.W   D1
aFC9EEE MOVE.W  $0008(A7),D2
aFC9EF2 DIVS    D2,D0
aFC9EF4 AND.W   D2,D2
                 
