Programa 2 -Uso de Constantes-

CR EQU 13
LF EQU 10
IMPRIMIR EQU 9
FIN EQU 4C00H
DOS EQU 21H

DATOS SEGMENT
          TEXTO DB 'EJEMPLO DEL USO DE CONSTANTES' ,CR, LF, 'S'

DATOS ENDS

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

CODIGO SEGMENT
            ASSUME CS:CODIGO, DS:DATOS, SS:PILA
            INICIO: MOV AX, DATOS
                           MOV DS, AX
                           MOV DX, OFFSET TEXTO
                           MOV AH, IMPRIMIR
                           INT DOS
                           MOV AX, FIN
                           INT DOS

              CODIGO ENDS
              END INICIO