строка начинается с обьявления функции savetofile:
sub SaveToFile(TreeCount,TreeX,TreeY,TreeT) # Line 465
var s=0,i=0,f
f=file(FileName)
f.Open()
f.Create()
s=safe call f.Writeln(TreeCount)
for i=1 to TreeCount
s=safe call f.Writeln(str(TreeT )+' '+str(TreeX )+' '+str(TreeY ))
next
f.Close ...
Search found 4 matches
- 2005-07-31 22:15:52
- Forum: Scripting Ore
- Topic: Последняя версия Скрипта Лумбер(проверено командой тестеров)
- Replies: 194
- Views: 149458
- 2005-07-31 00:37:18
- Forum: Scripting Ore
- Topic: Последняя версия Скрипта Лумбер(проверено командой тестеров)
- Replies: 194
- Views: 149458
- 2005-07-30 21:50:02
- Forum: Scripting Ore
- Topic: New LumberJacking Script :)
- Replies: 46
- Views: 24564
- 2005-07-29 21:56:48
- Forum: Scripting Ore
- Topic: Последняя версия Скрипта Лумбер(проверено командой тестеров)
- Replies: 194
- Views: 149458