PILA SEGMENT PARA STACK "STACK"
   DB 200 DUP (0) 
PILA ENDS
;---------------------------------------------------

DATOS SEGMENT PARA "DATA"
   uno DB "Ingresa el primer numero ","$" 
   dos DB 13,10, "ingresa el segundo numero: ","$"
   PRIMER DB 15 DUP (0)
   SEGUN DB 15 DUP (0)
   resp DB 15 DUP (0)

DATOS ENDS ; cierre del segmento
;---------------------------------------------------

CODIGO SEGMENT PARA "CODE"  
EMPIEZA PROC FAR
   ASSUME CS: CODIGO, DS: DATOS, SS: PILA    
   MOV AX, DATOS 
   MOV DS, AX 
   MOV AH, 0FH 
   INT 10H 
   MOV AH, 00H 
   INT 10H  

  ;CALL PREGUNTA

     EMPIEZA ENDP

  PREGUNTA PROC NEAR
  

   MOV DX,OFFSET uno 
   MOV AH,9 
   INT 21H

   MOV AH,0AH
   MOV DX,OFFSET primer
   MOV primer[0],15
   INT 21H

   MOV DX,OFFSET dos 
   MOV AH,9 
   INT 21H 
   
    MOV AH,0AH
   MOV DX,OFFSET segun
   MOV segun[0],15
   INT 21H
  

   
   MOV AL, primer
   ADD AL, segun   



   MOV  AH,09H
   MOV DX, OFFSET resp
   MOV  resp[0], AL   
   INT 21H



     
     PREGUNTA ENDP 

   
CODIGO ENDS ; cierra programa
 END EMPIEZA