jueves, 7 de febrero de 2019

Practica SUMA 07/02/2019


.model small
.stack 64
.data
  n1 db 0
  n2 db 0
  suma db 0
  msg1 db  " Dame el primer valor: ","$"
  msg2 db   " Dame el segundo valor: ","$"
  msg3 db "  Suma = ", "$"
.code
  begin proc far
    ;direccionamos al segmento de datos 
    mov ax,@data
    mov ds,ax
    
    ;Desplegar el primer mensaje
    mov ah,09   
    lea dx,msg1
    int 21h   
    
    
    ;Se lee el primer caracter
    mov ah,01
    int 21h 
    
    
    ;Convierte el caracter en numero  
    sub al,30h
    mov n1,al
    
    ;Solicitamos el segundo digito
    mov ah,09
    lea dx,msg2
    int 21h
    
    ;Esperando el primer caracter
    mov ah,01
    int 21h 
       
    ; Convierte el caracter en numero   
    sub al,30h
    mov n2,al 
    
    ;Operacion
    mov al,n1
    add al,n2
    add al,30h
    
    ;Convierte a caracter
    mov suma,al
    
    ;Desplegar el mensaje 3
    mov ah,09
    lea dx,msg3
    int 21h
    
    ;Se imprime el caracter con el servicio 02 de la int 21h
    mov ah,02
    mov dl, suma
    int 21h
    
    ;Cerrando el programa
    mov ah,4ch
    int 21h
    Begin endp
    end
    

No hay comentarios:

Publicar un comentario