[Скрипт] Снятие предмета с аукциона

[Furydose]

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

var 
Id:integer;


begin 
    if FromServer and (pck[1]=#$B1)  then 
         begin
            Id:=readD(14);
            buf:=hstr('EE 57 8D 23 B7 00 00'); 
            writed(Id);
            if (pck<>hstr('B1 54 4E 01 00 00 00 00 00 00')) and (pck<>hstr('B1 54 4E 00 00 00 00 00 00 00 00 00 00')) then
             begin        
             sendtoserver;
             end;
         end;  
end.

Если скрипт не работает, попробуйте поменять в скрипте пакет ЕЕ.
Положите вещь на аук, снимите с регистрации, словите пакет ЕЕ и замените в скрипте удалив из него последние 4 байта.

ЗЫ. Тестилось на топ 5 фрихе.


ЗЫЫ. Если помог - тык спасибку.

[Id#]

То есть как бы покупаешь предмет на ауке? Если так то люди которые выкладывали вещь должны получать прибыль?
И еще каким образом ктивируется скрипт?

[Furydose]

Цитата: Сообщение от Id# То есть как бы покупаешь предмет на ауке? Если так то люди которые выкладывали вещь должны получать прибыль? И еще каким образом ктивируется скрипт?

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

[genyan]

вставил скрипт нажимаю на молнию вот такое выдает

Error occurred

The application has encountered a problem. We are sorry for the inconvenience

Access violation at address 132775B5 in module l2ph.exe. Read of address 00000000.

Restart application.

To see what data the error report contains, click here
ОК



Просто жму ОК
И потом залажу на аук выбираю пухи обновит и ничего не происходит , ЕЕ менял

[Furydose]

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

[pixfid]

в том и дело что нет =(, с аукциона итемы снимаются не по id итема.

[Furydose]

genyan, Restart application пробовал?

[genyan]

да програму перезапускает и опять тоже

[Furydose]

genyan, Хз, у меня и у всех кому скидывал работает, это что-то у тебя.

Цитата: Сообщение от pixfid в том и дело что нет =(, с аукциона итемы снимаются не по id итема.

По игровому иду, не из базы, я неправильно выразился.

[pixfid]

Цитата: Сообщение от Furydose genyan, Хз, у меня и у всех кому скидывал работает, это что-то у тебя. По игровому иду, не из базы, я неправильно выразился.

Не по игровому id а по месту в списке =)

[222576]

что за пакеты
B1 54 4E 01 00 00 00 00 00 00
B1 54 4E 00 00 00 00 00 00 00 00 00 00 ?

[Furydose]

pixfid, Эм, не знаю что там у тебя, а мой ловит именно ид первого предмета, который с 14 байта начинается (Id:=readD(14)).
Мне как бы лучше знать что делает мною написанный скрипт.

Цитата: что за пакеты B1 54 4E 01 00 00 00 00 00 00 B1 54 4E 00 00 00 00 00 00 00 00 00 00 ?

После того снимался предмет, с сервера приходил первый пакет, и получался бесконечный цикл. Когда приходит этот пакет, он его игнорирует и ничего не посылает.
Второй пакет приходит когда список пуст. Тоже игнорирует.

[pixfid]

Цитата: Сообщение от Furydose pixfid, Эм, не знаю что там у тебя, а мой ловит именно ид первого предмета, который с 14 байта начинается (Id:=readD(14)). Мне как бы лучше знать что делает мною написанный скрипт. .

Читай выше что я написал, и найди 10 отличий =)

[Furydose]

Ах ты ж е, так ты пиши понятнее)) я уже думал ты только номер зная их снимать собрался)

[polzo]

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