Code: Alles auswählen
If CreateFile(0,"Test.dat")
WriteStringN(0,"AddShow(98,0,0,0,0) : ")
WriteString(0,"AddShow(98,0,100,15,0,0) ")
CloseFile(0)
Endif
If ReadFile(0,"Test.dat")
Text$ = ReadString(0)
Text2$ = ReadString(0)
CloseFile(0)
Endif
OpenConsole()
ConsoleTitle("File-Reading-and-Creating")
;Print(Text$)
AddShow(98,0,0,0,0)
;Print(Text2$)
AddShow(98,0,100,15,0,0)
Delay(10000)
CloseConsole()
Erste Idee die mir dazu kommt ist begrenzter Befehlssatz in der .dat und jede menge Case im pb-file...