Jump to content

Recommended Posts

Posted (edited)

hi again i working too make tts script with more option i have try a lot of things but impossibel do what i whant. :/

maby u will help me becose ur are so pro.

my tts quest work perfect now i want add function if i dead go town+rebuf and if i m in front of "jeremy" and i dont have buff windwalk i use soe. but after along and long hour too try that i come here for help becose is totaly impossible for me :/

ty for ur time and thx for help 

 

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
        if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('Buffs are needed. Buffing...');
        Delay(500);
        Engine.SetTarget(31360); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.bypasstoserver('custom_dobuff Chat 99');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff ProfBuffs hs');
        Delay(3000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('HEAL all');
        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(147907,-55217,-2759, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Delay(500);
        Engine.SetTarget(31275);
        Delay(500);
        Engine.DlgOpen;
        Delay(1500);
        Engine.DlgSel('I want to teleport');
        Delay(1500);
        Engine.DlgSel('Hot Springs');
        Delay(5000);
    end;
Result:=false;
end;

function soe: Boolean;
begin
  if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, buffcheck) then begin
Engine.UseItem(736);
  Delay(15000);
   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(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(147907,-55217,-2759, 150) and User.Buffs.ByID(1204, buffcheck) then begin
        teleport;    
        end; 
    if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, soe) then begin
        soe;
    end;
    if user.inrange(149550,-112688,-2090, 150) and User.Buffs.ByID(1204, buffcheck) then begin
delay(500);
        Print('cest parti');
     Engine.MoveTo(149552,-112673,-2090);
delay(500);
engine.settarget(31521);  // Jeremy
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31521-1.htm');
delay(1500);
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31521-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31547-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31543-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31544-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(500);
engine.bypasstoserver('Quest 621_EggDelivery 31545-1.htm');
delay(1500);
     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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31546-1.htm');
delay(1500);
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31546-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31545-1.htm');
delay(1500);
     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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31544-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31543-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31547-1.htm');
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('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
Delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31521-3.htm');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
Delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31521-3.htm');
Delay(1500);
        Print('Yatta');
        Delay(500);
        while not deadCheck do delay(1000); //while not dead, do nothing and wait.
        while not soe do delay(1000);  //  While not use Scroll Of Escape,do nothing and wait.
    end;
end;
end.

Function Needed Too Fix For This Script

function soe: Boolean;
begin
  if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, buffcheck) then begin
Engine.UseItem(736);
  Delay(15000);
   end;
   Result:=false;
 end;
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    if user.inrange(149575,-112710,-2060, 150) and not User.Buffs.ByID(1204, soe) then begin
        soe;
    end;
    if user.inrange(149550,-112688,-2090, 150) and User.Buffs.ByID(1204, buffcheck) then begin
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
        while not soe do delay(1000);  //  While not use Scroll Of Escape,do nothing and wait.

for fix and all be great is change buffcheck by buff "for he check ww buff" but when i write butt the line past in red and i cant lunch script :/

Edited by BouKipiKe
Posted (edited)

My Final Quest atm I need find how too back at my dead spot when i m pk for the quest continue where i m die. if any idea :) i'm open :)

 

//// 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 not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('Buffs are needed. Buffing...');
        Delay(500);
        Engine.SetTarget(31360); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.bypasstoserver('custom_dobuff Chat 10'); // Sniff for ur Server
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff Custom Spoiler');
        Delay(3000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('HEAL');
        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(147907,-55217,-2759, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Delay(500);
        Engine.SetTarget(31275);
        Delay(500);
        Engine.DlgOpen;
        Delay(1500);
        Engine.DlgSel('I want to teleport');
        Delay(1500);
        Engine.DlgSel('Hot Springs');
        Delay(5000);
    Engine.MoveTo(); // same move too for soe and quest function
    end;
Result:=false;
end;

function soe: Boolean;
var buff: TL2Buff;
begin
Result := false;
  if user.inrange(x,y,z, 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(x,y,z, 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('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31521-1.htm');
delay(1500);
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31521-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31547);  // Beolin
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31547-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31543);  // Pulin
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31543-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31544);  // naff
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31544-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31545); //  crocus
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(500);
engine.bypasstoserver('Quest 621_EggDelivery 31545-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31546);  //  kuber
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31546-1.htm');
delay(1500);
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31546-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31545); //  crocus
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31545-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31544);  //  naff
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31544-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31543);  //  pulin
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31543-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
engine.settarget(31547); //  beolin
engine.dlgopen;
delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31547-1.htm');
delay(1500);
      Engine.MoveTo(); // Make ur Own Patch
      Engine.MoveTo();
Engine.SetTarget(31521);                                  ///jeremy
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Egg Delivery');
Delay(1500);
engine.bypasstoserver('Quest 621_EggDelivery 31521-3.htm');
Delay(1500);
Engine.DlgOpen;
Delay(1500);
Engine.DlgSel('Quest');
Delay(1500);
Engine.DlgSel('Delivery of special liquor');
Delay(1500);
engine.bypasstoserver('Quest 622_DeliveryOfSpecialLiquor 31521-3.htm');
Delay(1500);
    Engine.MoveTo(149761,-112448,-2090);
    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(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(x,y,z, 150) and User.Buffs.ByID(1204, buffCheck) then begin  // /loc infront of buffer
        teleport;          
    end;
    if user.inrange(x,y,z, 150) and not User.Buffs.ByID(1204, soe) then begin  // same move too for soe and quest function
        soe;          
    end;  
    if user.inrange(x,y,z, 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;
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 :)

 

Edited by BouKipiKe
Posted

Hello guys maybe you know any script how i can bypass the bot-guard at l2damage? For example after some time server ask to put one number and then you can farm again. Maybe can bypass it with something? 

thanks!

Posted (edited)

Anyone knows how to select (buy) and confirm the dagger for example in this "multisell" store for a script?

 

4a4e6a93e3.jpg

 

EDIT: SOLVED.

 

Engine.NPCExchange(10476,1);

Edited by tommy_demateo
Posted

wath command i can use if my char is death go to the "clan hall"?, the command Engine.GoHome; leave in village only.

engine.gohome(rtclanhall);

i think this works

Posted

 

Enjoy :D this is just example, need rewrite script for your server


var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('Buffs are needed. Buffing...');
        Engine.MoveTo(82968, 53240, -1488);
        Delay(500);
        Engine.SetTarget(30176); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel(1);
        Delay(500);
        Print('Buffed.');
        Engine.MoveTo(82968, 53208, -1488);        
    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.FaceControl(0,false);
        Engine.GoHome;
        Delay(10000);
    end;
end;

begin
while true do begin
delay(150);

if User.inrange(80334,54400,-1552, 250, 150) then begin
		Engine.MoveTo(80334,54400,-1552);
		Engine.MoveTo(80969,53698,-1558);
		Engine.MoveTo(81540,53454,-1494);
		Engine.MoveTo(82480,53340,-1494);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82323,55466,-1520, 250, 150) then begin
		Engine.MoveTo(82323,55466,-1520);
		Engine.MoveTo(82403,54498,-1523);
		Engine.MoveTo(82589,53861,-1486);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82123,53535,-1488, 250, 150) then begin
		Engine.MoveTo(82123,53535,-1488);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(80304,56241,-1552, 250, 150) then begin
		Engine.MoveTo(80304,56241,-1552);
		Engine.MoveTo(81470,55682,-1523);
		Engine.MoveTo(82256,55294,-1523);
		Engine.MoveTo(82510,54035,-1494);   
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82445,56012,-1520, 250, 150) then begin
		Engine.MoveTo(82445,56012,-1520);
		Engine.MoveTo(82341,54950,-1523);
		Engine.MoveTo(82574,53833,-1486);  
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(80054,53209,-1552, 250, 150) then begin
		Engine.MoveTo(80054,53209,-1552);
		Engine.MoveTo(80624,53611,-1558);
		Engine.MoveTo(81772,53468,-1494);
		Engine.MoveTo(82289,53472,-1494);
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(80513,52980,-1552, 250, 150) then begin
		Engine.MoveTo(80513,52980,-1552);
		Engine.MoveTo(80165,53065,-1558);
		Engine.MoveTo(80630,53610,-1558);
		Engine.MoveTo(81688,53447,-1494);
		Engine.MoveTo(82303,53338,-1494);   
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(80267,55497,-1552, 250, 150) then begin
		Engine.MoveTo(80267,55497,-1552);
		Engine.MoveTo(80359,54536,-1558);
		Engine.MoveTo(80792,53785,-1558);
		Engine.MoveTo(81495,53421,-1494);
		Engine.MoveTo(82323,53362,-1494); 
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(79933,55752,-1552, 250, 150) then begin
		Engine.MoveTo(79933,55752,-1552);
		Engine.MoveTo(80349,55208,-1558);
		Engine.MoveTo(80470,54217,-1558);
		Engine.MoveTo(81053,53602,-1558);
		Engine.MoveTo(81974,53465,-1494);    
		Engine.MoveTo(82950,53186,-1494);
    end;
	if User.inrange(80594,55837,-1552, 250, 150) then begin
		Engine.MoveTo(80594,55837,-1552);
		Engine.MoveTo(81899,55492,-1523);
		Engine.MoveTo(82240,55142,-1523);
		Engine.MoveTo(82531,53946,-1494);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82213,53964,-1488, 250, 150) then begin
		Engine.MoveTo(82213,53964,-1488);
		Engine.MoveTo(82668,53709,-1486);  
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(83327,55410,-1520, 250, 150) then begin
		Engine.MoveTo(83327,55410,-1520);
		Engine.MoveTo(82607,55592,-1523);
		Engine.MoveTo(82184,54809,-1523);
		Engine.MoveTo(82563,53882,-1488);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(79706,52986,-1552, 250, 150) then begin
		Engine.MoveTo(79706,52986,-1552);
		Engine.MoveTo(80427,53549,-1558);
		Engine.MoveTo(80812,53655,-1558);
		Engine.MoveTo(81979,53439,-1494);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82880,55390,-1520, 250, 150) then begin
		Engine.MoveTo(82880,55390,-1520);
		Engine.MoveTo(82375,55524,-1523);
		Engine.MoveTo(82367,54313,-1493);
		Engine.MoveTo(82651,53734,-1486);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82552,53447,-1488, 250, 150) then begin
		Engine.MoveTo(82552,53447,-1488);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if User.inrange(82638,53885,-1488, 250, 150) then begin
		Engine.MoveTo(82638,53885,-1488);    
		Engine.MoveTo(82950,53186,-1494);
    end;
    if user.inrange(82888, 53240, -1488, 500) then begin
        buffCheck;
    end;                                                
    
    if user.inrange(82968, 53208, -1488, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Print('Teleport to Apostate.');
        Engine.SetTarget(30832);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('Catacomb');
        Delay(500);
        Engine.DlgSel('Apostate');
        Delay(5000);
    end;    
                          
    if user.inrange(-20237, -250797, -8163, 500) then begin
        Print('Apostate. Moving to spot');
  	Engine.MoveTo(-20168,-250744,-8160);
  	Engine.MoveTo(-19304,-250728,-8160);
  	Engine.MoveTo(-18968,-250504,-8160);
  	Engine.MoveTo(-18456,-250504,-8160);
  	Engine.MoveTo(-16792,-250536,-8160);
  	Engine.MoveTo(-16424,-250760,-8160);
  	Engine.MoveTo(-14888,-250776,-8160);
  	Engine.MoveTo(-14536,-250424,-8160);
  	Engine.MoveTo(-14408,-249160,-8160);
  	Engine.MoveTo(-13768,-249064,-8160);
  	Engine.MoveTo(-13736,-247848,-8160);
        Print('AA farm: ON!');
        Delay(500);
        Engine.FaceControl(0, true);
        while not deadCheck do delay(1000); //while not dead, do nothing and wait.
    end;
end;
end.

Thanks alot i was able to adjust it to my server :D

 

I have a question tho, I would like to add this small function but i don't know where i can add it,

for example when buff ends and bot is alive ,bot stop  and use alt+b to rebuff then continue running script

I'm thinking that this line should include deadCheck: Boolean; and buffCheck: Boolean; but i`m not sure in which lines should i add them

A small hint will help !

Posted (edited)

Thanks alot i was able to adjust it to my server :D

 

I have a question tho, I would like to add this small function but i don't know where i can add it,

for example when buff ends and bot is alive ,bot stop  and use alt+b to rebuff then continue running script

I'm thinking that this line should include deadCheck: Boolean; and buffCheck: Boolean; but i`m not sure in which lines should i add them

A small hint will help !

 

 hi man i give u my script for farm at CrypOfDisgrace for steel spoil maby that can help u.

var
item: TL2Item;

function buffCheck: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('Buffs are needed. Buffing...');
        Engine.MoveTo(87111,-143439,-1318);
        Delay(500);
        Engine.SetTarget(31360); // NPC ID
        Delay(500);
        Engine.DlgOpen;
        Delay(500);
        Engine.bypasstoserver('custom_dobuff Chat 99');
        Delay(1000);
        Engine.bypasstoserver('custom_dobuff ProfBuffs Spoil');
        Delay(5000);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('HEAL all');
        Delay(500);
        Engine.MoveTo(87135,-143437,-1288,-1288);        
    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.FaceControl(0,false);
        Engine.GoHome;
        Delay(5000);
    end;
end;

function soe: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Print('soe bro');
        Delay(1000);
        Engine.FaceControl(0,false);
        Delay(1000);
    Engine.UseItem(736);
        Delay(5000);
    end;
end;

function teleport: Boolean;
begin
    if user.inrange(87135,-143437,-1288, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        Engine.SetTarget(31964);
        Engine.DlgOpen;
        Delay(500);
        Engine.DlgSel('I want to teleport');
        Delay(500);
        Engine.DlgSel('Crypts of Disgrace');
        Delay(5000);
      Engine.MoveTo(55697,-117944,-3355);
      Engine.MoveTo(55677,-116648,-3502);
      Engine.MoveTo(55379,-115669,-3556);
        Print('AA farm: ON!');
        Delay(500);
        Engine.FaceControl(0, true);
    end;
Result:=false;
end;

begin
while true do begin
delay(150);

if User.inrange(87402,-140209,-1536, 250, 150) then begin
        Engine.MoveTo(87354,-141085,-1440);
        Engine.MoveTo(87263,-142373,-1340);
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if User.inrange(84912,-141501,-1536, 250, 150) then begin
        Engine.MoveTo(85489,-142053,-1440);
        Engine.MoveTo(86426,-142552,-1342);
        Engine.MoveTo(87184,-142700,-1332);
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if User.inrange(88500,-142550,-1363, 250, 150) then begin
        Engine.MoveTo(87436,-142688,-1332);
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if User.inrange(84494,-143531,-1562, 250, 150) then begin
        Engine.MoveTo(84602,-142035,-1541);
        Engine.MoveTo(84912,-141501,-1536);
        Engine.MoveTo(85489,-142053,-1440);
        Engine.MoveTo(86426,-142552,-1342);
        Engine.MoveTo(87184,-142700,-1332);
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if User.inrange(87330,-142829,-1312, 250, 150) then begin
        Engine.MoveTo(87140,-143393,-1318);
        end;
      if User.inrange(89783,-141672,-1567, 250, 150) then begin
        Engine.MoveTo(89230,-142053,-1467);
        Engine.MoveTo(88524,-142490,-1367);
        Engine.MoveTo(87516,-142625,-1366);
        Engine.MoveTo(87196,-143183,-1319);      
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if User.inrange(86253,-142519,-1337, 250, 150) then begin
        Engine.MoveTo(87184,-142700,-1332);
        Engine.MoveTo(87140,-143393,-1318);
    end;
    if user.inrange(87140,-143393,-1318, 500) then begin
        buffCheck;
    end;    
    if user.inrange(87135,-143437,-1288, 150) and User.Buffs.ByID(1204, buffCheck) then begin
        teleport;          
    end;
    if user.inrange(55379,-115669,-3556, 500) and not User.Buffs.ByID(1204, soe) then begin
        soe;   
    end;
    if User.Dead then begin
         deadCheck;          
    end;
end;
end.

 

i think u need too creat fonction and make new line at the end

 

exemple
///////////////////////////////////////////////////////////////
function rebuff: Boolean;
var buff: TL2Buff;
begin
    if not User.Buffs.ByID(1204, buff) then begin
        Result:=true;
        Delay(1000);
        Engine.FaceControl(0,false);
        Delay(1000);
-----------------------------------
Here write ur alt+b cmd buff
----------------------------------
        Delay(1000);
        Engine.FaceControl(0,true);
        Delay(1000);
    end;
end;
/////////////////////////////////////////////////////////////////
    if not User.Dead and not User.Buffs.ByID(1204, rebuff) then begin  /// Or maby Try If User.Alive "maby work :) sry i start un adr too :)"
         rebuff;          
    end;
////////////////////////////////////////////////////////////////

Edited by BouKipiKe

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.




  • Posts

    • Now begins your final fall, you don't know who you messed with and who I am, nor can you imagine what awaits you. Dragon Network will have to answer for its actions before the FBI, and thus begins its downfall.
    • This post originally appeared on zupyak. The EA FC 26 Closed Beta is almost here, giving select players an exclusive first look at the game before its official release. Running from August 6 to August 26, 2025, this beta will let testers try out key gameplay changes and provide feedback to EA. If you're eager to secure a beta code, this guide will walk you through everything you need to know—from eligibility requirements to how to maximize your chances of getting an invite.   How to Get an EA FC 26 Beta Code 1. Beta Codes Are Account-Locked (No Sharing!) • If you receive a beta code, it will be tied to your EA account and cannot be shared or sold. • Attempting to share or buy a code is against EA's NDA (Non-Disclosure Agreement) and will result in a ban. 2. Check Your EA Account Settings • Log in to the EA website and go to Account Settings. • Navigate to Communication Preferences and ensure you're opted in for: • All EA Sports games, including FC 25 and FC 24 • The platform you actually play on • Promotional emails 3. Sign Up for EA Playtesting • Visit the EA Playtesting portal and register. This increases your chances of being selected for beta access. 4. Play FC 25 Regularly EA prioritizes active players, especially those who compete in Division Rivals and FUT Champions. The more you play, the higher your chances of receiving an invite. 5. Check Your Email (Including Spam!) If you don't receive one immediately, check again on August 13, as EA sometimes sends codes in waves.   What Game Modes Are Available in the Beta? • Kickoff (available to all testers) • Ultimate Team (FUT) • Clubs • Career Mode Your access to modes beyond Kickoff depends on your past gameplay history in FC 25.   Important Beta Rules & Restrictions Do: • Test the game and provide feedback in the official EA beta forums. • Keep all beta details confidential—no streaming, screenshots, or social media posts. Don't: • Share or sell your beta code (it won't work for anyone else). • Discuss the beta publicly—breaking the NDA can lead to account bans. • Expect progress to carry over—the beta is for testing only.   Final Tips to Improve Your Chances • Play FC 25 frequently—active players get priority. • Only select platforms you own—only available for consoles. • Check your spam folder—beta emails sometimes land there. • Avoid VPNs—EA may restrict access based on region (US & UK have higher priority).   What If You Don't Get a Beta Code? The beta code has been released on Augest 4. If you didn't receive one, don't worry, as EA sometimes sends codes in waves. Final Thoughts The EA FC 26 Closed Beta is a fantastic opportunity for dedicated fans to shape the future of the game while enjoying early access. By following these steps and staying active in FC 25, you can maximize your chances of securing a coveted beta code. Remember, confidentiality is key—so keep all details private and abide by EA's rules. And when the full game officially launches, consider buying FC 26 coins to give yourself an edge in building your Ultimate Team and dominating the competition! Are you ready for EA FC 26? Let us know your thoughts in the comments below!
    • https://maxcheaters.com/topic/253284-⭐l2off-h5-gx-ext⭐/
    • GRAND OPENING FROM - 15 AUGUST 2025, FRIDAY, 20:00 +2 GMT !
  • Topics

×
×
  • Create New...

AdBlock Extension Detected!

Our website is made possible by displaying online advertisements to our members.

Please disable AdBlock browser extension first, to be able to use our community.

I've Disabled AdBlock