ДА БУДЕТ БOT!

[NLObP]

Формируем пакет на продажу нескольких предметов с одинаковым ItemId, вроде визуально все правильно. Продавец в таргете. Послали пакет. Ничего не продается. Почему? Почему если одно и тоже несколько раз в пакете написать, то продается один предмет из посланного пакета?! В чем загвоздка?

Создаем пакет продажи вещей:

//******************************************************************************
//1E=RequestSellItem:h(ListID)d(SellCount)h(ObjectID)i(ItemID)d(Count)
procedure RequestSellItem;
var
  i, j : integer;
begin
  say('Продадим '+inttostr(ColvoItm2)+' предмет(а) ItemID='+inttostr(Item));
  buf:=#$1E;
  WriteD(0);
  WriteD(ColvoItm2);
  for i:=1 to ColvoItm2 do begin
     WriteD(ItemBase2[1,i]);
     WriteD(ItemBase2[2,i]);
     WriteD(ItemBase2[3,i]);
  end;
  say(buf='+strtohex(buf));
  SendToServerEx(Name);
end;