ДА БУДЕТ БOT!

[creaDo]

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

buf:=Hstr('37 00 00 00 00 01 00 00 00');
   writeD(raedD(8);)
   WriteS(Hstr('УУ УУ УУ УУ 01 00 00 00'));
   SendMsg('ok');
   SendToServer;
   end;

покет продажи выглядит так:
37 00 00 00 00 01 00 00 00 ХХ ХХ ХХ ХХ УУ УУ УУ УУ 01 00 00 00
где х - ид у ид предмета
ок приходит и ниче не просходит

[NLObP]

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

buf:=Hstr('37 00 00 00 00 01 00 00 00');
writeD(raedD(8)
WriteS(Hstr('УУ УУ УУ УУ 01 00 00 00'));
SendMsg('ok');
SendToServer;
end;

Смотри, красным выделил. Надо писать READD()
Как совет. Отсылай сначала пакет, а потом пиши сообщение ОК.

[creaDo]

37=RequestSellItem:d(ListID)d(ListSize:Loop.01.000 3)d(ObjectID)d(ItemID:Get.Func01)d(Count)
21=InventoryUpdate:h(ListSize:Loop.01.0021)h(Chang e)h(ItemType1)d(ObjectID)d(ItemID:Get.Func01)d(Loc ation)d(Count)h(ItemType2)h(CustomType1)h(isEquipp ed)d(BodyPart)h(EnchantLevel)h(CustType2)d(Augment ationBonus)d(Mana)d(AttackAttrElement)d(AttackAttr ElementVal)d(DefAttrFire)d(DefAttrWater)d(DefAttrW ind)d(DefAttrEarth)d(DefAttrHoly)d(DefAttrUnholy)

надрал кусков из скриптов выложеных на форуме, получилось вот так:

if (pck[1]=#$21) and Fromserver and (pck[2]=#$01) and (pck[4]=#$01) and (pck[12]=#$58) and (pck[13]=#$02)  then
begin
    j:=4;
    T:=ReadH(j);
    j:=j+2;
    myoid:=ReadD(j);
//    msg('start');
    buf:=#$37;
    WriteD(0);
    WriteD(1);
    WriteD(myoid);
    WriteD(600);
    WriteD(1);
    SendToServerEx(ConnectName);

вроде работает.

[quote=NLObP;16514] Надо писать READ()QUOTE]

А как действует функция read?

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

[NLObP]

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

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

Посмотреть можно в моём скрипте рыбалки и еще где-то на форуме точно есть. C отключением клиента, не всё так просто. И Neting надо отлавливать и с движением проблемы. Допустим в той же рыбалке, пока стоит - ловит, а вот ходить не может. Пакеты на движение клиент шлет, а его мы выгружаем, значит сами должны их формировать.