Yoko

All sides of Injection
It is currently 2024-03-28 13:46:39

All times are UTC+02:00




Post new topic  Reply to topic  [ 7 posts ] 
Author Message
PostPosted: 2004-04-19 18:01:04 
Offline

Joined: 2004-04-16 09:18:08
Posts: 25
Есть скрипт на лесорубство.

выглядит так:
Code:
sub main()

rub(тут координаты деревьев)
rub(...,...,...,...)
rub(...,...,...,...)
.......
end sub

sub rub()
.......
end sub

Так вот, можно ли как нить сделать, чтоб в зависимости от того где стоит чар, он начинал скрипт с с того дерева, которое к нему ближе (по списку) и продалжал дальше по списку?


Top
   
 Post subject: Можно.
PostPosted: 2004-04-19 18:24:32 
Offline
User avatar

Joined: 2004-04-17 23:02:41
Posts: 48
Location: Odessa, Ukraine
Делаем массив с координатами деревьев и перебором находим нужные нам деревья.
Или сортируем массив соотв. образом.

Искренне Ваш, Тотус Маньяковски.

_________________
...thinking - 37% complete...


Top
   
PostPosted: 2004-04-19 18:44:26 
Offline

Joined: 2004-04-19 18:43:26
Posts: 14
ИгорьАлек wrote:
Есть скрипт на лесорубство.

выглядит так:
Code:
sub main()

rub(тут координаты деревьев)
rub(...,...,...,...)
rub(...,...,...,...)
.......
end sub

sub rub()
.......
end sub

Так вот, можно ли как нить сделать, чтоб в зависимости от того где стоит чар, он начинал скрипт с с того дерева, которое к нему ближе (по списку) и продалжал дальше по списку?

качай старый форум там уже были такие скрипты

_________________
lol


Top
   
 Post subject:
PostPosted: 2004-04-20 16:17:24 
Offline

Joined: 2004-04-16 09:18:08
Posts: 25
Скрипт мне не нужен, у меня есть и все прекрасно работает. Что то в старом форуме не нашел подобного.
Мне надо как нить замутить, чтоб рубить он начинал не с начала списка деревьев, а определив свое положение, выбирал ближайшее к нему дерево, и начинал с него рубить и шел дальше по списку.


Top
   
 Post subject:
PostPosted: 2004-04-21 19:51:34 
Offline

Joined: 2004-04-16 09:18:08
Posts: 25
Неужели никто не знает как такое можно замутить?

Может как нить и что нить писать в файл какой нить индентификатор дерева и потом при запуске скрипта читать этот файл найти индентификатор и с него начать.


Top
   
PostPosted: 2004-04-21 20:01:07 
Offline
User avatar

Joined: 2004-04-17 23:02:41
Posts: 48
Location: Odessa, Ukraine
Делай массив деревьев и сортируй его.
А потом ходи рубить по сортированному массиву.

Искренне Ваш, Тотус Маньяковски.

_________________
...thinking - 37% complete...


Top
   
 Post subject: T
PostPosted: 2004-04-21 20:36:46 
Offline
Expert!
User avatar

Joined: 2004-04-04 08:37:43
Posts: 51
Навскидку, с использованием моей системы (чтение из файла):

Code:
Sub SeekNear(FileName)
 Var F=File(FileName)
 Var T,R,A,B
 R=Trim(safecall F.Readln())
 A=Abs(UO.GetX()-GetNumb(R,1))+Abs(UO.GetY()-GetNumb(R,2))
 While not (F.Eof() or (T=='File read error'))
  T=Trim(safecall F.Readln())
  B=Abs(UO.GetX()-GetNumb(T,1))+Abs(UO.GetY()-GetNumb(T,2))
  If B<A Then
   R=T
   A=B
  EndIf
 Wend
 Return R
EndSub


+ процедуры GetNumb и Abs отсюда http://yokoinjection.narod.ru/scripts/AllUnit.sc

_________________
邪魔ものは消え去れ もがきながら 暗い 暗い 地の底。。。 [Jama mono wa kiesare mogaki nagara,
kurai kurai chi no soko] (Помехи исчезнут, страдая, в чёрных чёрных глубинах земли...)


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 7 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 19 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited