Trouble Writing Multiple Lines

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Mr.Bob94

Thank you all! This really helps!

*Edit*
Hello again,
I finished with the creation part of my program, but now I'm having trouble with the part for opening files. I'm getting the error "Stream Does Not Exist". Here's my code:

.start
Graphics 1024,768
open$ = Input ("Would you like to open or create a file? O = Open, C = Create, Q = Quit.")
If open$ = "O" Then Goto openscript 
If open$ = "C" Then Goto createscript
If open$ = "Q" Then End 
.openscript
openf = Input ("Please type the file you wish to open.")
fopen = OpenFile ("C:\temp\Test Docs"+open$+".rcn")
filetext= ReadFile (fopen)
fileread$ = ReadLine (filetext)
Print fileread$
WaitKey 
readf$ = Input ("Ready.")
Repeat
mainfile2$ = Input ("")
WriteLine (openf,mainfile2$)
Until mainfile2$ = "Close"
CloseFile fopen
.createscript
save$ = Input ("Under what name do you want this log saved?")
Writef$ = Input ("Ready.")
rcon = WriteFile("C:\temp\Test Docs"+save$+".rcn")
Repeat
WriteLine (rcon,mainfile$)
mainfile$ = Input ("")
Until mainfile$ = "Close"
WriteLine (rcon,mainfile$)
CloseFile rcon
WaitKey 
Goto start