接上:
decibin    proc    near
    mov     bx,0
newchar:    
      mov    ah,1
    int    21h
    sub    al,30h
    jl    exit1
    cmp    al,9d
    jg    exit1
    cbw
    xchg    ax,bx
    mov    cx,10d
    mul    cx
    xchg    ax,bx
    add    bx,ax
    jmp    newchar
exit1:    ret
decibin    endp

binidec    proc    near    
    push    bx
    push    cx
    push    si
    push    di
    mov    flag,0
    mov    cx,5
    lea    si,constant

dec_div:    mov    ax,bx
        mov    dx,0
        div    word    ptr[si]
        mov    bx,dx
        mov    dl,al

        cmp    flag,0
        jnz    print1
        cmp    dl,0
        je    skip
        mov    flag,1
print1:    add    dl,30h
    mov    ah,02h
    int    21h

skip:    add    si,2
    loop    dec_div
    pop    di    
    pop    si
    pop    cx
    pop    bx
    ret
binidec    endp

crlf    proc    near    
    mov    dl,0ah
    mov    ah,02h
    int    21h

    mov    dl,0dh
    mov    ah,02h
    int     21h
    ret
crlf    endp    
    

    
    
;在这设计子程序
prognam     ends
    end    main

给给意见
 本人QQ：417245670