PILA SEGMENT PARA PUBLIC 'PILA'
DB 64H DUP(00H)
PILA ENDS
DATOS SEGMENT PARA PUBLIC 'DATOS'
SALUDO DB 'HOLA MUNDO' ,'$';
DATOS ENDS
CODIGO SEGMENT PARA PUBLIC 'CODIGO'
ASSUME CS:CODIGO,DS:DATOS,SS:PILA
ORG 100H
PRINCIPAL PROC NEAR
CALL MENSAJE
INT 20H
PRINCIPAL ENDP
MENSAJE PROC NEAR
MOV AH, 09H
LEA DX, SALUDO
INT 21H
RET
MENSAJE ENDP
CODIGO ENDS
END