Practica 8 emmu8086 RESTA(11-02-19)

CODIGO

.model small
.stack 64
.data

  n1 db 0
  n2 db 0
  RESTA db 0
  msg1 db "Dame el valor:",'$'
  msg2 db 10,13,"Dame el segundo valor:",'$'
  msg3 db 10,13,"RESTA=",'$'
.code
  Begin proc far
    ;direccionamos al segmento de datos
    mov ax,@data
    mov ds,ax
  
    ;solicitamos el primer digito
    mov ah,09
    lea dx,msg1
    int 21h
    ;se lee el primer valor
    mov ah,01
    int 21h
    sub al,30h ;convierte el caracter en un numero
    mov n1,al
  
    ;Solicitamos el segundo digito
    mov ah,09
    lea dx,msg2
    int 21h
    mov ah,01
    int 21h
    sub al, 30h;convierte el caracter en numero
    mov n2,al
   
    ;operacion
    mov al,n1
    sub al,n2
    add al,30h;convierte en caracter
    mov resta,al
   
    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,resta
    int 21h
    mov ah,4ch
    int 21h
    Begin endp
  end
  
  
    mov ah,09
    lea

EJECUCION