Global $I ;go() ;Func go() for $I=1 to 4 sub() Next ;EndFunc Func sub() consolewrite($I) EndFunc