DATA       SEGMENT
BUF        DB       13H,1AH,27H,39H
MAS        DW       ?
DATA       ENDS

STACK1     SEGMENT PARA STACK 
STACK      DW       20H DUP(?)
STACK1     ENDS

CODE       SEGMENT
           ASSUME   CS:CODE,DS:DATA,SS:STACK1

main:   
        call decbin
        call Clrf
        MOV AX,4C00H
        INT 21H

decbin:    
        mov SI,0
        mov CH,4h
        
A:        MOV CL,4H
         LEA BX,buf               
        MOV AX,[BX]
          ROL AX,CL
          MOV BX,OFFSET BUF
          MOV [BX],AX
          AND AL,0FH
          CMP AL,0AH
          JL B
          ADD AL,7

B:        ADD AL,30
          MOV BX,OFFSET MAS
          MOV AL,[BX]  
          CALL printit
        
 
        
printit:mov dl,al
        mov ah,02
        int 21h
        dec ch                          
        jnz A
        
Clrf:   mov  dl,0dh
        mov ah,02h
        int 21h
        mov dl,0ah
        int 21h
        
        ret
CODE ENDS
END MAIN



哪里错了