-
Posts
20 -
Credits
0 -
Joined
-
Last visited
-
Feedback
0%
Content Type
Articles
Profiles
Forums
Store
Everything posted by amita
-
WTS INTERFACE - SOMIK PATCH - H5 (New Update)
amita replied to Somik's topic in Marketplace [L2Packs & Files]
Simply, the best interface we've seen !!! -
https://easyupload.io/aokgsh autonobles l2 tales .....works in any hi5 if u edit alt b and teleport .txt :) pass:maxcheaters
-
hi i need help with this script works normal but when i tp rune reloop the tp and not move to path!!! uses SysUtils,Teleport; procedure AttackDefense; var uX,uY,uZ: integer; begin engine.Facecontrol(0, false); engine.moveto(user.x,user.y,user.z); uX:=user.x; uY:=user.y; uZ:=user.Z; while user.inrange(uX,uY,uZ,500) do begin engine.useitem(736);//soe delay(20000); end; while user.incombat do delay(500); end; procedure Target(id: integer); var i:integer; begin for i:=0 to npclist.count-1 do begin if npclist.items(i).id = id then begin if not npclist.items(i).dead then begin engine.settarget(npclist.items(i)); break(); end; end; end; end; function ValidNPC: boolean; var i,n:integer; npc: TL2Live; begin result:=false; n:=0; for i:=0 to npclist.count-1 do begin if npclist.items(i).id = 31748 then begin if not npclist.items(i).dead then inc(n); end; end; if n = 4 then result:=true; end; procedure chapter1; // Precious Soul 1 var item: TL2item; begin if engine.queststatus(241,1) and not engine.queststatus(241,2) then begin //st1 while not user.inrange(84429, 147265, -3392,300) do begin // Тп в гиран Teleport.TpGiran; end; Engine.MoveTo(83800, 147672, -3392); Engine.MoveTo(83672, 147880, -3384); Engine.MoveTo(83608, 148440, -3384); Engine.MoveTo(83496, 148840, -3392); Engine.MoveTo(83304, 149144, -3392); Engine.MoveTo(82984, 149224, -3456); Engine.MoveTo(82632, 149432, -3456); Engine.MoveTo(82136, 149496, -3456); Engine.MoveTo(81656, 149544, -3456); Engine.MoveTo(81304, 149672, -3448); while not engine.queststatus(241,2) do begin engine.settarget(30753); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,2) and not engine.queststatus(241,3) then begin //st2 while not user.inrange(73048, 118300, -3688,300) do begin Teleport.TpDeathPass; end; while not engine.queststatus(241,3) do begin engine.settarget(30754); engine.movetotarget(-100); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,3) and not engine.queststatus(241,4) then begin //st3 while not user.inrange(34208, 187379, -3088,300) do begin Teleport.TpBeeHive; end; Engine.MoveTo(33768, 187288, -3248); Engine.MoveTo(33016, 187144, -3200); Engine.MoveTo(32040, 186760, -3232); Engine.MoveTo(30984, 186408, -3400); Engine.MoveTo(30184, 186200, -3632); Engine.MoveTo(28632, 186312, -3664); Engine.MoveTo(26488, 186696, -3536); Engine.MoveTo(25400, 186504, -3360); Engine.MoveTo(23176, 186440, -3456); Engine.MoveTo(21944, 186280, -3336); Engine.MoveTo(21288, 186408, -3248); Engine.MoveTo(20936, 186472, -3240); Engine.MoveTo(20424, 186296, -3344); Engine.MoveTo(19944, 186040, -3344); Engine.MoveTo(19688, 185608, -3344); Engine.MoveTo(19816, 185416, -3336); Engine.MoveTo(20200, 185176, -3336); Engine.MoveTo(20584, 184904, -3336); Engine.MoveTo(20904, 184696, -3336); Engine.LoadZone(script.path+'BarahamNoblesse.zmap'); engine.facecontrol(0, true); while not engine.queststatus(241,4) do delay(500); while user.incombat do delay(500); engine.facecontrol(0, false); end; if engine.queststatus(241,4) and not engine.queststatus(241,5) then begin //st4 while not user.inrange(147452, 27127, -2192,300) do begin Teleport.TpAden; end; Engine.MoveTo(147624, 26904, -2192); Engine.MoveTo(147624, 26504, -2176); Engine.MoveTo(147688, 26360, -2120); while not engine.queststatus(241,5) do begin engine.settarget(31739); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,5) and not engine.queststatus(241,6) then begin //st5 while not user.inrange(111078, 218929, -3520,300) do begin Teleport.TpHeine; end; Engine.MoveTo(110680, 219096, -3520); Engine.MoveTo(110040, 219096, -3456); Engine.MoveTo(110056, 218536, -3528); Engine.MoveTo(110056, 218104, -3528); Engine.MoveTo(110072, 217720, -3592); Engine.MoveTo(110040, 217288, -3728); Engine.MoveTo(109672, 217336, -3728); Engine.MoveTo(109336, 217496, -3728); Engine.MoveTo(108744, 217512, -3688); Engine.MoveTo(108248, 217528, -3672); Engine.MoveTo(107832, 217560, -3656); Engine.MoveTo(107624, 217848, -3656); Engine.MoveTo(107304, 218056, -3656); Engine.MoveTo(107144, 218072, -3656); Engine.MoveTo(107112, 217736, -3576); Engine.MoveTo(107096, 217192, -3576); Engine.MoveTo(107000, 217000, -3576); while not engine.queststatus(241,6) do begin engine.settarget(31042); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,6) and not engine.queststatus(241,7) then begin //st6 while not user.inrange(73048, 118300, -3688,300) do begin Teleport.TpDeathPass; end; Engine.MoveTo(72856, 117736, -3664); Engine.MoveTo(72424, 117000, -3664); Engine.MoveTo(71928, 115608, -3680); Engine.MoveTo(71592, 114440, -3712); Engine.MoveTo(71400, 113448, -3696); Engine.MoveTo(71336, 112472, -3680); Engine.MoveTo(71288, 111176, -3712); Engine.MoveTo(71016, 110168, -3712); Engine.MoveTo(70904, 108312, -3712); Engine.MoveTo(70952, 106984, -3712); Engine.MoveTo(71080, 105384, -3680); Engine.MoveTo(71240, 104376, -3664); Engine.MoveTo(71464, 102968, -3696); Engine.MoveTo(71608, 102120, -3712); Engine.MoveTo(71768, 101240, -3696); Engine.MoveTo(72104, 100888, -3680); Engine.MoveTo(72392, 100232, -3616); Engine.MoveTo(73176, 99992, -3392); Engine.MoveTo(73592, 99848, -3288); Engine.MoveTo(74200, 99576, -3264); Engine.MoveTo(74920, 99640, -3264); Engine.MoveTo(75640, 99800, -3296); Engine.MoveTo(76744, 100024, -3376); Engine.MoveTo(76648, 101304, -3296); Engine.MoveTo(76504, 102552, -3176); Engine.MoveTo(76328, 103432, -3056); Engine.MoveTo(76088, 104456, -2960); Engine.MoveTo(75992, 105016, -2880); Engine.MoveTo(76232, 105592, -2912); Engine.MoveTo(76920, 106568, -2944); Engine.MoveTo(76712, 107000, -2880); Engine.LoadZone(script.path+'SuccubusNoblesse.zmap'); engine.facecontrol(0, true); while not engine.queststatus(241,7) do delay(500); AttackDefense; end; if engine.queststatus(241,7) and not engine.queststatus(241,8) then begin //st7 while not user.inrange(111078, 218929, -3520,300) do begin Teleport.TpHeine; end; Engine.MoveTo(110680, 219096, -3520); Engine.MoveTo(110040, 219096, -3456); Engine.MoveTo(110056, 218536, -3528); Engine.MoveTo(110056, 218104, -3528); Engine.MoveTo(110072, 217720, -3592); Engine.MoveTo(110040, 217288, -3728); Engine.MoveTo(109672, 217336, -3728); Engine.MoveTo(109336, 217496, -3728); Engine.MoveTo(108744, 217512, -3688); Engine.MoveTo(108248, 217528, -3672); Engine.MoveTo(107832, 217560, -3656); Engine.MoveTo(107624, 217848, -3656); Engine.MoveTo(107304, 218056, -3656); Engine.MoveTo(107144, 218072, -3656); Engine.MoveTo(107112, 217736, -3576); Engine.MoveTo(107096, 217192, -3576); Engine.MoveTo(107000, 217000, -3576); while not engine.queststatus(241,8) do begin engine.settarget(31042); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,8) and not engine.queststatus(241,9) then begin //st8 while not user.inrange(147452, 27127, -2192,300) do begin Teleport.TpAden; end; Engine.MoveTo(147720, 26360, -2120); while not engine.queststatus(241,9) do begin engine.settarget(31739); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,9) and not engine.queststatus(241,10) then begin //st9 while not user.inrange(116543, 76297, -2720,300) do begin Teleport.TpHunters; end; Engine.MoveTo(117112, 76264, -2720); Engine.MoveTo(117672, 76216, -2672); Engine.MoveTo(118072, 76136, -2672); Engine.MoveTo(118488, 76248, -2632); Engine.MoveTo(119336, 76504, -2368); Engine.MoveTo(119576, 76568, -2256); Engine.MoveTo(119688, 76680, -2256); Engine.MoveTo(119576, 76840, -2256); Engine.MoveTo(119272, 77112, -2256); Engine.MoveTo(119368, 77304, -2240); Engine.MoveTo(119544, 77400, -2224); Engine.MoveTo(119848, 77304, -2224); while not engine.queststatus(241,10) do begin engine.settarget(30692); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,10) and not engine.queststatus(241,11) then begin //st10 while not user.inrange(147452, 27127, -2192,300) do begin Teleport.TpAden; end; Engine.MoveTo(147720, 26360, -2120); while not engine.queststatus(241,11) do begin engine.settarget(31739); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,11) and not engine.queststatus(241,12) then begin //st11 while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); while not engine.queststatus(241,12) do begin engine.settarget(31742); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(2000); end; end; if engine.queststatus(241,12) and not engine.queststatus(241,13) then begin //st12 if not user.inrange(33000, -48200, 1792, 400) then begin while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); end; while not engine.queststatus(241,13) do begin engine.settarget(31744); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,13) and not engine.queststatus(241,14) then begin //st13 while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43880, -49816, -784); Engine.MoveTo(43624, -49208, -776); Engine.MoveTo(43432, -49176, -776); Engine.MoveTo(43112, -49256, -776); Engine.MoveTo(42936, -48776, -776); Engine.MoveTo(42552, -48328, -784); Engine.MoveTo(41656, -48264, -784); Engine.MoveTo(40568, -48248, -752); Engine.MoveTo(39736, -48232, -752); Engine.MoveTo(38168, -48248, -1136); Engine.MoveTo(37608, -48408, -1136); Engine.MoveTo(37384, -48648, -1112); Engine.MoveTo(37352, -49032, -1112); Engine.MoveTo(37416, -49240, -1112); Engine.MoveTo(37960, -49336, -1112); Engine.MoveTo(38184, -49352, -1112); Engine.MoveTo(38328, -49256, -1112); while not engine.queststatus(241,14) do begin engine.settarget(31336); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,14) and not engine.queststatus(241,15) then begin //st14 while not user.inrange(172120, 20272, -3312,300) do begin Teleport.TpCementery; end; Engine.MoveTo(172216, 20056, -3312); Engine.MoveTo(172504, 20088, -3312); Engine.MoveTo(172712, 20200, -3312); Engine.MoveTo(173032, 20232, -3224); Engine.MoveTo(173960, 20232, -3232); Engine.MoveTo(174680, 20216, -3232); Engine.MoveTo(175768, 20232, -3232); Engine.MoveTo(176648, 20216, -3232); Engine.MoveTo(177656, 20232, -3232); Engine.MoveTo(178088, 20216, -3232); Engine.MoveTo(178424, 19816, -3232); Engine.MoveTo(178616, 19704, -3200); Engine.MoveTo(178840, 19656, -3152); Engine.MoveTo(179480, 19432, -3152); Engine.MoveTo(179592, 19240, -3152); Engine.MoveTo(179656, 19112, -3152); Engine.MoveTo(179720, 17192, -3152); Engine.MoveTo(181064, 17144, -3152); Engine.LoadZone(script.path+'CrimsonMoss.zmap'); engine.facecontrol(0, true); while not engine.queststatus(241,15) do delay(500); AttackDefense; end; if engine.queststatus(241,15) and not engine.queststatus(241,16) then begin //st15 while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43848, -49832, -784); Engine.MoveTo(43544, -49176, -776); Engine.MoveTo(43112, -49256, -776); Engine.MoveTo(42920, -48568, -784); Engine.MoveTo(42696, -48328, -784); Engine.MoveTo(42008, -48248, -784); Engine.MoveTo(40712, -48232, -752); Engine.MoveTo(39832, -48216, -752); Engine.MoveTo(38136, -48248, -1136); Engine.MoveTo(37528, -48440, -1136); Engine.MoveTo(37352, -48728, -1112); Engine.MoveTo(37384, -49144, -1112); Engine.MoveTo(37432, -49320, -1112); Engine.MoveTo(37896, -49336, -1112); Engine.MoveTo(38280, -49272, -1112); Engine.MoveTo(38344, -49272, -1112); while not engine.queststatus(241,16) do begin engine.settarget(31336); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,16) and not engine.queststatus(241,17) then begin //st16 while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); while not engine.queststatus(241,17) do begin engine.settarget(31743); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,17) and not engine.queststatus(241,18) then begin //st17 if not user.inrange(33000, -48200, 1792, 300) then begin while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); end; while not engine.queststatus(241,18) do begin engine.settarget(31742); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,18) and not engine.queststatus(241,19) then begin //st18 while not user.inrange(147790, -56496, -2768,300) do begin Teleport.TpGoddard; end; Engine.MoveTo(148360, -56216, -2760); Engine.MoveTo(149016, -56376, -2768); Engine.MoveTo(149240, -56424, -2768); Engine.MoveTo(149912, -56904, -2960); Engine.MoveTo(150040, -57336, -2960); Engine.MoveTo(150104, -57864, -2960); while not engine.queststatus(241,19) do begin engine.settarget(31740); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(241,19) and not engine.queststatus(241,20) then begin //st19 while not Inventory.Quest.ByID(7677, item) do begin engine.settarget(31740); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; ///////////////////////// end; procedure chapter2; // Precious Soul 2 var item: TL2item; begin if Inventory.Quest.ByID(7677, item) then begin while not user.inrange(44115, -50215, -784,300) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); while not engine.queststatus(242,1) do begin engine.settarget(31742); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,1) and not engine.queststatus(242,2) then begin while not engine.queststatus(242,2) do begin engine.settarget(31743); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,2) and not engine.queststatus(242,3) then begin while not engine.queststatus(242,3) do begin engine.settarget(31744); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,3) and not engine.queststatus(242,4) then begin while not user.inrange(93137, -58245, -2832,300) do begin Teleport.TpScreams; end; Engine.MoveTo(94952, -59432, -2424); Engine.MoveTo(94984, -60152, -2432); Engine.MoveTo(95000, -60584, -2464); while not engine.queststatus(242,4) do begin engine.settarget(31751); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,4) and not engine.queststatus(242,5) then begin while not engine.queststatus(242,5) do begin engine.settarget(31752); delay(500); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); delay(500); engine.DlgSel(1); delay(500); if user.target.dead then engine.canceltarget; end; end; if engine.queststatus(242,5) and not engine.queststatus(242,6) then begin while not engine.queststatus(242,6) do begin engine.settarget(31751); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,6) and not engine.queststatus(242,7) then begin while not user.inrange(85235, 16207, -3656,500) do begin Teleport.TpIvory; end; Engine.MoveTo(85400, 16488, -3624); Engine.MoveTo(85352, 16872, -3592); Engine.MoveTo(85368, 17384, -3496); Engine.MoveTo(85352, 17752, -3496); Engine.MoveTo(85368, 18760, -3680); Engine.MoveTo(85368, 19560, -3768); Engine.MoveTo(85384, 20056, -3768); Engine.MoveTo(85384, 20856, -3696); Engine.MoveTo(85384, 21368, -3608); Engine.MoveTo(85384, 21928, -3512); Engine.MoveTo(85384, 22504, -3496); Engine.MoveTo(85384, 23160, -3496); Engine.MoveTo(85432, 24008, -3624); Engine.MoveTo(85496, 24120, -3616); Engine.MoveTo(86056, 24424, -3576); Engine.MoveTo(86488, 24312, -3584); Engine.MoveTo(87288, 23976, -3536); Engine.MoveTo(87864, 23944, -3488); Engine.MoveTo(88280, 23944, -3504); Engine.MoveTo(89016, 23752, -3584); Engine.MoveTo(89656, 23608, -3584); Engine.MoveTo(90216, 23464, -3584); Engine.MoveTo(90760, 23528, -3592); Engine.MoveTo(91528, 23400, -3544); Engine.MoveTo(92088, 23304, -3408); Engine.MoveTo(93016, 23064, -3240); Engine.MoveTo(93976, 22872, -3112); Engine.MoveTo(94408, 22568, -2992); Engine.MoveTo(94872, 22392, -2896); Engine.MoveTo(95288, 22184, -2864); Engine.MoveTo(95352, 22136, -2864); while not engine.queststatus(242,7) do begin engine.settarget(30759); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,7) and not engine.queststatus(242,8) then begin while not user.inrange(85235, 16207, -3656,500) do begin Teleport.TpIvory; end; Engine.MoveTo(85400, 16360, -3648); Engine.MoveTo(85336, 17032, -3584); Engine.MoveTo(85336, 17544, -3496); Engine.MoveTo(85336, 19784, -3768); Engine.MoveTo(85352, 20984, -3680); Engine.MoveTo(85352, 21832, -3528); Engine.MoveTo(85352, 22664, -3496); Engine.MoveTo(85336, 23240, -3496); Engine.MoveTo(85336, 24024, -3632); Engine.MoveTo(85064, 24088, -3616); Engine.MoveTo(84856, 24008, -3568); Engine.MoveTo(84376, 24232, -3552); Engine.MoveTo(83640, 24264, -3552); Engine.MoveTo(82968, 24088, -3504); Engine.MoveTo(82056, 23848, -3520); Engine.MoveTo(81336, 23656, -3552); Engine.MoveTo(80312, 23272, -3552); Engine.MoveTo(79768, 22952, -3552); Engine.MoveTo(79032, 22248, -3536); Engine.MoveTo(78552, 21624, -3552); Engine.MoveTo(78168, 20760, -3552); Engine.MoveTo(77848, 19976, -3552); Engine.MoveTo(77640, 19112, -3600); Engine.MoveTo(77480, 17992, -3792); Engine.MoveTo(75656, 18568, -3744); Engine.MoveTo(74232, 18440, -3632); Engine.MoveTo(71592, 18360, -3664); Engine.MoveTo(70104, 18168, -3632); Engine.MoveTo(69880, 18120, -3648); while not engine.queststatus(242,8) do begin engine.settarget(30738); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,8) and not engine.queststatus(242,9) then begin while not user.inrange(85235, 16207, -3656,500) do begin Teleport.TpIvory; end; Engine.MoveTo(85400, 16488, -3624); Engine.MoveTo(85352, 16872, -3592); Engine.MoveTo(85368, 17384, -3496); Engine.MoveTo(85352, 17752, -3496); Engine.MoveTo(85368, 18760, -3680); Engine.MoveTo(85368, 19560, -3768); Engine.MoveTo(85384, 20056, -3768); Engine.MoveTo(85384, 20856, -3696); Engine.MoveTo(85384, 21368, -3608); Engine.MoveTo(85384, 21928, -3512); Engine.MoveTo(85384, 22504, -3496); Engine.MoveTo(85384, 23160, -3496); Engine.MoveTo(85432, 24008, -3624); Engine.MoveTo(85496, 24120, -3616); Engine.MoveTo(86056, 24424, -3576); Engine.MoveTo(86488, 24312, -3584); Engine.MoveTo(87288, 23976, -3536); Engine.MoveTo(87864, 23944, -3488); Engine.MoveTo(88280, 23944, -3504); Engine.MoveTo(89016, 23752, -3584); Engine.MoveTo(89656, 23608, -3584); Engine.MoveTo(90216, 23464, -3584); Engine.MoveTo(90760, 23528, -3592); Engine.MoveTo(91528, 23400, -3544); Engine.MoveTo(92088, 23304, -3408); Engine.MoveTo(93016, 23064, -3240); Engine.MoveTo(93976, 22872, -3112); Engine.MoveTo(94408, 22568, -2992); Engine.MoveTo(94872, 22392, -2896); Engine.MoveTo(95288, 22184, -2864); Engine.MoveTo(95352, 22136, -2864); while not engine.queststatus(242,9) do begin engine.settarget(30759); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(242,9) and not engine.queststatus(242,10) then begin // как будет перс для теста, переписать, пока и так работает. if not user.inrange(86488, -75912, -3464, 3000) then begin while not user.inrange(67989, -71937, -3728,500) do begin Teleport.TpVOS; end; Engine.MoveTo(69000, -72120, -3776); Engine.MoveTo(70152, -72760, -3776); Engine.MoveTo(71912, -73672, -3728); Engine.MoveTo(73608, -74600, -3536); Engine.MoveTo(74728, -74472, -3328); Engine.MoveTo(75704, -74408, -3184); Engine.MoveTo(77064, -74152, -3040); Engine.MoveTo(77752, -73192, -2992); Engine.MoveTo(77976, -72536, -2968); Engine.MoveTo(78728, -70968, -3488); Engine.MoveTo(80024, -71192, -3440); Engine.MoveTo(81192, -71384, -3424); Engine.MoveTo(82440, -71672, -3456); Engine.MoveTo(83400, -72296, -3472); Engine.MoveTo(84152, -72920, -3488); Engine.MoveTo(84936, -73576, -3600); Engine.MoveTo(86408, -73992, -3552); Engine.MoveTo(87416, -74232, -3520); Engine.MoveTo(87848, -74408, -3488); Engine.MoveTo(87160, -75160, -3480); Engine.MoveTo(86424, -75864, -3464); Engine.MoveTo(86040, -76216, -3456); Engine.MoveTo(85880, -76488, -3456); end; Engine.LoadZone(script.path+'VOS_Unicorn.zmap'); engine.facecontrol(0, true); while not inventory.Quest.ByID(7595, item) or (item.count < 4) do delay(500); AttackDefense; Engine.MoveTo(85880, -76536, -3456); while not ValidNPC do delay(500); while inventory.Quest.ByID(7595, item) and (item.count > 0) do begin Target(31748); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); if user.target.dead then engine.canceltarget; delay(500); end; end; if engine.queststatus(242,10) and not engine.queststatus(242,11) then begin if not user.inrange(86488, -75912, -3464, 3000) then begin while not user.inrange(67989, -71937, -3728,500) do begin Teleport.TpVOS; end; Engine.MoveTo(69000, -72120, -3776); Engine.MoveTo(70152, -72760, -3776); Engine.MoveTo(71912, -73672, -3728); Engine.MoveTo(73608, -74600, -3536); Engine.MoveTo(74728, -74472, -3328); Engine.MoveTo(75704, -74408, -3184); Engine.MoveTo(77064, -74152, -3040); Engine.MoveTo(77752, -73192, -2992); Engine.MoveTo(77976, -72536, -2968); Engine.MoveTo(78728, -70968, -3488); Engine.MoveTo(80024, -71192, -3440); Engine.MoveTo(81192, -71384, -3424); Engine.MoveTo(82440, -71672, -3456); Engine.MoveTo(83400, -72296, -3472); Engine.MoveTo(84152, -72920, -3488); Engine.MoveTo(84936, -73576, -3600); Engine.MoveTo(86408, -73992, -3552); Engine.MoveTo(87416, -74232, -3520); Engine.MoveTo(87848, -74408, -3488); Engine.MoveTo(87160, -75160, -3480); Engine.MoveTo(86424, -75864, -3464); Engine.MoveTo(86040, -76216, -3456); Engine.MoveTo(85880, -76488, -3456); end; while not engine.queststatus(242,11) do begin engine.settarget(31746); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.canceltarget; delay(500); engine.settarget(31747); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); end; end; if engine.queststatus(242,11) then begin while not user.inrange(44083, -50161, -784,500) do begin Teleport.TpRune; end; Engine.MoveTo(43928, -49704, -784); Engine.MoveTo(43848, -48968, -784); Engine.MoveTo(43608, -48328, -784); Engine.MoveTo(43368, -48184, -784); Engine.MoveTo(41960, -48184, -784); Engine.MoveTo(40344, -48264, -752); Engine.MoveTo(40344, -48760, -672); Engine.MoveTo(40200, -49592, -384); Engine.MoveTo(40088, -49880, -288); Engine.MoveTo(39672, -50472, -224); Engine.MoveTo(38776, -50968, 16); Engine.MoveTo(37992, -51208, 304); Engine.MoveTo(37112, -51224, 640); Engine.MoveTo(36872, -51224, 728); Engine.MoveTo(36664, -51128, 728); Engine.MoveTo(36680, -50728, 896); Engine.MoveTo(36680, -50504, 912); Engine.MoveTo(37176, -50136, 912); Engine.MoveTo(37912, -49496, 912); Engine.MoveTo(38184, -49016, 912); Engine.MoveTo(38456, -48264, 912); Engine.MoveTo(37656, -48232, 912); Engine.MoveTo(36728, -48216, 912); Engine.MoveTo(36328, -48104, 912); Engine.MoveTo(35928, -47752, 912); Engine.MoveTo(35928, -47064, 1072); Engine.MoveTo(35896, -46952, 1088); Engine.MoveTo(35640, -46920, 1160); Engine.MoveTo(35176, -46920, 1336); Engine.MoveTo(35000, -46920, 1408); Engine.MoveTo(34888, -46968, 1408); Engine.MoveTo(34904, -47528, 1560); Engine.MoveTo(34888, -47976, 1688); Engine.MoveTo(34872, -48168, 1728); Engine.MoveTo(34776, -48200, 1736); Engine.MoveTo(34280, -48216, 1792); Engine.MoveTo(33432, -48168, 1792); Engine.MoveTo(33048, -48184, 1792); while engine.queststatus(242,11) do begin engine.settarget(31743); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; //////////////////////////////////////////////// end; procedure chapter3; // Precious Soul 3 var item: TL2item; begin if Inventory.Quest.ByID(7678, item) then begin while not user.inrange(147816, -56514, -2768,500) do begin Teleport.TpGoddard; end; Engine.MoveTo(147928, -56152, -2768); Engine.MoveTo(148488, -56200, -2768); Engine.MoveTo(149048, -56376, -2768); Engine.MoveTo(149272, -56488, -2760); Engine.MoveTo(149576, -56696, -2864); Engine.MoveTo(149896, -56952, -2960); Engine.MoveTo(150008, -57352, -2960); Engine.MoveTo(150104, -57816, -2960); Engine.MoveTo(150104, -57880, -2960); while Inventory.Quest.ByID(7678, item) do begin engine.settarget(31740); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(246,1) and not engine.queststatus(246,2) then begin while not engine.queststatus(246,2) do begin engine.settarget(31741); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(246,2) and not engine.queststatus(246,3) then begin while not user.inrange(67959, -71929, -3728,500) do begin Teleport.TpVOS; end; //to Piligrim Engine.MoveTo(68408, -72152, -3728); Engine.MoveTo(69032, -72472, -3776); Engine.MoveTo(70136, -72968, -3760); Engine.MoveTo(71528, -73576, -3752); Engine.MoveTo(72952, -74120, -3680); Engine.MoveTo(73736, -74408, -3504); Engine.MoveTo(74600, -74472, -3376); Engine.MoveTo(75512, -74408, -3200); Engine.MoveTo(76696, -74280, -3088); Engine.MoveTo(77464, -74264, -3024); Engine.MoveTo(77960, -74168, -3080); Engine.MoveTo(78328, -74360, -3224); Engine.MoveTo(78920, -75048, -3480); Engine.MoveTo(79384, -75736, -3672); Engine.MoveTo(79736, -76328, -3920); Engine.MoveTo(79896, -76808, -4000); Engine.LoadZone(script.path+'NoblessePiligrim.zmap'); engine.facecontrol(0, true); while not inventory.Quest.ByID(7591, item) do begin if user.target = nil then Engine.DMoveTo(80488, -79192, -4032); delay(500); // вставить ID кольца. end; // вставить ID кольца. engine.facecontrol(0,false); /////////// //to Judge Engine.MoveTo(81544, -79496, -4032); Engine.MoveTo(82392, -79880, -3936); Engine.MoveTo(83192, -80040, -3728); Engine.MoveTo(83640, -80120, -3544); Engine.MoveTo(84408, -80456, -3504); Engine.MoveTo(85400, -80792, -3600); Engine.MoveTo(86280, -80760, -3696); Engine.MoveTo(87256, -79864, -3696); Engine.MoveTo(88056, -79032, -3696); Engine.MoveTo(89096, -78296, -3760); Engine.MoveTo(89656, -78088, -3776); Engine.LoadZone(script.path+'NoblesseJudge.zmap'); engine.facecontrol(0, true); while not inventory.Quest.ByID(7592, item) do delay(500); // вставить ID кольца. AttackDefense; // придумать как фиксануть проверку на атаку end; if engine.queststatus(246,3) and not engine.queststatus(246,4) then begin while not user.inrange(147816, -56514, -2768,500) do begin Teleport.TpGoddard; end; Engine.MoveTo(148600, -56184, -2768); Engine.MoveTo(149224, -56424, -2768); Engine.MoveTo(149592, -56696, -2864); Engine.MoveTo(149896, -56920, -2960); Engine.MoveTo(149960, -57288, -2960); Engine.MoveTo(150088, -57656, -2960); Engine.MoveTo(150152, -57816, -2960); while not engine.queststatus(246,4) do begin engine.settarget(31741); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(2); delay(500); end; end; if engine.queststatus(246,4) and not engine.queststatus(246,5) then begin while not user.inrange(67959, -71929, -3728,500) do begin Teleport.TpVOS; end; Engine.MoveTo(69224, -72456, -3792); Engine.MoveTo(69976, -72776, -3776); Engine.MoveTo(70952, -73208, -3776); Engine.MoveTo(71832, -73576, -3744); Engine.MoveTo(73384, -74296, -3568); Engine.MoveTo(73976, -74504, -3472); Engine.MoveTo(75096, -74424, -3248); Engine.MoveTo(76104, -74392, -3152); Engine.MoveTo(76936, -74232, -3056); Engine.MoveTo(77688, -74216, -3040); Engine.MoveTo(78200, -74360, -3192); Engine.MoveTo(79272, -75048, -3552); Engine.MoveTo(80232, -77176, -4032); Engine.MoveTo(80408, -77736, -4032); Engine.MoveTo(81336, -78824, -4032); Engine.MoveTo(82264, -79704, -3968); Engine.MoveTo(83160, -79976, -3744); Engine.MoveTo(83688, -80056, -3536); Engine.MoveTo(84040, -80216, -3488); Engine.MoveTo(84584, -81160, -3504); Engine.MoveTo(84920, -82936, -3552); Engine.MoveTo(85320, -84664, -3552); Engine.MoveTo(86184, -85944, -3408); Engine.MoveTo(86648, -86344, -3192); Engine.MoveTo(87288, -86536, -2984); Engine.MoveTo(88168, -86424, -2840); Engine.MoveTo(89016, -86168, -2744); Engine.MoveTo(89208, -86984, -2752); Engine.MoveTo(88728, -87656, -2752); Engine.MoveTo(88488, -88456, -2760); Engine.MoveTo(88344, -88968, -2760); Engine.MoveTo(87704, -89192, -2704); Engine.MoveTo(87064, -89208, -2704); Engine.LoadZone(script.path+'NoblesseStuff.zmap'); engine.facecontrol(0,true); while not inventory.Quest.ByID(7593, item) do delay(500); engine.facecontrol(0,false); AttackDefense; end; if engine.queststatus(246,5) and not engine.queststatus(246,6) then begin while not user.inrange(147816, -56514, -2768,500) do begin Teleport.TpGoddard; end; Engine.MoveTo(148392, -56200, -2760); Engine.MoveTo(148872, -56264, -2768); Engine.MoveTo(149256, -56424, -2760); Engine.MoveTo(149592, -56664, -2864); Engine.MoveTo(149880, -56888, -2960); Engine.MoveTo(149976, -57032, -2960); Engine.MoveTo(150040, -57432, -2960); Engine.MoveTo(150184, -57832, -2960); while not engine.queststatus(246,6) do begin engine.settarget(31741); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end; end; if engine.queststatus(246,6) and not engine.queststatus(246,7) then begin while not user.inrange(85279, 16107, -3656,500) do begin Teleport.TpIvory; end; while not user.inrange(85424, 16071, -1760,500) do begin //go 4 floor engine.settarget(30727); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel(3); delay(500); engine.DlgSel(4); delay(500); end; while not Inventory.Quest.ByID(7679, item) do begin engine.settarget(30721); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); engine.DlgSel(1); delay(500); end; end; ////////////////////////////////// end; procedure chapter4; // Precious Soul 4 var item: TL2item; begin if Inventory.Quest.ByID(7679, item) then begin while not user.inrange(147816, -56514, -2768,500) do begin Teleport.TpGoddard; end; Engine.MoveTo(148072, -56312, -2768); Engine.MoveTo(148392, -56232, -2760); Engine.MoveTo(148728, -56280, -2768); Engine.MoveTo(149016, -56424, -2768); Engine.MoveTo(149272, -56488, -2760); Engine.MoveTo(149624, -56696, -2864); Engine.MoveTo(149848, -56936, -2960); Engine.MoveTo(149944, -57112, -2960); Engine.MoveTo(149992, -57432, -2960); Engine.MoveTo(150024, -57720, -2960); Engine.MoveTo(150072, -57848, -2960); end; //////////// end; begin chapter1; chapter2; chapter3; chapter4; end. // разная хуйня // пофиксить отбивку через интерфейс. Engine.LoadZone(script.path+'VOS_Unicorn.zmap'); if engine.queststatus(246,1) and not engine.queststatus(246,2) then begin while not user.inrange(84429, 147265, -3392,500) do begin Teleport.TpGiran; end; end; while not engine.queststatus(242,11) do begin engine.settarget(31743); engine.movetotarget(-100); engine.dlgOpen; delay(500); engine.DlgSel('Quest'); delay(500); engine.DlgSel(1); delay(500); end;
-
Share V Interface For Server Owners
amita replied to Iordanov's topic in Client Development Discussion
nice post!! -
Share [C6]Patch By Eddy v4.5.7 NEW ! 2019-01-29
amita replied to eddyteh's topic in Client Development Discussion
NICE MAN !!! -
I use the L2Ronin 1 week in a server with a lot of pl even adrenaline don't work there ..so for me the team of this bot have work a lot for this. is very simple to use the price is a plus, is in beta stage but always a new update make this bot better this words coming from a person who have bot from times like c3 end l2walker so this bot worth a try :)
-
From bella ^
- 473 replies
-
- L2P Platform
- x15
-
(and 6 more)
Tagged with:
-
you must run it as administrator:)
-
/parta
-
this server going to rock all mid rate servers remember me !!!!!
-
L2MagMeld PvP server GRAND OPENING FRIDAY 14.09
amita replied to houssemFTW's topic in Private Servers
nice server.. -
katarxas katevaste ayto http://rapidshare.com/files/338606999/Proxifier.v2.7.Cracked-MAZE.rar.html afou katevasete ayto kai to trexete 8a xriastite kapoia url free proxys sock5 ta opoia einai edwhttp://sockslist.net/list/proxy-socks-5-list/:D mesa sto proxyfier exei allo ena programataki pou legete proxy tester ekei testarete ta url gia to latensy protimiste kato apo 200ms latensy me liga logia psaxte gia url apo eu galia germania boulgaria ktl :) :D :Dplz kapios na to kani hide giati den xerw pos... Versus: Hidden posts removed.
-
!!! http://l2masterl2.weebly.com DOWNLOAD THE PATCH SERVER WITH HOST FILE http://rapidshare.com/files/272304109/l2master_patch.rar 1. Install L2 GRACIA FINAL DOWNLOAD FROM THE FOLLOWING LINK: http://www.gamershell.com/download_44070.shtml 2. DOWNLOAD THE PATCH-SYSTEM OF THE SERVER AND PUT THE FILE TO HOST THE YOUR DISK: c: \ windows \ system32 \ drivers \ etc 3. MAKE REPLACEMENT OF THE FILE SYSTEM INSTALLATION OF L2, and start the file L2.EXE 3. Play L2 MASTER and have fun!!! Features: *xp:8000 *cp:8000 *adena:4000 *drop:5x *spoil:5x *safe enchant:8 *max enchant:30 *Standard events like TvT * Siege and Manor System * Hero and Olympiads * Castles & Clan Hall & Fortress * Working Fishing
-
[Share]L2JOfficial CT2.3 Preconfigured Pack
amita replied to ®ৠ♪Ŋαķαмοūŗα♪ৠ®'s topic in Server Development Discussion [Greek]
yparxei bug se ayto to pack sto enha skills ta pai +30 amesos kapios help? -
apati kai exei ksanaginei post:P
-
amitatasos7@hotmail.com :D