ДА БУДЕТ БOT!

[mks]

Shnaider

//-------------------------------------------------------------------------------------------
//ловим пакет от клиента отправленный коммандиром при перемещении
if FromClient and (ConnectName=MasterName) and (pck[1]=#$01) then
      begin
         x:=ReadD(2);
         y:=ReadD(6);
         z:=ReadD(10); //координаты точки куда пошел коммандир

         ox:=ReadD(14);
         oy:=ReadD(18);
         oz:=ReadD(22);//координаты точки откуда шел коммандир
//-------------------------------------------------------------------------------------------
//имеем координаты точек откуда и куда шел коммандир
//делаем с координатами все что душе угодно
//строим аналогичный пакет
         buf:=#$01;
         WriteD(x);
         WriteD(y);
         WriteD(z);
        
         WriteD(ox);
         WriteD(oy);
         WriteD(oz);
         SendToServerEx(BotName); //отправляем его серверу ботом
      end;

вот и все