[Grinch]

  // скрипт будет работать только для указанного персонажа
  // Name - имя 1 персонажа, пакеты от остальных нам не нужны
  if (ConnectName<>Name) then begin 
    exit; end else // а может так заработает? если заработает отпишись сам не уверен

  // обрабатываем пакет статуса.
  // 18=StatusUpdate:d(ObjectID)d(AttribCount:Loop.01.0002)d(AttrID:Get.FSup)d(AttrValue)
  if FromServer and (pck[1]=#$18) then
  begin
    MyID:=ReadD(2);
  end;

хз я плохо кодю но типа может так заработает надо тестить