; FACT
;
; Program for Proteus
;
; (C) 1998-2004 Simone Zanella Productions
;
; Ignore input file and print out factorial of numbers from Start to End.

Start = 0
End = 20

FOR J = Start TO End
  CONSOLELN "Factorial of " PFORMAT("2d", J) " is: " FACT(J)
NEXT
ABORT 0