телепорт по имени нпц.

[aga-aga]

Всем привет, помогите переделать скрипт который уже есть для версии 2.7, в свое время пробывал его переделать под 3.0, а ща надо под 1.9

Вот сам скрипт:
procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
if fromserver and (ReadC(1)=$59) then begin
buf:=hstr('9F 00 57 5C FF');
writed(readD(18));
writed(readD(22));
writed(readD(26));
buf := buf + hstr('3C 00');
sendtoserver;
buf:=hstr('68 00 57 07 FF');
SendToServer;
pck:='';
end;
end.

1) 9F 00 57 5C FF' этот пакет перемещения( сделать шаг он будет)
2) 3C 00' таргет нпц
3) 68 00 57 07 FF мигалка

А что изменять еще надо? помогите разобраться.

вот тема этого скрипта:
http://zhyk.ru/forum/showthread.php?...E5%EF%EE%F0%F2

Добавлено через 19 часов 52 минуты
Ап теме, хочется самому понять, а не просить других сделать.

[aga-aga]

Тему можно закрывать, огромное спасибо
mars2107 за помощь.