Показать сообщение отдельно
Старый 15.08.2007, 00:35   #4
Данил
Модератор
 
Аватар для Данил
 
Регистрация: 11.07.2007
Сообщений: 2,910
Написано 686 полезных сообщений
(для 1,694 пользователей)
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

и так цикл в цикле и их целая куча? а мона ещё вопрос? тормозить сильно будет?
(Offline)
 
Ответить с цитированием