Tengo este programa, es para calcular el promedio de n números ingresados por el usuario,
Corre todo bien hasta el momento de ingresar los datos, nunca sale del ciclo en el que se encuentra.
Este es el código:
.model small
.stack 64
.data
;.........................................
VAL1 DB ?
msj1 DB 0AH,0DH, Cuantos numeros deseas introducir? : , $
msj2 DB 0AH,0DH, Numero: , $
msj3 DB 0AH,0DH, Promedio: , $
buffer DB 3,4 DUP(?)
;.........................................
.code
empezar proc far
mov ax,@data
mov ds,ax
mov es,ax
LEA DX,msj1
MOV AH,09H
INT 21H
MOV AH,0AH
INT 21H
SUB AL,30H
MOV CL,AL
MOV BL,AL
MOV AL,00
MOV VAL1,AL
proc1:
LEA DX,msj2
MOV AH,09H
INT 21H
MOV AH,0AH
LEA DX,buffer
INT 21H
SUB AL,30H
ADD AL,VAL1
MOV VAL1,AL
LOOP proc1
proc2:
LEA DX,msj3
MOV AH,09H
INT 21H
MOV AX,00
MOV AL,VAL1
DIV BL
ADD AX,3030H
MOV DX,AX
MOV AH,09H
INT 21H
mov ax,4c00h ;fin del programa con interrupcion
int 21h
empezar endp
end empezar
Ojala y me puedan ayudar, gracias
MOD: Etiqueta GeSHi