domingo, 10 de febrero de 2019

1. Programa que resta dos números 2.(vídeo)

Programa que resta dos números 


Código:

org 100h
.model small
.stack 64  
        ;declaracion de datos
.data
    n1 db 0
    n2 db 0
    resta db 0
    msg1 db "Dame el primer valor:",'$'
    msg2 db 10,13,"Dame el segundo valor:",'$'
    msg3 db 10,13,"Resta=",'$'
        ;declaracion de codigo   
.code
    begin proc far ;Defino un procedimiento
        ;direccionamos al segmentos 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 numero
        mov n1,al  
        
        ;solicitamos el segundo digio
        mov ah,09
        lea dx,msg2
        int 21h
        ;se lee el segundo valor
        mov ah,01
        int 21h
        sub al,30h   ;convierte el caracter en numero
        mov n2,al 
        
        ;operacion
        mov al,n1
        sub al,n2  ;resta
        add al,30h;convierto a caracter
        mov resta,al 
        mov ah,09
        lea dx,msg3
        int 21h
        
        ; se imprime el caracter con el servicio 02 de la interrupcion 21h
        mov ah,02
        mov dl,resta
        int 21h
        mov ah,4ch  ;Devuelve el control al equipo
        int 21h
        Begin endp ;especifico el termino del procedimiento
        end      

ret



Resultado:


No hay comentarios:

Publicar un comentario

3. Colores Modificado 9

Modificación del programa # 9 " Colores " Por mi compañero Ambrocio isaias Laureano CR EQU 13 ;Declaro retorno de carro LF...