MSEG SEGMENT 'CODE'
     ASSUME CS:MSEG

PUBLIC UPB
PUBLIC UPD

UPB  PROC FAR
     MOV  AH,2
     MOV  DL,'B'
     INT  21h
     CALL CRLF
     RET
UPB  ENDP

UPD  PROC FAR
     MOV  AH,2
     MOV  DL,'D'
     INT  21h
     CALL CRLF
     RET
UPD  ENDP

CRLF PROC
     MOV  AH,2
     MOV  DL,13
     INT  21h
     MOV  DL,10
     INT  21h
     RET
CRLF ENDP

MSEG ENDS

     END