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

Maybe you can send me  script code? couse i dont understand this...

this is how world works kid:

 

dont understand? learn

dont want to? pay

Posted

this is how world works kid:

 

dont understand? learn

dont want to? pay

if whant add skype adr.bot i can give to you encrypted script for damage captcha

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

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now



  • Posts

    • WIPE ! NEW SEASON GRAND OPENING FROM TODAY ! - 23/01/2026, FRIDAY, 20:00 +3 GMT !
    • https://vpslab.cloud/ Premium DDoS Protection now included with every server.
    • # Changelog - Public Updates   This changelog tracks user-facing updates and improvements to Top.MaxCheaters.com.   ---   ## [1.2.0] - 2026-01-XX   ### ⚡ Performance Improvements - **Faster Page Loads**: Implemented intelligent caching system that makes pages load significantly faster - **My Servers Page**: Now loads instantly when revisiting (no more loading delays) - **Main Page**: Server listings and filters now load faster on repeat visits - **Premium Ads**: Pricing information loads instantly - **Overall Performance**: Site now loads 60-80% faster with reduced server load   ### 🔄 Improvements - Pages now remember recent data, reducing wait times when navigating - Automatic cache refresh ensures you always see up-to-date information - Better user experience with instant page loads on repeat visits   ---   ## [1.1.1] - 2026-01-XX   ### 🐛 Bug Fixes - **VIP Server Filter**: Fixed "VIP L2 Servers" filter to correctly show all premium tier servers (VIP, Gold VIP, and Pinned) - **Ad Pricing Display**: Fixed ad pricing on Premium Ads page to automatically update when changed in admin panel   ### 🔄 Improvements - Ad pricing now syncs automatically across all pages - More accurate server filtering by tier   ---   ## [1.1.0] - 2026-01-XX   ### ✨ New Features - **Complete Chronicle List**: All chronicle options are now available in server forms and filters, including the latest Lineage 2 chronicles - **Improved Chronicle Display**: Server rows now show cleaner, shorter chronicle names for better readability   ### 🐛 Bug Fixes - **Chronicle Filter**: Fixed issue where "Infinite Odyssey" chronicle filter was not working correctly - **Missing Chronicles**: Fixed missing chronicle options in server creation and editing forms   ### 🔄 Improvements - Chronicle filters and dropdowns now stay in sync with the latest available chronicles - Better chronicle name formatting in server listings for improved visual clarity   ---   ## [1.0.0] - Initial Release   ### Features - 🎮 Server listings with multiple tiers (Normal, VIP, Gold VIP, Pinned) - 📊 Click tracking and server statistics - 🌍 Multi-language support (English, Spanish, Portuguese, Greek, Russian) - 💳 Payment system for premium server features - 🔐 Secure authentication system - 👑 Admin panel for server management - 📱 Fully responsive design for all devices - 🔍 Advanced filtering system (by chronicle, rate, server type, date) - 📅 Server opening date tracking - 🎯 Two viewing modes: By Date and By Votes (coming soon for all users)   ---   ## About This Changelog   This changelog focuses on updates that directly impact the user experience. Internal development changes and technical improvements are not included here.   For questions or feedback, please contact support.v
  • Topics

×
×
  • Create New...

Important Information

This community uses essential cookies to function properly. Non-essential cookies and third-party services are used only with your consent. Read our Privacy Policy and We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue..