Trash,ItemType : word; TrashID : cardinal; ..... procedure MoveMakeItem; begin while FindTypeEx(ItemType,$FFFF,backpack,false) > 0 do begin Checksave; WaitConnection(5000); if findtype(Trash,backpack) > 0 then TrashID:=finditem; begin if CountEx(ItemType,$FFFF,TrashID) <= 39 then begin Checksave; W...

Alex wrote:открыть бакпак по какой то причине не удаеться

И ещё я заметил что перестал определяться вес
Возможно это из за перехода на новый клиент...

Играю на шарде Dreem World. После перехода на новое ядро Ultima Online: Samurai Empire чар перестал определять вещи в паке, немогу понять почему.
Подскажите кто знает.

Перестала работать к примеру такая строка:
UseObject(findtype($0EFA,backpack));
с пола точно таким же макаром определяет...

А вот и сама ошибка. Это пишется во вкладке "System": Exception: Access violation at address 000000E5. Read of address 000000E5 at 0.776 Так же вылазиют таблички: "Invalid pointer operanion" и "Access violation at address 000000E5. Read of address 000000E5" Тут "ad...

В следущей? Думаю да. Было бы неплохо :) У меня таже проблема, стоят 17 чаров и загрузка ЦП скачет от 10% до 80%... В домах от 400-900 итемав правда... Думаю это поиск предметов так грузит комп(Выовод сделал по своему опыту :). Включил скрипт на фиш загрузка обычная скачет 10-80%, включил отдельно ...

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

Выставил высоту, всё равно не берёт в руку тот предмет который уже брал... Прописал в скрипте чтобы чар подбирал шмотку с пола(без поиска) и одевал её из бекпака. Подбирать то он подбирает, но одевать не хочет даже из пака... Кстати тоже самое я заметитил и у воинов... После смерти(воскрешения и раз...

1 пунк. Как узнать высоту :?: Поставил "FindVertical:=6;", это стандарт как я понял, ищет на любой высоте... Я просто ниразу ещё не работал с этим параметром :( 2 пунк. procedure weaponckeck; begin if (not dead) and (connected) then begin checksave; {Weapon} if ((findtype(tweapon,ground) ...

Дело вот в чём, после включения скрипта всё хороше, чар находит что одеть и одевает, а после смерти(воскрешения и разрезки дегером трупа) те же самые вещи неможет найти. Compiling Compiled succesfully Weapon Change, найдено 1 Neck Change, найдено 1 Ring Change, найдено 1 Resself. Enter Weapon Change...

Спасибо Miralex всё заработало :) Вот весь скрипт, рабочий... Program Inscription; var i: Integer; t: Integer; a: Integer; b: Integer; c: Integer; blanku: cardinal; knura: cardinal; regs : Array[1..3] of word; stime :TDateTime; {$Include 'all.inc'} procedure checkregs; begin If Connected then begin ...

Program Inscription; var i: Integer; t: Integer; a: Integer; b: Integer; c: Integer; blanku: cardinal; knura: cardinal; regs : Array[1..3] of word; stime :TDateTime; {$Include 'all.inc'} procedure checkregs; begin If Connected then begin for i:= 1 to 3 do begin FindDistance:=1; Findtype (regs ,back...

Не кидает второй таргет