begin FBegin:=Now; while (not InJournalBetweenTimes('seem to be',FBegin,Now)>=0) do begin If TargetPresent then //то , что вы говорили указать CancelTarget; // то, что вы говорили указать DeathR; UseObject(Pole); WaitForTarget(4000); TargetToTile(tile,x,y,z); WaitJournalLine(Now, 'a nice fish!|seem...

юзай canceltarget перед использованием обьекта, вместо checktargeterror непоможет . Так зависание идет именно удочки, у меня такое даже на простом клиенте было.. и пока не перезайдешь дабл клик на удочку будет писать типа что итем уже используется, а если скриптом работать то ай ем олрэди бла бла б...

ок исправил... прошу прощения , что не сделал этого сразу... так что кто-то может помочь?

я не Миралекс) и тебе Алекс тоже спасибо :)... у меня теперь еще такой вопрос... со временем, где-то через часа два зависает и пишется вечно I am already bla bla bla.. попытался немного подправить... но чтото еффект не достиг .. что сделал неправильно?? Procedure Fish(tile:Word;x,y,z:Integer); var ...

Всё, спасибо за помощь, после совета Мираклеса выяснилось, что в файле с тайлами просто было в самом низу две пустые строки и скрипт просто на них вылетал... в файле не должно быть ни пробелов ни пустых строк... только так как показано в примере.

Подскажите как это исправить, все вродеб сделал , но вот тут ошибку выдает... вот в этой строке если быть точнее.. FishP[WPos].py:=StrToInt(Copy(s,1,Pos(' ',s)-1)); Delete(s,1,Pos(' ',s)); Вот сама ошибка. 5:37:49: Compiling 5:37:49: Compiled succesfully 5:37:50: Exception: '' is not a valid integer...

Ребят, доброго времени суток, подскажите пожалуйста ... вот простейший пример скилл хайдинг который идет на любой шард в общем-то, но на АОСе работать нехочет, тоесть он грузиться нормально, но скилл не юзается... с чем может быть связана данная проблема?? ... Заранее примного благодарен. :oops: pro...

procedure PMain; var Author : integer; count, i : integer; Begin while (count = 100) do begin WaitTargetObject($00890233); UseSkill('Stealing'); while ((i = 5) or WaitJournalLine('You failed to open container|You couldn't open the container|Targeting Cancelled'); ) do begin TargetToObject($097B); w...

procedure PMain; var Author : integer; var count i : integer; Begin while (count = 100) do begin WaitTargetObject(0$00890233); UseSkill('Stealing'); while ((i = 5) or WaitJournalLine('You failed to open container|You couldn't open the container|Targeting Cancelled'); ) do begin TargetToObject(0$097...

Добрый вечер день или утро... если вам не трудно... помогите мне пожалуйста со скриптом... ато у меня невыходит... немогу найти ошибку... сервер Fields Of Fire... в общем копия старого тенета... выдает такую ошибку: 20:20:18: Compiling 20:20:18: Compiler: [Error] (steal.sc at 7:21): comma (',') expe...