FoxPro/Visual FoxPro - factorial de un numero

hay por favor ayudeneme para sacar el factorial de un numero
el numero yo se lo tengo q dar por medio de un text

N = INT(Thisform.TEXT1.VALUE)

IF N<0
WAIT WINDOW "NO SE PUEDE SACAR FACTORIAL A UN NUMERO NEGATIVO"
RETURN
ENDIF

IF N = 0
WAIT WINDOW "EL FACTORIAL DE CERO ES = 1"
RETURN
ENDIF

RESULTADO = 1
for x = 1 to N
RESULTADO = RESULTADO * X
ENDFOR

? "EL FACTORIAL DE " + STR(N) + " es = "+STR(RESULTADO )

Para lo que no lo saben . y para los que lo saben les de una refrescada de memoria

El factorial de un número entero positivo se define como el producto de todos los números naturales anteriores o iguales a él. Se escribe n!, y se lee "n factorial". (Por definición el factorial de 0 es 1: 0!=1)
Por ejemplo, 5! = 5·4·3·2·1 = 120
Su utilidad estriba en que se utiliza en la mayoría de las fórmulas de la COMBINATORIA


:-)