Foro de elhacker.net

Programación => ASM => Mensaje iniciado por: JuanElias en 20 Noviembre 2010, 00:03 am



Título: Ayuda Serie de Fibonacci en RadAsm+Masm32
Publicado por: JuanElias en 20 Noviembre 2010, 00:03 am
Estoy realizando la serie de fibonacci en lenguaje ensamblador con el IDE radasm, el problema que tengo es con la funcion fibonacci, al ingresar un numero en el windowtext y hundir el boton calcular  no me calcula el termino de la serie pero si me calcula la serie si hunda varias veces el botón.que problema puede haber? Gracias

Mensaje
Código
  1. .ELSEIF uMsg==WM_COMMAND
  2. MOV EDX,lParam
  3. .IF EDX == hwnd_CalFibo     ;Boton Calcular
  4.          INVOKE Obtener_Valores   ; Funcion Captua valores del windows text
  5. INVOKE Fibo,Canti1    ;llamo a la funcion Fibo
  6. INVOKE SetWindowText,hwnd_Resultado,ADDR Resultado


Inicializo  variables
Código
  1. .data
  2.   Ultimo dd 0
  3.   Actual dd 1
  4.   Aux dd 0
  5.  


Funcion Fibonacci
Código
  1. Fibo PROC Cantd01:DWORD
  2. MOV ECX,Aux
  3. .while ECX <=Cantd01
  4. PUSH Ultimo
  5. PUSH Actual
  6. POP Siguiente
  7. POP EDX
  8. ADD Siguiente,EDX
  9. INVOKE dwtoa,Siguiente,addr Resultado
  10. PUSH Actual
  11. POP Ultimo
  12. PUSH Siguiente
  13. POP Actual
  14. INC ECX
  15. RET
  16. .endw
  17. Fibo ENDP
  18.