; Integer divides A:BC by DE ; Result in A:BC, remainder in HL ; Clobbers F, IYH ld hl,$0000 ld iyh,24 -: sll c rl b rla adc hl,hl sbc hl,de jr nc,+ add hl,de dec c +: dec iyh jp nz,-