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