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

You See: - надо, а так же надо чтобы оно расшифровывало кого оно видит ибо смысл пакета как такового - тока журнал засерает ненеся никакой смысловой нагрузки А насколько сложно замутить, чтобы при переключениии журнала хоть в клилоки , хоть в тексты, скрипты продолжали работать, чтобы менять отображ...

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

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

Версия 2, навороченная с проверкой на пустой сундук, юзает клилок сундука для определения 0 или больше итемов в нем... Procedure OpenBox(Box: Cardinal); var a,opboxi: Integer; b: String; begin opboxi:=0; If FindTypeEx($FFFF,$FFFF,Box,True) = 0 Then begin repeat UseObject(Box); Wait(500); CheckSave; ...

в хелпе посмотри , есть список слоев чара, выбери тот, на который одеваешь шмотку...

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

да и проверь тип топора, возможно он пытается лопатой или киркой деревья рубать?

вообщето дровосек работает по принципу:
надо ему явно указывать тип тайла и его координаты

может оно с ластконетйнером и проще, но негарантировано, т.к. часто надо сундук отуріть раз 20-30 чтобі в нем чегото нашло, вот поєтому и біло такое чудо изобретено

OpenBox.inc Procedure OpenBox(Box: Cardinal); var opboxi: Integer; begin opboxi:=0; If FindTypeEx($FFFF,$FFFF,Box,True) = 0 Then begin repeat UseObject(Box); Wait(500); CheckSave; AddToSystemJournal('open $'+IntToHex(Box,8)); FindTypeEx($FFFF,$FFFF,Box,True); opboxi:=opboxi+1; until (FindCount > 0)...

в левую левую
и топоры у ламбера тоже в левую:)
а то что нарисовано на папердоле.... н азаборе на писано Х... а там дрова лежать

уо писалось для левой руки - левой рукой, а рисовалось для правой - правой ну есть правда вариант с зеркалом...

про тип - писал как про цыферки меняются
а кординаты - никогда не обращал внимания...

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