Re: Скриптовая система или как работать с файлами
То есть пишу
file = OpenFile ("Text\" + SObject\script + ".txt")
While Not Eof(file)
s$=readline(file)
if s$="script"
while s$<>"/script"
- сюда команды типа
if h$="dialog"
while h$<>"/dialg"
a=ReadLine(file)
b=ReadLine(file)
c=ReadLine(file)
Wend
if j$="battle"
while j$<>"/battle"
a=ReadLine(file)
b=ReadLine(file)
c=ReadLine(file)
Wend
wend
end if
CloseFile file
и так цикл в цикле и их целая куча? а мона ещё вопрос? тормозить сильно будет?
|