Деление 32 разрядных чисел с использованием 16 разрядных регистров

TITLE TestCom
 
CODESG SEGMENT PARA 'Code'
 
ASSUME  CS:COOESG,DS:CODESG,SS:CODESG.ES:CODESG
ORG 100H        
start: 
JMP MAIN    
 buf db 10 dup(0) ; ????? ????? 10 ???? ??????????? 0 
VAR_A   DW  60001
VAR_B   DW  60000
VAR_C   DW  60000
VAR_D   DW  ?  
DOP_A   DW  0
DOP_C   DW  0  
 
 
MAIN PROC NEAR         ;(a-1)*2/(c*2+b)
 
             
           ;  
;            MOV AH,01h
;            INT 21h
;            SUB al,30h 
;            XOR ah,ah
      
       ;     MOV VAR_B, AX
                  
            MOV AX, VAR_A 
            SUB AX, 1
            MOV CX, 2
            MUL CX  
            
            MOV DOP_A, DX  
            
            MOV DX, 0 
            
            MOV CX , AX  
                         
                         
            MOV AX, VAR_C
            MOV BX , 2
            MUL BX   
            
            MOV DOP_C, DX     ;;;;   
            MOV DX, 0 
            
            
            ADD AX , VAR_B       
            ADC DX , 0
              
              
            ADD DOP_C, DX
           
            MOV DX, 0
              
            MOV BX , AX
            MOV AX , CX
            
              
            MOV DX, DOP_A    
            
                 
           ; MOV AX, DOP_C
            
            DIV BX   
 
;RET
 
 
MAIN ENDP 
 
 outint  proc    near 
        push    cx 
        push    dx 
        push    bx 
        push    ax 
; I?iaa?yai ?enei ia ciae. 
        test    ax, ax 
        jns     short @oi1 
; Anee iii io?eoaoaeuiia, auaaaai ieion e inoaaei aai iiaoeu. 
        mov     ah, 02h 
        mov     dl, '-' 
        int     21h 
        pop     ax 
        push    ax 
        neg     ax 
; Eiee?anoai oeo? aoaai aa??aou a CX. 
@oi1:   xor     cx, cx 
        mov     bx, 10 
@oi2:   xor     dx, dx 
        div     bx 
; Aaeei ?enei ia aanyou. A inoaoea iieo?aaony iineaaiyy oeo?a. 
; N?aco auaiaeou a? iaeucy, iiyoiio nio?aiei a? a noyea. 
        push    dx 
        inc     cx 
; A n ?anoiui iiaoi?yai oi ?a naiia, ioaaeyy io iaai i?a?aaio? 
; oeo?o ni?aaa, iiea ia inoaiaony iieu, ?oi cia?eo, ?oi aaeuoa 
; neaaa oieuei ioee. 
        test    ax, ax 
        jnz     short @oi2 
; Oaia?u i?enooiei e auaiao. 
        mov     ah, 02h 
@oi3:   pop     dx 
 
        add     dl, 30h 
        int     21h 
 
        loop    @oi3 
        pop     ax 
        pop     bx 
        pop     dx 
        pop     cx 
        ret 
outint  endp 
 
 
CODESG ENDS
 
END BEGIN