Aleksei wrote:...просто пытаюсь вникнуть в "язык пилота" (хотя знаю,что большая часть там от бейсика) и интересно - как это там реализовать...не только для мининга....

А зачем тогда ты вопрос задаешь на форуме стелса? если у тебя скрипт на пилот?

- Скрипт на 4 стелс, дабы на зулу он работает бесперебойно. - Делаю скрипт для крафта-раба, включил его и получил по итогу крафтера со скилами по 93 - Пока соединил только БС(переплавка Армслор) и Карпентер, что то скрипт уже получился большой, как бы его сделать покрасивее и удобнее может есть вари...

шард? а он вообще ходит? а деревьев сколько собирает? шард ZHR Он сначала обходит все точки, собирает координаты деревьев (получается 40+). Потом идёт к первому, вырубает его полностью. Дальше, как я понимаю, он начинает перебирать остальные деревья, стоя на месте и пишет, что они далеко. После тог...

А зачем еду себе в пак брать? Можно прям из сундука хавать. Hungry(1, Sunduk); если макс вес не большой то да, а если макс вес 3000 или 10000 установлен, ходит он рубит пол дня и голодает :D Скрипт периодически останавливается, не могу понять с чем это связано. то же не пойму, ты хоть напиши что пр...

Автолуп отключен. Но нашел в чем причина выскакивания повтора, увеличил задержку на повтор на время копки, повтор действия пропадает, но копать начинает намного медленнее, особенно если подходит к выкопанному уже тайлу другим персом. Кто сталкивался как тут можно разрулить ситуевину? [22:12:57:050] ...

Целиком скрипт выкладывал ранее, дабы не повторяться объясню на словах. Как пониманию заедание происходит из-за глюка, лага, сбоя сервера. После лага не может юзать кирку, которой пользовался, понимаю что он дергает кирку довольно часто, но как это заменить пока не допер ... [22:02:46:654] System: I...

и вот такую процедуру еще накинь что бы еду брал procedure checkFish; begin if (Count($097B) < 10) then begin MoveItem(FindType($097B, Sunduk),10,Backpack,0,0,0); Wait(500); end; end; // Разгрузка (Edred) procedure Discharge; // разгружаем нарубленное в сундук // нарубленное - реги в массиве Regs[1....

В Основную функцию лесорубства добавь кушать и смотреть свой вес, лишним не будет )) // Рубим дерево (Edred) function LumbCurTree(tile,x,y,z : Integer) : Boolean; // рубим указанный тайл. Возвращаем false если перевес или чар мертв. var q, m1, m2, m3, m4, m5, m6, m7, m8, CountFizzle, NextTree : inte...

Вот так замени и после смерти когда вернется по рунбуку возьмет из сундука 1 рекол скрол и положит его в рунбук // Идем к сундуку и выгружаемся procedure UnloadOrDead; begin NewMoveXY(xTileSunduk, yTileSunduk, false, 1, false); if not Dead then begin Discharge; end else begin AddToSystemJournal('Пер...

Все же у топик стартера более верный скрипт он накидывает инги и стыкует их с теми что уже находятся в работе, как следствие нету заедания скрипта procedure CheckAxe; begin while (Count(Hatchet1) < 10) do begin CancelMenu; if (Count(IngotType) < 4) then begin FindType(IngotType,Backpack); if (FindQu...

Я у себя вызов процедуры CheckAxe поставил в самый конец разгрузки, прям перед AddToSystemJournal('Разгрузка закончена'); и чуть по другому переписал саму процедуру: // проверяем кол-во топоров в паке, если <10 делаем ещё procedure CheckAxe; begin while (Count(Hatchet1) < 10) do begin FindType(Ingo...

Пока вот так поставил, вроде сейчас всегда дотягиваются if dead or (Weight > MyMaxWeight)then begin DropMap; NewMoveXY(xs1,ys1,false,0,true); wait(100) [color=#00FFFF]if not Dead then begin repeat CurrX := GetX(self); CurrY := GetY(self); NewMoveXY(xs,ys,false,0,true); wait(1000); until (CurrX = xs)...

Плохо прочитал тему ниже, извиняюсь. Но так как нельзя удалить топик то ушел тестить проверку координат из темы ниже

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

На серве Зулу кол-во итемов в бекпаке игрока 150, в пакете 300, поэтому крафту нужно когда делает перекидывать по пакетам и я ему кладу 100 пакетов, а потом ищу которые заполнились, что не удобно. Решил доработать скрипт что бы полные пакеты кидал в сундук, но что то не катит, при заполнения пакета ...