ДА БУДЕТ Б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
где х - ид у ид предмета
ок приходит и ниче не просходит