Mensaje
Código
.ELSEIF uMsg==WM_COMMAND
MOV EDX,lParam
.IF EDX == hwnd_CalFibo ;Boton Calcular
INVOKE Obtener_Valores ; Funcion Captua valores del windows text
INVOKE Fibo,Canti1 ;llamo a la funcion Fibo
INVOKE SetWindowText,hwnd_Resultado,ADDR Resultado
Inicializo variables
Código
.data
Ultimo dd 0
Actual dd 1
Aux dd 0
Funcion Fibonacci
Código
Fibo PROC Cantd01:DWORD
MOV ECX,Aux
.while ECX <=Cantd01
PUSH Ultimo
PUSH Actual
POP Siguiente
POP EDX
ADD Siguiente,EDX
INVOKE dwtoa,Siguiente,addr Resultado
PUSH Actual
POP Ultimo
PUSH Siguiente
POP Actual
INC ECX
RET
.endw
Fibo ENDP










Autor


En línea
