Продажа через пакет

[HinoRyuu]

J-Fobos, если я правильно понял...там описан скрипт покупки..а мне нужно как то реализовать через пакет продажу...так как при отправки пакета на продажу ничего не происходит и только инвентарь открывается....

Добавлено через 10 минут
alexteam, и как это можно исправить?...

[J-Fobos]

Сообщение от HinoRyuu

J-Fobos, если я правильно понял...там описан скрипт покупки..а мне нужно как то реализовать через пакет продажу...так как при отправки пакета на продажу ничего не происходит и только инвентарь открывается....

Угу, там покупка, у вас продажа, там проблема с ObjectID и здесь проблема с ObjectID

[HinoRyuu]

J-Fobos, хм...спасибо буду думать..взял тот скрипт...теперь буду думать как разобраться..спасибо...

Добавлено через 18 минут
я так понимаю тут надо модифицировать пакет RequestSellItem...хм..
тоесть эту строку надо полностью менять

                If (ConnectName=Nick) and FromServer and (pck[1] = #$11) then begin
                ListID:=ReadD(6);
                SendMsg2('Поймали пакет #$11');
                buf:=#$1F; WriteD(ListID); WriteD(1); WriteD(6599); WriteD(1);
                SendMsg2('Модифицировали пакет RequestBuyItem, ListID= ' + IntToStr(ListID));
                SendToServerEx(Nick);

ListID:=ReadD(6);
SendMsg2('Поймали пакет #$11');
buf:=#$1F; WriteD(ListID); WriteD(1); WriteD(6599); WriteD(1);
сможете мне это объяснить если не сложно?
я так понимаю WriteD(6599) это ид вещи? WriteD(1) а это количество?