Jump to content

high five [L2J]L2Redmoon


L2RedMoon

Recommended Posts

Yes,i will protect your bots from PKers for 60% of the daily collected adena(you keep items).I think that way it's win/win.

for sure hes frand with me, i can give him 24/7 afk script even with tp back,

 

 

gg wp cze&sk song best 
Link to comment
Share on other sites

var
item: TL2Item;
buff: TL2Buff;

function buffCheck: Boolean;
begin
    if not User.Buffs.ByID(1323, buff) then begin
        Result:=true;
        Print('Tem que buffar, buffando...');
        Delay(2000);
      Engine.bypasstoserver('_bbsbuffer'); 
                Delay(2000);
                      Engine.bypasstoserver('_bbsbufferbypass_giveBuffSet mage 0 0'); 
                Delay(2000);
                      Engine.bypasstoserver('_bbsbufferbypass_heal 0 0 0'); 
                Delay(2000);
                      Engine.bypasstoserver('_bbsbufferbypass_redirect view_special 0 0'); 
                Delay(2000);
                      Engine.bypasstoserver('_bbsbufferbypass_giveBuffs 1363 1 special'); 
                Delay(2000);
                          
    end;
Result:=false;
end;

function deadCheck: Boolean;
begin
Result := false;
    if User.Dead then begin
        Result := true;
        Print('Morto. To village.');
        Delay(2000);
        Engine.FaceControl(0,false);
        Engine.GoHome;
        Delay(10000);
    end;
end;

begin 

begin
while true do begin
delay(150);

    if not inventory.user.byid(8599, item) or (item.count<1) then begin 
      Delay(1000);
      Engine.bypasstoserver('_bbsfile:smallNpcs/gmshop'); 
      Delay(1000);
      Engine.bypasstoserver('115'); 
      Delay(1000);
      Engine.NPCExchange(8599, 15); 
      Print('PENALTY OK');
      delay(1000);
end;

    if not inventory.user.byid(728, item) or (item.count<300) then begin 
      Delay(1000);
      Engine.bypasstoserver('_bbsfile:smallNpcs/gmshop'); 
      Delay(1000);
      Engine.bypasstoserver('115'); 
      Delay(1000);
      Engine.NPCExchange(728, 800); 
      Print('MANA OK');
      delay(1000);
end;

    if not inventory.user.byid(3952, item) or (item.count<3000) then begin
      Delay(1000);
      Engine.bypasstoserver('_bbsfile:smallNpcs/gmshop'); 
      Delay(1000);
      Engine.bypasstoserver('116'); 
      Delay(1000);
      Engine.NPCExchange(3952, 8000);
      Print('SSS OK');
      delay(1000);
end;

    if user.inrange(116499, 76299, -2720, 5000) then begin  
  Print('Voltando para hunter.');
  Engine.bypasstoserver('_bbsgatekeeper'); 
  Delay(1000);
  Engine.bypasstoserver('1e');
  Delay(1000);
  end;

        if user.inrange(116635, 76236, -2720, 5000) and user.buffs.byid(1323, buffCheck) then begin
  Print('Voltando ao spot.');
  Engine.MoveTo(117144, 76792, -2672);
  delay(1000);
  engine.settarget(32864);
  delay(1000);
  engine.dlgopen;
  delay(1000);
  engine.dlgsel(4);

  Delay(3000);
    end;
    if user.inrange(113160, 121009, -3696, 5000) then begin         
 Engine.MoveTo(114568, 120024, -3704);
 
     
     Delay(2000);
     Engine.FaceControl(0,true);
    while not deadCheck do delay(5000);
         end;
        if user.inrange(114568, 120024, -3704, 5000) then begin         
     Delay(2000);
     Engine.FaceControl(0,true);
    while not deadCheck do delay(5000);

    end;
        if user.inrange(96669, 109714, -3616, 5000) then begin         
     Delay(2000);
     Engine.FaceControl(0,true);
    while not deadCheck do delay(5000);
         end;
    
    end;


end;
end.

edit by yourself

go to village if dead

back to spot

buy supplys

Edited by arturo134
Link to comment
Share on other sites

At this point im more interested in creating and testing my own scripts rather than playing.But i dont know much about bot files or botting in general,although i understood most of the mentioned code above.

Can you have a script on adrenaline writen in C++(flawless syntax) and still be functionable with the rest of the components?

Link to comment
Share on other sites

L2 RedMoon BETA Opening TODAY!


Don't miss the New Adventure on L2 RedMoon!


 


giphy_zps9gum2qef.png


 


High Five x20, many Clans & alot of Players awaiting, Unique events, weekly Sieges & weekly Heroes.


We are waiting for you!


 


http://l2redmoon.com


http://l2redmoon.com/forum/


https://www.facebook.com/l2redmoon/


Edited by L2RedMoon
Link to comment
Share on other sites

3 Hours left for the Open BETA on Redmoon x20! 

System is uploaded and you can now create your accounts.

 

bNIIcdC.png


 




Edited by L2RedMoon
Link to comment
Share on other sites

 

 

3 Hours left for the Open BETA on Redmoon x20!

System is uploaded and you can now create your accounts.

beta%20opening%20timer_zpsruegchta.png

http://l2redmoon.com/downloads.php

Web: http://www.l2redmoon.com

Forum: http://www.l2redmoon.com/forum

gift me items in you srv, i bump you post all time :/ Edited by Anitah
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

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.




×
×
  • Create New...