Calculadora

Calculadora Que permite realizar Operaciones Básicas de Las (Sumar, RESTAR, dividir Multiplicar y) Números de Con 8 dígitos, utilización Procedimientos párr Reducir El Código y El Tamaño delPrograma.
; Este Programa es Una Calculadora Con Las Operaciones basicas
; Suma, Resta, divicion y múltiples, utilización «registros de 32 bits
; Los extendidos y PUEDE HACER Operaciones Con 8 digitos
.Modelo diminuto
.apilar
.datos
numstr db 8 dup ("0"),'$'
numstr2 db '$'
numero dd 0
posición dd 10000000,1000000,100000,10000,1000,100,10,1
 
opc1 db "1 .- Sumar 2»,10,13,"$"
opc2db "2 .- RESTAR 2»,10,13,"$"
opc3 db "3 .- Mul. 2»,10,13,"$"
opc4 db "4 .- Div. 2»,10,13,"$"
opc5 db "5 .- Salir",10,13,"$"
opc6 db "Elige Una opc => $"
sal db 10,13,"$"
num1 db "N º 1 =>$"
num2 db "N º 2 => $"
res db "$ Resultados por =>"
residentes db "$ Residuo =>"
 
.386
.código
.inicio
clear_cad proto c, Cad_dir:ptr byteDe vehículos:byte, Cuenta:byte
escribir protoc, Dir_cad:ptr byte
writec proto cDe vehículos:byte
 
jmp Repite
 
suma: ; Dos Sumar numeros
; Mensaje del valor de imprimación
invocar escribir, addr sal
invocar escribir, addr num1 
llamada leer ; Numero sin lee
mov EBX, Numero ; Al muevo un bl
 
; Mensaje del Segundo valor
invocar escribir, addr sal
invocar escribir, addr num2
 
llamada leer ; Numero Otrolee
añadir EBX, Numero ; Sumo bx + numero 2
mov numero,EBX ; Respaldo
 
; Mensaje del los resultados por
invocar escribir, addr sal
invocar escribir, addr res
 
llamada a & ;Muestra los resultados por El
 
llamada readc ; Espero una Tecla Que pecione
 
jmp Repite
 
 
Resta: ; Dos numeros RESTAR
invocar escribir, addr sal
invocar escribir, addr num1 ; Mensajedel valor de imprimación
 
llamada leer ; Numero sin lee
mov EBX, Numero ; Al muevo un bl
 
invocar escribir, addr sal
invocar escribir, addr num2 ; Mensaje del Segundo valor
 ...