Скрипт на тп

[RackFor]

Помогите пожалуйста, в написании скриптов ничего не понимаю... Как нибудь можно добавить свои координаты в уже готовый скрипт на тп, и как их добавить? Просто объясните откуда взять координаты(и как) куда вставить и на какую команду будет откликаться.
//************************************************** ****************************
{version 0.2 By tiranous How to teleport self anywhere you want

1.check the script
2.target yourself
3.teleport to every location you want
4.use one active skill (common craft,heal,etc)
5.Tested in L2DeathWhisper,L2Core,L2Evo,l2gm,l2zer0
}
//************************************************** ****************************
//Towns
//
//.gludio
//.gludiowh
//.goddard
//.goddardwh
//.aden
//.adenwh
//.giran
//.giranwh
//.rune
//.oren
//.heine
//.dion
//.schuttgart
//.gludin
//.elventree
//.elvenwh
//.elven
//.darkelven
//.darkelvenwh
//.dwarven
//.dwarvenwh
//.orcvillage
//.orcvillagewh
//.talkingisle
//.floran
//.hunter
//.hunterwh
//
//Harbors
//
//.giranharbor
//.runeharbor
//
//Castles
//
//.adencastle
//.runecastle
//.goddardcastle
//.girancastle
//.orencastle
//.gludiocastle
//.dioncastle
//.schuttgartcastle
//.innadrilcastle
//
//Castle's Pray
//.giranpray
//.adenpray
//.runepray
//.orenpray
//.dionpray
//.gludiopray
//.innadrilpray
//.goddardpray1
//.goddardpray2
//.schuttgartpray1
//.schuttgartpray2
//
//Farm Places
//
//.dino
//.vos
//.varka
//.mos
//.ketra
//.hotsprings
//.imperialtomb
//.wallofargos
//.forgeofthegods
//.skarato
//.valleyofsaint
//.lostnest
//.blaizing
//.darkomens
//.aligaorisle
//.cruma
//
//Other Places
//
//.olympiad
//.olympiad2
//.dwarventower
//.dwarventower2
//.fieldofsilence
//.hideway
//.sea
//.mount
//.jail
//.adencrest
//.vodopad
//.coliseum
//.secretcastle
//.placetohide
//
//Raid Bosses
//Special Raid Bosses
//
//.qa
//.core
//.orfen
//.zaken
//.baium
//.benom
//.antharas
//.valakas
//.frintezza
//.tyrannosaurus1
//.tyrannosaurus2
//.tyrannosaurus3
//
//70-80 lvl rbs
//
//.varkarb1
//.varkarb2
//.varkarb3
//.ketrarb1
//.ketrarb2
//.ketrarb3
//.ember
//.galaxia
//.golkonda
//.giantglaki
//lowest lvl rbs
//
//.blaizingrb1
//.blaizingrb2
//.blaizingrb3
//.blaizingrb4
//.blaizingrb5
//.hallate
//.korim
//.kernon
//.rahha
//.gorgolos
//.verfa
//
//Noblesse Quest
//
//.talien
//.gabrielle
//.gilmore
//.baraham
//.melodymaestro
//.marluk
//.stedmiel
//.virgil
//.rahorakti
//.splinterstakato
//.caradine
//.noel
//.mdk
//.kalis
//.matild
//.unicorn
//.jp
//.noblrb
//.ladd

var
//
ValidatePosition:string; c:integer; e:integer; n:integer; r:boolean;
a:integer; b:boolean; d:integer; f:integer; v:integer;
procedure Init;
begin
SendMsc('Возьми себя в таргет!!!');
b:=false;
end;
procedure SendMsc(msc:string);
begin
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('tiranous');
WriteS(msc);
SendToClient;
end;
Begin
begin
if FromClient and (pck[1]=#$04)and (not b) then
begin
a:=ReadD(2); c:=ReadD(6);
d:=ReadD(10); e:=ReadD(14);
f:=ReadC(18);
SendMsc('Запомнен ID Обьекта = '+inttostr(a));
b:=true;
end;
end;
Begin
If fromclient and (pck=hstr('38 2E 00 71 00 61 00 00 00 00 00 00 00')) then
begin
buf:=#$28;
WriteD(a);
buf:=buf+ hstr('C8 AB FF FF 17 C4 02 00 A6 E9 FF FF');
SendToClient;
end;
end;
Begin
If fromclient and (pck=hstr('38 2E 00 63 00 6F 00 72 00 65 00 00 00 00 00 00 00')) then
begin
buf:=#$28;
WriteD(a);
buf:=buf+ hstr('61 45 00 00 5E B5 01 00 48 E6 FF FF ');
SendToClient;
end;
end;
и т.д.(больше символов нельзя)
В этот наимер надо добавить, что бы работал по такому же принципу... Заранее спасибо

[J-Fobos]

Координаты можно узнать прописав в игровом чате /loc
А то что вы ничего не понимаете в написании скриптов абсолютно вам не поможет, учитесь.