function WriteFile takes string filename, string savecode returns nothing
set savecode = "\r\n\r\n
Code: "+savecode+"\r\n\r\n"
call PreloadGenClear()
call PreloadGenStart()
call Preload("\")
"+savecode+"
(\"")
call PreloadGenEnd(filename)
endfunction