BCDE_Times_A

BCDE_Times_A:
;Inputs: BC:DE,A
;Outputs: A:HL:IX is the 40-bit product, BC,DE unaffected
;503cc~831cc
;667cc average
;29 bytes
    ld ix,0
    ld hl,0
    call +_
_:
    call +_
_:
    call +_
_:
    add ix,ix \ adc hl,hl \ rla \ ret nc
    add ix,de \ adc hl,bc \ adc a,0
    ret