mx %00 -------------------------- _Divide -------------------------- stx Div1 sty Div2 stz Result ldx #16 lda #0 clc ]Loop rol Result dex bmi :End asl Div1 rol cmp Div2 bcc ]Loop sbc Div2 sec bra ]Loop :End sta Remain rts Result ds 2 Remain ds 2 Div1 ds 2 Div2 ds 2