[alexteam]

пипец.. танцы с бубнами...
просто отошли клиенту пакет телепорттолокейшин с его (клиентом) обжектайди и координатами разнящимися с текущими по z, естественно в плюсовую сторону.
все остальное клиент сделает за тебя.

Добавлено через 10 минут
простой скрипт который это сделает при приходе пакета чарактеринфо:

const 
charactername = 'charname';
z = 5000; //МЕНЯТЬ ИНДИВИДУАЛЬНО.

var
work : boolean;
charoid,x,y : integer;
values : array[0..100] of variant;

procedure Teleport;
begin
  pck := #22;
  writed(charoid);
  writed(x);
  writed(y);
  writed(z);
  sendtoclient;
  work  := false;
   
end;

procedure init;
begin
  useforconnectname := charactername;
  work := true;
end;

procedure free;
begin
end;

begin
  if fromserver and (pck[1] = #$32) then
  begin
    readmask('ddddd',2,values);
    x := values[0];
    y := values[1];
    charoid:= values[4];
    buf := pck;
    pck := '';
    sendtoclient;
    Teleport;
  end;  
end.