Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Сбор льна на поле

тут можно задать вопрос по скриптингу
Post Reply
k1ryha
Neophyte
Neophyte
Posts: 11
Joined: 29.10.2009 12:44
Contact:

Сбор льна на поле

Post by k1ryha »

Добрый день.
Требуется помощь со скриптом на сбор льна.
Персонаж стоит и собирает лён на расстоянии 2-х тайлов.
Когда тыкаешь на лён он начинает его сборку сообщением:
System: You start harvesting...
System: You put the crops in your pack
и продолжает собирать пока оно не кончится, заканчивает сообщением:
System: You harvested all you can.
System: Harvest again to destroy the plant.
во время сбора могут быть фейлы с такими сообщениями
System: You fail to harvest.

Суть в том, что скрипт тыкает одно растение постоянно и не переключается на другое, я обыскал кучу скриптов чтобы достать из них что нибудь полезное, но ничего не получается, скриптование трудно даётся, поэтому прошу помощи.

Всё вышеуказанное я пытался делать на основе этого скрипта

Code: Select all

program sbor;
Begin
while (true) do
begin 
SetARStatus(true);
canceltarget;
FindDistance := 1;
WaitTargetobject(findtype($1A99,ground));
AddToSystemJournal(IntToStr(FindCount)+' растений');
AddToSystemJournal(IntToStr(CountEx($0DF8,$0000,backpack))+' льна');
UseObject(findtype($1A9C,backpack)); 
wait(5000);
end;
end.

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

Помогите пожалуйста.
сервер pol 95
GeeZeR
Apprentice
Apprentice
Posts: 226
Joined: 28.01.2012 19:48

Re: Сбор льна на поле

Post by GeeZeR »

findtype($1A99,ground) возвратит тебе ID объекта, закинь его в переменную и кликай на него пока не появится мессаг "System: You harvested all you can". После чего кинь его в игнор Ignore(ObjID : Cardinal), и снова ищи такой тип. Покури вот это: http://stealth.od.ua/Doc:RU/Manual/Reference/Object, http://stealth.od.ua/Doc:RU/Manual/Refe ... ect_Search. Через время findtype перестанет находить объекты, потому что не учитывает при поиске те, что в игноре, или иди на другое место или скинь игнор IgnoreReset().
Stealth 8.10.2 | Клиент: 7.0.13.4
Post Reply