fatfile("test.dat",5000)


Function FatFile($file,$size)
	dim $fh
	dim $data[$size]
	$data = join($data," ")
	$fh = FREEFILEHANDLE
	if exist($file) del $file endif
	$ = open($fh,$file,5)
	$ = writeline($fh,$data)
	$ = close($fh)
endfunction