Показать сообщение отдельно
Старый 30.03.2009, 20:52   #7
Пользователь
 
Регистрация: 05.02.2009
Сообщений: 62
Сказал Спасибо: 1
Имеет 18 спасибок в 9 сообщенях
lexayar пока неопределено
По умолчанию

Ищи тут на форуме, где то скрипт был на автотаргет, т.е. когда тебя кто-нибудь берет в таргет, у тебя на него таргет ставится автоматически.

Добавлено через 7 минут
В общем примерно так:
Код:
  // 23=TargetSelected:d(ObjectID)d(TargetID)d(X)d(Y)d(Z)d(0)
  if FromServer and (pck[1]=#$23) and autotarget then begin
    o:=ReadD(2);
    if (ReadD(6)=MyID)and(o<>MyID)and(o<>TargetID) then begin
      x:=ReadD(10);
      y:=ReadD(14);
      z:=ReadD(18);

      //1F=Action:d(ObjectID)d(OrigX)d(OrigY)d(OrigZ)c(ActionID)
      buf:=hstr('1F');
      WriteD(o);
      WriteD(x);
      WriteD(y);
      WriteD(z);
      WriteC(0);
      SendToServerEx(Name);
    end;
  end;

Последний раз редактировалось lexayar, 30.03.2009 в 20:52. Причина: Добавлено сообщение
lexayar вне форума   Ответить с цитированием