Показать сообщение отдельно
Старый 03.11.2009, 10:32   #1
Артем Валерьевич
Бывалый
 
Аватар для Артем Валерьевич
 
Регистрация: 25.12.2007
Адрес: г. Краснодар
Сообщений: 894
Написано 421 полезных сообщений
(для 1,079 пользователей)
Подскажите, непойму как дописать в конец файла

Подскажите, непойму как дописать в конец файла.


функция должна открыть файл, запросить название нового добавляемого ентити, и дописать его с координатами в конец файла.

Так вот непойму как добавить новые строки в конец файла.

Вот оно.
(ентити создается в координатах игрока):

 
x#=EntityX (a.MatchMan\PiwotPers)
y#=EntityY (a.MatchMan\PiwotPers)
z#=EntityZ (a.MatchMan\PiwotPers)
Text 20,20,"Pers x: "+x#
Text 20,50,"Pers z: "+y#
Text 20,80,"Pers y: "+z#

FlushKeys() 
;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
If KeyDown( 25 )=True Then
;
Typeofpoz$=Input$("name of entity-") ;
FilesName$=Input$("name of File-") ;
poz1 = WriteFile(FilesName$ +".ini") ;
;
WriteLine( poz1,Typeofpoz$+"[") ;
WriteLine( poz1, x# ) ;
WriteLine( poz1, y# ) ;
WriteLine( poz1, z# ) ;
WriteLine( poz1,"]") ; 
;
CloseFile( poz1 ) ;
;
End If ;
;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
(Offline)
 
Ответить с цитированием