Numeros del 1 al 5

Esta es una vista previa del archivo. Inicie sesión para ver el archivo original

pila segment 
 db 64 dup(?) 
pila ends 
datos segment
 msg db ,10,13,'Ingrese un numero: $' 
datos ends 
codigo segment
assume ss:pila,ds:datos,cs:codigo
inicio: mov ax,datos
 mov ds,ax 
 
 mov cx,3 ;limite de numeros a ingresar
 
leer: mov ah,09
 lea dx,msg ;pedimos un numero
 int 21h
 
 mov ah,07 ;ingresamos numero a AL sin mostrarlo
 int 21h 
 
 mov dl,al ;movemos el valor para mostrarlo cuando se requiera
 
 cmp dl,48 ;comparamos con 0
 je iguales
 cmp dl,54 ;comparamos con 6
 je iguales
 cmp dl,55 ;comparamos con 7
 je iguales
 cmp dl,56 ;comparamos con 8
 je iguales
 cmp dl,57 ;comparamos con 9
 je iguales
 
 cmp dl,5 ;numeros admitidos
 jb menores 
 
menores:
 mov ah,02 ;mostramos el numero aceptado
 int 21h 
 
 loop leer
 
iguales:
 add cx,01 ;agregamos nuevos intentos al contador
 
 loop leer 
 
 mov ah,4ch ;finaliza el proceso de ejecucion
 int 21h 
 
codigo ends 
end inicio