Your announcement here - click to advertise

{Share}Full Guide,Video and script How to take easy castles

˚کe®κ · 2009-06-29T13:29:58+00:00

[hide]1.here is a script to teleport you in the pray location you want tested in :l2Deathwhisper,l2core,l2Evo //****************************************************************************** {version 0.1 By SeRk How to Take easy Castles 1.check the script 2.target yourself 3.teleport to Pray location you want 4.use one active skill (common craft,heal,etc) 5.Tested in L2DeathWhisper,L2Core,L2Evo } //****************************************************************************** //.giranpray //.adenpray //.runepray //.orenpray //.dionpray //.gludiopray //.innadrilpray //.goddardpray1 //.goddardpray2 //.schuttgartpray1 //.schuttgartpray2 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('Teleport to pray?'); b:=false; end; procedure SendMsc(msc:string); begin buf:=#$4A; WriteD(0); WriteD(10); WriteS(''); 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('Remember ObjectID = '+inttostr(a)); b:=true; end; end; Begin If fromclient and (pck=hstr('38 2E 00 67 00 69 00 72 00 61 00 6E 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('26 CC 01 00 BE 36 02 00 2C F6 FF FF '); SendToClient; end; end; 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('???????? ObjectID = '+inttostr(a)); b:=true; end; end; Begin If fromclient and (pck=hstr('38 2E 00 61 00 64 00 65 00 6E 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('0A 40 02 00 7E 06 00 00 AD FE FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 72 00 75 00 6E 00 65 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('07 23 00 00 08 40 FF FF 27 04 00 00 '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 6F 00 72 00 65 00 6E 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('A6 47 01 00 49 91 00 00 3D F7 FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 64 00 69 00 6F 00 6E 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('42 56 00 00 6C 77 02 00 AD F5 FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 67 00 6C 00 75 00 64 00 69 00 6F 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('3A B9 FF FF 45 A6 01 00 6F F6 FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 69 00 6E 00 6E 00 61 00 64 00 72 00 69 00 6C 00 70 00 72 00 61 00 79 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('3A C5 01 00 32 D2 03 00 1D FD FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 67 00 6F 00 64 00 64 00 61 00 72 00 64 00 70 00 72 00 61 00 79 00 31 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('FA 43 02 00 EB 3A FF FF 1C FA FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 67 00 6F 00 64 00 64 00 61 00 72 00 64 00 70 00 72 00 61 00 79 00 32 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('2C 3C 02 00 FD 3A FF FF 1B FA FF FF '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 73 00 63 00 68 00 75 00 74 00 74 00 67 00 61 00 72 00 74 00 70 00 72 00 61 00 79 00 31 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('DF 32 01 00 6C A4 FD FF E3 00 00 00 '); SendToClient; end; end; Begin If fromclient and (pck=hstr('38 2E 00 73 00 63 00 68 00 75 00 74 00 74 00 67 00 61 00 72 00 74 00 70 00 72 00 61 00 79 00 31 00 00 00 00 00 00 00')) then begin buf:=#$28; WriteD(a); buf:=buf+ hstr('42 2B 01 00 68 A4 FD FF E3 00 00 00 '); SendToClient; end; end; end. 2.if the script dont work in your server you play use the guide from video(script for open doors and anti lag patch y can help you) use the fly mode f1 01 00 00 (send it in the client)to fly over gate/doors and the pack f1 01 to return from the fly mode.. This video is from schuttgart castle you can use the fly packet for othes castles . schuttgart.rar 3.And if you want to keep the castle use The lag/crash server expoilt from here http://www.maxcheaters.com/forum/index.php?topic=66702.0 [/hide]

Followers

˚کe®κ

Members

OfflineStatus
MembersGroup
848Posts
0Solutions
3Reputation
19,257Member No
1Days Won
04/04/2008Joined
Offline Status
Members Group
848 posts
4 Badges
3 Reputation
19,257 Member No
1 Days Won
04/04/2008 Joined

Create an account or sign in to comment

Important Information

Configure browser push notifications

Chrome (Android)

Chrome (Desktop)

Safari (iOS 16.4+)

Safari (macOS)

Edge (Android)

Edge (Desktop)

Firefox (Android)

Firefox (Desktop)