Jump to content

Recommended Posts

Posted

Hello, 

 

I have now made this script that takes my char to town rebuffs then goes to the farm zone and back to position where it starts farming. My problem is that im having to manual start the script every time the char goes to village, 

How can I make this script to auto run its self?

 

Thanks 

 

begin
Print('Get Buffs');
 
if User.inrange(82573,148632, -3464, 250, 150) then begin  
      Engine.MoveTo(83073, 148386, -3470); 
    end;

    if User.inrange(82428, 148055, -3465, 250, 150) then begin  
      Engine.MoveTo(83073, 148386, -3470); 
    end;

if User.inrange(83440, 148150, -3401, 250, 150) then begin  
      Engine.MoveTo(83073, 148386, -3470); 
    end;

if User.inrange(82289, 149206, -3470, 250, 150) then begin 
      Engine.MoveTo(83073, 148386, -3470);
    end;
    
if User.inrange(83477, 149099, -3406, 250, 150) then begin  
      Engine.MoveTo(83073, 148386, -3470); 
    end;

if User.inrange(83073, 148386, -3470, 250, 150) then begin 
     Engine.SetTarget(10001); 
     Delay(1500);
     Engine.DlgOpen; 
     Delay(1500);
     Engine.DlgSel(9);
     Delay(1500);
     Engine.DlgOpen;
     Delay(1500);
     Engine.DlgSel(5);
     Delay(1500);
     Engine.DlgSel(15);
     Delay(1500);
     end;


Print('Go Farm 7');
if User.inrange(83073, 148386, -3470, 250, 150) then begin  
      Engine.MoveTo(83374, 147892, -3400);
    end;

if User.inrange(83374, 147892, -3400, 250, 150) then begin  
     Engine.SetTarget(10004); 
     Delay(1500);
     Engine.DlgOpen;
     Delay(1500);
     Engine.DlgSel(3);
     Delay(1500);
     Engine.DlgSel(14);
     Delay(1500);
 end;
 if User.inrange(115112, 166523, -2593, 250, 150) then begin
      Engine.MoveTo(119639, 168018, -3337)
    end;
end.      

Posted

Hi friends, cam someone help me with script for l2 lionna buff with alt + b and return to spot when die, is my first time with l2 adrenaline and dont know how edit script or make my self.. thanks for all

Posted (edited)

@adr.bot Ey!

 

Can you check my script? Its for Beast Farm. I had to use it because bot can't use items in this server, so I had to use with engine.usekey.

 

procedure SpoilThread();
var
  spoil: TL2Skill;
  mob: TL2Npc;
  point: TXYZ;
 
begin
    while Delay(500) do begin
    if (Engine.Status = lsOnline) and SkillList.ByID(254, spoil) then begin  
        
        if (User.Target.ID = (21488) or User.Target.ID = (21487)) then begin
            NpcList.ByID(User.Target.ID, mob);
            if not mob.sweepable and (spoil.endtime = 0) then begin
                engine.useskill(254);
            end;
            Engine.Attack;
        end;
        if not (User.Target.ID = (21488) or User.Target.ID = (21487)) then begin
            engine.usekey('F12');
        end;
        
    end;
end;

 

I only want to spoil Alpen Buffalos (x4) to get DC Helmet Recipe. I'll use target filter from bot, to target only baby Alpen Buffalos.

 

Say me if I'm wrong with something. Thanks!

Edited by Luigicol
  • 1 month later...
Posted

someone can edit this script pls ? bcs not use Dash and Stealth :/ thx

 

begin
while true do begin
  Engine.MoveTo(149523, -112686, -2064);
  Engine.SetTarget(31521);                                      ///jeremy
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  Engine.bypasstoserver('quest_accept?quest_id=621');
  Engine.MoveTo(149616, -112489, -2090);
  Engine.MoveTo(150404,-113188,-2141);
  Engine.MoveTo(150533,-114686,-1779);
  Engine.MoveTo(151344,-115006,-1611);
  Engine.CancelTarget;
  Engine.MoveTo(154492,-114995,-1567);
  Engine.MoveTo(157224,-115436,-1922);
  Engine.MoveTo(157381,-115407,-1896);
  Engine.MoveTo(157358,-115501,-1921);
  Engine.MoveTo(157598,-115486,-1927);
  Engine.SetTarget(31543);                                    ////pulin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('menu_select?ask=621 &reply=1');
  Delay(500);
  Engine.CancelTarget;
  Engine.MoveTo(156946, -114334, -1784);
  Engine.MoveTo(156388, -111358, -2549);
  Engine.MoveTo(156027, -110523, -2650);
  Engine.MoveTo(156419, -107881, -2657);
  Engine.MoveTo(155722, -105766, -2779);
  Engine.SetTarget(31544);                                      /// naff
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('menu_select?ask=621 &reply=1');
  Delay(500);            
  Engine.MoveTo(155621,-105697,-2780);
  Engine.MoveTo(154776,-104491,-2810);
  Engine.CancelTarget;
  Engine.MoveTo(153253,-101918,-2757);
  Engine.MoveTo(152601,-101212,-2943);
  Engine.MoveTo(149277,-100863,-2943);
  Engine.MoveTo(148429,-100919,-2994);
  Engine.MoveTo(146268,-101937,-2872);
  Engine.MoveTo(144957,-102812,-3556);
  Engine.MoveTo(141104,-105238,-3650);
  Engine.MoveTo(140773,-105450,-3659);
  Engine.MoveTo(140748,-105458,-3625);
  Engine.SetTarget(31545);                                      ///crocus
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('menu_select?ask=621 &reply=1');
  Delay(500);
  Engine.MoveTo(140722,-105729,-3654);
  Engine.MoveTo(140862,-108560,-3654);
  Engine.CancelTarget;
  Engine.MoveTo(141469,-109301,-3616);
  Engine.SetTarget(31546);                                    ////kuber
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('menu_select?ask=621 &reply=1');
  Delay(500);
  Engine.MoveTo(142274, -109216, -3587);
  Engine.MoveTo(143990, -108702, -3503);
  Engine.CancelTarget;
  Engine.MoveTo(146375, -108965, -3252);
  Engine.MoveTo(147727, -108871, -2899);
  Engine.MoveTo(148785, -108902, -2639);
  Engine.MoveTo(149347, -109226, -2515);
  Engine.MoveTo(149506, -110728, -2294);
  Engine.MoveTo(147948, -113046, -2157);
  Engine.MoveTo(147899, -113372, -2150);
  Engine.MoveTo(147528, -113301, -2112);
  Engine.SetTarget(31547);                                    /////beolin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('menu_select?ask=621 &reply=1');
  Delay(500);
  Engine.MoveTo(147591,-113304,-2108);
  Engine.MoveTo(148037,-113126,-2163);
  Engine.MoveTo(148908,-112712,-2096);
  Engine.MoveTo(149508,-112634,-2090);
  Engine.SetTarget(31521);                                  ///jeremy
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery (Continue)');
  Delay(500);
  engine.bypasstoserver('menu_select?ask=621 &reply=3');
  Delay(500);
  end;
 end.

  • 2 weeks later...
  • 1 month later...
Posted
On 9/6/2015 at 8:56 PM, adr.bot said:

hmm i dont know xd, maybe this 


procedure RushTarget(MinR, MaxR:Cardinal);
var
i:integer;
begin
for i:=0 to CharList.Count-1 do begin
if (User.DistTo(CharList.Items(i))>MinR) and
(User.DistTo(CharList.Items(i))<MaxR)then
begin
Engine.SetTarget(CharList.Items(i));
Break;
end;
end;

end;

begin
while true do begin
delay(50);
SetPVPTarget(200,600); //200min range, 600max range
end;
end.

it will target closer player

how make for mob? :)

  • 4 weeks later...

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

    • The character stops walking when using a mana potion. any can help me?   IemData item_begin    etcitem    728    [mana_potion]    item_type=etcitem    slot_bit_type={none}    armor_type=none    etcitem_type=potion    recipe_id=0    blessed=0    weight=180    default_action=action_skill_reduce    consume_type=consume_type_stackable    initial_count=1    maximum_count=20    soulshot_count=0    spiritshot_count=0    reduced_soulshot={}    reduced_spiritshot={}    reduced_mp_consume={}    immediate_effect=1    price=0    default_price=2000    item_skill=[s_mana_potion]    critical_attack_skill=[none]    attack_skill=[none]    magic_skill=[none]    item_skill_enchanted_four=[none]    material_type=liquid    crystal_type=none    crystal_count=0    is_trade=1    is_drop=1    is_destruct=1    physical_damage=0    random_damage=0    weapon_type=none    can_penetrate=0    critical=0    hit_modify=0    avoid_modify=0    dual_fhit_rate=0    shield_defense=0    shield_defense_rate=0    attack_range=0    damage_range={}    attack_speed=0    reuse_delay=10000    mp_consume=0    magical_damage=0    durability=0    damaged=0    physical_defense=0    magical_defense=0    mp_bonus=0    category={}    enchanted=0    html=[item_default.htm]    equip_pet={@ALL_PET}    magic_weapon=0    enchant_enable=0    can_equip_sex=-1    can_equip_race={}    can_equip_change_class=-1    can_equip_class={}    can_equip_agit=-1    can_equip_castle=-1    can_equip_castle_num={}    can_equip_clan_leader=-1    can_equip_clan_level=-1    can_equip_hero=-1    can_equip_nobless=-1    can_equip_chaotic=-1    item_end   SkillData   skill_begin    skill_name=[s_mana_potion]    skill_id=50004    level=1    operate_type=A2    magic_level=1    effect={{t_mp;57;3}}    is_magic=0    mp_consume2=0    cast_range=-1    effective_range=-1    skill_hit_time=0    skill_cool_time=0    skill_hit_cancel_time=0    reuse_delay=0    activate_rate=-1    lv_bonus_rate=0    basic_property=none    abnormal_time=15    abnormal_lv=1    abnormal_type=mp_recovery    attribute=attr_none    effect_point=0    target_type=self    affect_scope=single    affect_limit={0;0}    next_action=none    debuff=0    ride_state={@ride_none}    skill_end  
  • 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