Programa 1 -Hola Mundo-

CR EQU 13
LF EQU 0Ah

DATOS SEGMENT
         MENSAJE DB CR, LF, 'Hola mundo'
DATOS ENDS

PILA SEGMENT STACK
         DB 64 DUP( 'PILA' )
PILA ENDS

CODIGO SEGMENT
         HM PROC FAR
         ASSUME CS: CODIGO, DS:DATOS,SS:PILA

         MOV AX, DATOS
         MOV DS, AX
         LEA DX, MENSAJE

         MOV AH, 9
         INT 21H

         HM END P

CODIGO ENDS
END HM