Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //// Tateosian Script Quest //// Rebuff if no WW , die Tap Too Town and quest in Loop
- var
- item: TL2Item;
- function buffCheck: Boolean;
- var buff: TL2Buff;
- begin
- if user.inrange(146272, -58176, -2976, 250, 150) then begin
- Engine.MoveTo(147593, -58103, -3007);
- Engine.MoveTo(147727, -57141, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(145264, -57680, -2976, 250, 150) then begin
- Engine.MoveTo(145588, -56926, -3007);
- Engine.MoveTo(146673, -56095, -2807);
- Engine.MoveTo(147543, -56054, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(144810, -55558, -2976, 250, 150) then begin
- Engine.MoveTo(145588, -56926, -3007);
- Engine.MoveTo(146673, -56095, -2807);
- Engine.MoveTo(147543, -56054, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if User.inrange(144496,-55088,-2976, 250, 150) then begin
- Engine.MoveTo(145065, -56666, -2976);
- Engine.MoveTo(146673, -56095, -2807);
- Engine.MoveTo(147543, -56054, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(145696, -57696, -2976, 250, 150) then begin
- Engine.MoveTo(145510, -56930, -3007);
- Engine.MoveTo(146499, -56202, -2807);
- Engine.MoveTo(147481, -56031, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(144944, -55392, -2976, 250, 150) then begin
- Engine.MoveTo(145153, -56813, -3007);
- Engine.MoveTo(145569, -56855, -3007);
- Engine.MoveTo(146467, -56271, -2807);
- Engine.MoveTo(147566, -56034, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(144752, -56752, -2976, 250, 150) then begin
- Engine.MoveTo(145534, -56884, -3007);
- Engine.MoveTo(146265, -56418, -2807);
- Engine.MoveTo(147407, -56063, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(149120, -58064, -2976, 250, 150) then begin
- Engine.MoveTo(147706, -58107, -3007);
- Engine.MoveTo(147751, -56737, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(150400, -56752, -2976, 250, 150) then begin
- Engine.MoveTo(149935, -56870, -3007);
- Engine.MoveTo(149139, -56390, -2807);
- Engine.MoveTo(147929, -56063, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(150704, -55744, -2976, 250, 150) then begin
- Engine.MoveTo(149935, -56870, -3007);
- Engine.MoveTo(149139, -56390, -2807);
- Engine.MoveTo(147929, -56063, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(147680, -58208, -2976, 250, 150) then begin
- Engine.MoveTo(147727, -57141, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(148288, -58304, -2976, 250, 150) then begin
- Engine.MoveTo(147738, -58050, -3007);
- Engine.MoveTo(147727, -57141, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(147232, -58480, -2976, 250, 150) then begin
- Engine.MoveTo(147677, -58063, -3007);
- Engine.MoveTo(147727, -57141, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(149088, -56256, -2776, 250, 150) then begin
- Engine.MoveTo(147854, -56054, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(146832, -55904, -2776, 250, 150) then begin
- Engine.MoveTo(147529, -56046, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(146368, -56256, -2776, 250, 150) then begin
- Engine.MoveTo(147529, -56046, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(147664, -56464, -2776, 250, 150) then begin
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(147680, -56928, -2776, 250, 150) then begin
- Engine.MoveTo(147810, -56110, -2807);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(148560, -55904, -2776, 250, 150) then begin
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(149872, -57424, -2976, 250, 150) then begin
- Engine.MoveTo(149897, -56910, -2979);
- Engine.MoveTo(149230, -56412, -2779);
- Engine.MoveTo(147939, -55999, -2772);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(144960, -56224, -2976, 250, 150) then begin
- Engine.MoveTo(145458, -56853, -2979);
- Engine.MoveTo(146343, -56326, -2779);
- Engine.MoveTo(147625, -55995, -2772);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(144496, -55088, -2976, 250, 150) then begin
- Engine.MoveTo(145327, -56873, -2979);
- Engine.MoveTo(146337, -56445, -2779);
- Engine.MoveTo(147533, -55963, -2766);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if user.inrange(145392, -56960, -2976, 250, 150) then begin
- Engine.MoveTo(146347, -56305, -2779);
- Engine.MoveTo(147514, -56003, -2772);
- Engine.MoveTo(148012, -55272, -2728);
- end;
- if not User.Buffs.ByID(1204, buff) then begin
- Result:=true;
- Print('Buffs are needed. Buffing...');
- Delay(500);
- Engine.SetTarget(35721); //Target NPC BUFF
- Delay(1500);
- Engine.DlgOpen;
- Delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(6);
- Delay(500);
- end;
- Result:=false;
- end;
- function deadCheck: Boolean;
- begin
- Result := false;
- if User.Dead then begin
- Result := true;
- Print('Dead. Pressing to village.');
- Delay(1000);
- Engine.GOHome; ///here change to town or other
- Delay(10000);
- end;
- end;
- function teleport: Boolean;
- begin
- if user.inrange(147998, -55929, -2760, 150) and User.Buffs.ByID(1204, buffCheck) then begin
- Delay(500);
- Engine.SetTarget(31275);
- Delay(500);
- Engine.DlgOpen;
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(11);
- Delay(5000);
- Engine.MoveTo(149575,-112710,-2060); // same move too for soe and quest function
- end;
- Result:=false;
- end;
- function soe: Boolean;
- var buff: TL2Buff;
- begin
- Result := false;
- if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, buff) then begin // same move too for soe and quest function
- Result := true;
- Engine.UseItem(736);
- Delay(15000);
- end;
- end;
- function quest: Boolean;
- var buff: TL2Buff;
- begin
- if user.inrange(149575,-112710,-2060, 150) and User.Buffs.ByID(1204, buff) then begin // same move too for soe and quest function
- delay(500);
- Engine.MoveTo(149522,-112683,-2090);
- engine.settarget(31521); // Jeremy
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(2);
- delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(149552,-112673,-2090);
- Engine.MoveTo(149176,-112486,-2090);
- Engine.MoveTo(147868,-113293,-2112);
- Engine.MoveTo(147530,-113296,-2138);
- engine.settarget(31547); // Beolin
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(147872,-113266,-2146);
- Engine.MoveTo(149319,-113559,-2073);
- Engine.MoveTo(150741,-114764,-1712);
- Engine.MoveTo(153088,-115452,-1593);
- Engine.MoveTo(154449,-115582,-1513);
- Engine.MoveTo(157026,-115443,-1914);
- Engine.MoveTo(157639,-115379,-1930);
- engine.settarget(31543); // Pulin
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(157228,-113369,-1807);
- Engine.MoveTo(156657,-112526,-1802);
- Engine.MoveTo(156311,-112206,-1932);
- Engine.MoveTo(156560,-111860,-2289);
- Engine.MoveTo(156025,-110567,-2647);
- Engine.MoveTo(156309,-108862,-2667);
- Engine.MoveTo(156057,-107188,-2669);
- Engine.MoveTo(155900,-105806,-2777);
- Engine.MoveTo(155641,-105708,-2780);
- engine.settarget(31544); // naff
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(155395,-105315,-2763);
- Engine.MoveTo(154678,-104415,-2824);
- Engine.MoveTo(153756,-102553,-2989);
- Engine.MoveTo(153601,-100979,-2952);
- Engine.MoveTo(150971,-101434,-2924);
- Engine.MoveTo(148682,-100835,-2975);
- Engine.MoveTo(146527,-101012,-3184);
- Engine.MoveTo(144791,-100717,-3307);
- Engine.MoveTo(144362,-102832,-3567);
- Engine.MoveTo(143006,-103981,-3615);
- Engine.MoveTo(141019,-105238,-3641);
- Engine.MoveTo(140668,-105488,-3658);
- engine.settarget(31545); // crocus
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(500);
- Engine.MoveTo(140696,-105785,-3638);
- Engine.MoveTo(140919,-106503,-3650);
- Engine.MoveTo(141726,-108982,-3596);
- Engine.MoveTo(141726,-108982,-3596);
- Engine.MoveTo(141643,-109405,-3616);
- engine.settarget(31546); // kuber
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(2);
- delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(141643,-109405,-3616);
- Engine.MoveTo(141726,-108982,-3596);
- Engine.MoveTo(141726,-108982,-3596);
- Engine.MoveTo(140919,-106503,-3650);
- Engine.MoveTo(140696,-105785,-3638);
- engine.settarget(31545); // crocus
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(500);
- Engine.MoveTo(140668,-105488,-3658);
- Engine.MoveTo(141019,-105238,-3641);
- Engine.MoveTo(143006,-103981,-3615);
- Engine.MoveTo(144362,-102832,-3567);
- Engine.MoveTo(144791,-100717,-3307);
- Engine.MoveTo(146527,-101012,-3184);
- Engine.MoveTo(148682,-100835,-2975);
- Engine.MoveTo(150971,-101434,-2924);
- Engine.MoveTo(153601,-100979,-2952);
- Engine.MoveTo(153756,-102553,-2989);
- Engine.MoveTo(154678,-104415,-2824);
- Engine.MoveTo(155395,-105315,-2763);
- engine.settarget(31544); // naff
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(155283,-106772,-2717);
- Engine.MoveTo(154540,-108539,-2721);
- Engine.MoveTo(153823,-110242,-2712);
- Engine.MoveTo(152543,-111234,-2545);
- Engine.MoveTo(150877,-112526,-2256);
- Engine.MoveTo(150222,-113490,-2092);
- Engine.MoveTo(150570,-114863,-1757);
- Engine.MoveTo(152200,-115119,-1595);
- Engine.MoveTo(154120,-115346,-1540);
- Engine.MoveTo(156666,-115444,-1861);
- Engine.MoveTo(157403,-115510,-1913);
- Engine.MoveTo(157642,-115377,-1930);
- engine.settarget(31543); // pulin
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(157432,-115484,-1910);
- Engine.MoveTo(155691,-115366,-1678);
- Engine.MoveTo(153455,-115389,-1568);
- Engine.MoveTo(151141,-115269,-1610);
- Engine.MoveTo(149696,-113813,-2062);
- Engine.MoveTo(147916,-113193,-2158);
- Engine.MoveTo(147792,-113288,-2132);
- Engine.MoveTo(147525,-113310,-2138);
- engine.settarget(31547); // beolin
- engine.dlgopen;
- delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- delay(1500);
- Engine.MoveTo(147838,-113278,-2133);
- Engine.MoveTo(149157,-112467,-2090);
- Engine.MoveTo(149549,-112642,-2090);
- Engine.MoveTo(149550,-112688,-2090);
- Engine.SetTarget(31521); ///jeremy
- Engine.DlgOpen;
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgOpen;
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- Engine.DlgSel(2);
- Delay(1500);
- Engine.DlgSel(1);
- Delay(1500);
- end;
- Result:=false;
- end;
- begin
- while true do begin
- delay(150);
- if User.inrange(150233,-57173,-3002, 250, 150) then begin
- Engine.MoveTo(149555,-56631,-2907);
- Engine.MoveTo(148897,-56158,-2807);
- Engine.MoveTo(147832,-56033,-2799);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(147732,-58299,-3002, 250, 150) then begin
- Engine.MoveTo(147708,-57626,-2907);
- Engine.MoveTo(147753,-56220,-2807);
- Engine.MoveTo(147843,-55425,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(145319,-57016,-3002, 250, 150) then begin
- Engine.MoveTo(145829,-56632,-2908);
- Engine.MoveTo(146697,-56154,-2807);
- Engine.MoveTo(147577,-55974,-2793);
- Engine.MoveTo(147824,-55523,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(144496,-55088,-2976, 250, 150) then begin
- Engine.MoveTo(145065,-56666,-2976);
- Engine.MoveTo(146697,-56154,-2807);
- Engine.MoveTo(147577,-55974,-2793);
- Engine.MoveTo(147824,-55523,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(146087,-58104,-3002, 250, 150) then begin
- Engine.MoveTo(146043,-58206,-3007);
- Engine.MoveTo(145356,-57013,-3007);
- Engine.MoveTo(145843,-56667,-2907);
- Engine.MoveTo(146544,-56239,-2807);
- Engine.MoveTo(147573,-55992,-2799);
- Engine.MoveTo(147829,-55510,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(147702,-56295,-2775, 250, 150) then begin
- Engine.MoveTo(147830,-55546,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if User.inrange(148553,-56015,-2776, 250, 150) then begin
- Engine.MoveTo(147873,-56091,-2807);
- Engine.MoveTo(147875,-55489,-2759);
- Engine.MoveTo(147907,-55217,-2759);
- end;
- if user.inrange(147907,-55217,-2759, 500) then begin
- buffCheck;
- end;
- if user.inrange(149575,-112710,-2060, 150) and User.Buffs.ByID(1204, buffCheck) then begin // /loc infront of buffer
- teleport;
- end;
- if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, soe) then begin // same move too for soe and quest function
- soe;
- end;
- if user.inrange(149575,-112710,-2060, 150) and User.Buffs.ByID(1204, quest) then begin // same move too for soe and quest function
- quest;
- end;
- if User.Dead then begin
- deadCheck;
- end;
- end;
- begin
- while delay(500) do begin
- //move to Buffer after death
- quest;
- //move to Gk -> teleport -> move to spot
- end;
- end;
- end.
- //For Edit Ur Path Point Really easy With Adrenalin u just need open setting of ur char >> Combat Zone >> Moove with Path Point >> Current and Add "do this for all ur loc needed". After just Download NotePad++ and u load ur setting on NotePad++ >> Search >> Replace >> change X=" for Engine.MoveTo( etc for y and z. and u copy paste easy in ur script enjoy :)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement