local fn Recursion( i as long ) print i fn Recursion(i + 1) end fn fn Recursion(0) HandleEvents