[NLObP]

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

следование одного чара за другим

Это организуется двойным таргетом на чаре, как в клиенте. И кот станет ходить за хозяином.

Attacker - ObjectID хозяина
MyXpos, MyYpos, MyZpos - координаты кота

//***********************************************
//04=Action:h(ObjectID)d(OriginX)d(OriginY)d(OriginZ)b(ShiftFlag)
procedure Target(Attacker: Integer);
begin
  buf:=#$04;
  WriteD(Attacker);
  WriteD(MyXpos);
  WriteD(MyYpos);
  WriteD(MyZpos);
  WriteC(00);
  SendToServerEx(Name);
end;

//********************************
procedure TargetAttacker(Attacker: Integer);
begin
  Target(Attacker);
  delay(1000);
  Target(Attacker);
end;