Jump to content
MaxCheaters Official Group on Discord
-> Place your ad text here <-
We're Rebuilding – Join Our Staff Team

L2 Adrenaline Scripts.

hornas

By hornas
in Request Botting [English]

 Share

Recommended Posts

BouKipiKe Newbie

BouKipiKe

Posted
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
BouKipiKe Newbie

BouKipiKe

Posted
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
TrankLL Newbie

TrankLL

Posted
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!

AlmostGood Enthusiast

AlmostGood

Posted
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

adr.bot Rookie

adr.bot

Posted
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

tommy_demateo Newbie

tommy_demateo

Posted
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
adr.bot Rookie

adr.bot

Posted
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

Equagf Newbie

Equagf

Posted
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 !

BouKipiKe Newbie

BouKipiKe

Posted
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
 Share
Go to topic listing


  • Posts

    • Poziomeczka
      L2Kings

      By Poziomeczka · Posted

      L2 Kings    Stage 1 – The Awakening Dynasty and Moirai Level Cap: 83 Gear: Dynasty -Moirai & Weapons (Shop for Adena + Drop from mobs/instances ) Masterwork System: Available (Neolithics S required with neolithics u can do armor parts foundation aswell) Class Cloaks: Level 1 - Masterwork sets such us moirai/dynasty stats are boosted also vesper(stage 2) Olf T-Shirt: +6 (fails don’t reset) safe is +2 Dolls: Level 1 Belts: Low & Medium Enchant: Safe +3 / Max +8 / Attribution Easy in Moirai-Dynasty . Main Zones: Varka Outpost: Easy farm, Adena, EXP for new players = > 80- 100kk hour Dragon Valley: Main farm zone — , 100–120kk/hour Weapon Weakness System active (all classes can farm efficiently) Archers get vampiric auto-hits vs mobs Dragon Valley Center: Main Party Zone — boosted drops (Blessed enchants, Neolithics chance) => farm like 150-200kk per hour. Dragon Valley North: Spoil Zone (Asofe + crafting materials for MW) Primeval Isle: Safe autofarm zone (low adena for casual players) ==> 50kk per hour Forge of the Gods & Imperial Tomb: Available from Stage 1 (lower Adena reward in compare with Dragon Valley) Hellbound also avaliable from stage 1 In few words all zones opened but MAIN farm zone with boosted adena and drops is Dragon valley also has more mobs Instances: Zaken (24h Reuse) → Instead of Vespers drop Moirai , 100% chance to drop 1 of 9 dolls lvl 1, Zaken 7-Day Jewelry Raid Bosses (7 RBs): Drop Moirai Parts + Neolithic S grade instead of Vespers parts that has 7 Rb Quest give Icarus Weapons Special Feature 7rb bosses level up soul crystals aswell. Closed Areas : Monaster of SIlence, LOA, ( It wont have mobs) / Mahum Quest/Lizardmen off) Grand Epics: Unlocked on Day 4 of Stage 1 → Antharas, Valakas, Baium, AQ, etc ================================================================================= Stage 2 – Rise of Vespers Level Cap: 85 Gear: Moirai Armors (Adena GM SHOP / Craft/ Drop) Weapons: Icarus Cloaks: Level 2 Olf: +8 Dolls: Level 2 Belts: High & Top Enchant: Safe +3 / Max +8 Masterwork can be with Neolithics S84 aswell but higher so craft will be usefull aswell. 7 Raid Boss Quest Updated: Now works retail give vesper weapons 7rb Bosses Drops : Vespers Instances: Zaken : Drops to retail vespers + the dolls and the extra items that we added on stage 1 New Freya Instance: Added — drops vespers and instead of mid s84 weapons will drop vespers . Extra drops Blessed Bottle of Freya - drops 100% chance 1 of 9 dolls. Farm Areas Dragon Valley remains main farm New Zone : Lair of Antharas (mobs nerfed and added drop Noble stone so solo players can farm too) New Party Zone : LOA Circle   ============================================================================   Stage 3 – The Vorpal ERA Gear: Vorpal Unclock Cloaks: Level 3 Olf: +10 (max cap) Dolls: Level 3 Enchant: Safe +3 / Max +12 Farm Zones : Dragon Valley Center Scorpions becomes a normal solo zone (no longer party zone) Drops:   LOA & Knorik → Mid Weapons avaliable in drop New Party Zone Kariks Instances: Easy Freya Drops Mid Weapons Frintezza Release =================================================================================     Stage 4 – Elegia Era (Final Stage) Elegia Unlock Gear: Elegia Weapons: Elegia TOP s84 ( farmed via H-Freya/ Drops ) Cloaks: Level 5 Dolls: Level 3 (final bonuses) Enchant: Safe +6 / Max +16 Instances: Hard Freya → Drops Elegia Weapons + => The Instance will drop 2-3 parts for sure and also will be able to Join with 7 people . Party Zone will have also drop chances for elegia armor parts and weapons but small   Events (Hourly): Win: 50 Event Medals + 3 GCM + morewards Lose: 25 Medals + 1 GCM + more rewards Tie: 30 Medals + 2 GCM + more rewards   ================================================================================ Epic Fragments Currency Participating in Daily Bosses mass rewarding all players Participating in Instances (zaken freya frintezza etc) all players get reward ================================================================================ Adena - Main server currency (all items in gm shop require adena ) Event Medals (Festival Adena) - Event shop currency Donation coins you can buy with them dressme,cosmetics and premium account Epic Fragments you can buy with them fake epic jewels Olympiad Tokens you can buy many items from olympiad shop (Hero Coin even items that are on next stages) Olympiad Win = 1000 Tokens / Lose = 500 Tokens ================================================================================= Offline Autofarm Allows limited Offline farming requires offline autofarm ticket that you get by voting etc ================================================================================= Grand Epics have Specific Custom NPC that can spawn Epics EU/LATIN TIME ZONE ================================================================================= First Olympiad Day 19 December First Heroes 22 December ( 21 December Last day of 1st Period) After that olympiad will be weekly. ================================================================================= Item price and economy Since adena is main coin of server and NOT donation coins we will always add new items in gm shop with adena in order to burn the adena of server and not be inflation . =================================================================================        
    • MonkZe
      Custom NPC title color

      By MonkZe · Posted

      Hello, I'd like to change a title color for custom npc.  I created custom NPC, cloned existing. I put unique id for it in npcname-e, npcgrp and database. I have "0" to serverSideName in db, so that it would use npcname-e, but instead it has "NoNameNPC"and no title color change.
    • maxicroma
      [WTS] Light mode Complete website template for lineage 2

      By maxicroma · Posted

      Trusted Guy 100% ,  I asked him for some work and he did it right away.
    • VPSLab
      — VPSLAB — Fast & Private RDP/VPS | 100% Instant Setup

      By VPSLab · Posted

      Active & Taking Orders!
    • EliteZ1
      Need .dat editor for c5

      By EliteZ1 · Posted

      up

  • 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