Jump to content

Recommended Posts

Posted

 

Hello ! i need help

 

I did a script that works fine (Res, Move, Buf , GK, and go to farm), but when I "go to the village" automatically the option "Autoattack" is deactivated and when I return to the hunting zone the Mobs kill me because "Autoattack" is deactivated. because it can be ?

 

 

1834265154_Sinttulo.jpg.019ddc7b1c753351391464114e17922f.jpg

 

 

Here is the Script i was made

 

            function CheckStatus: Boolean;
begin
Result:=true;
    if User.Dead then begin
        Print('Dead. Pressing to village.');
        Delay(1000);
        Engine.FaceControl(1,false);
        Engine.GoHome;
        Delay(10000);
    end;
Result:=false;
end;

begin
 while true do begin
delay(150);
CheckStatus;
if user.inrange(146272, -58176, -2976, 450)
  then
    begin
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo (por el medio)
    
if user.inrange(145264, -57680, -2976, 450)
  then
    begin
    Engine.MoveTo(147516, -58506, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(145696, -57696, -2976, 450)
  then
    begin
    Engine.MoveTo(147670, -58926, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(144944, -55392, -2976, 450)
  then
    begin
    Engine.MoveTo(144959, -57481, -2975);
    Engine.MoveTo(147469, -58659, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(144752, -56752, -2976, 450)
  then
    begin
    Engine.MoveTo(144959, -57481, -2975);
    Engine.MoveTo(147469, -58659, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end;  //listo
if user.inrange(149120, -58064, -2976, 450)
  then
    begin
    Engine.MoveTo(147651, -58513, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(150400, -56752, -2976, 450)
  then
    begin
    Engine.MoveTo(149695, -57943, -2975);
    Engine.MoveTo(147827, -58687, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(150704, -55744, -2976, 450)
  then
    begin
    Engine.MoveTo(150400, -56752, -2976);
    Engine.MoveTo(149695, -57943, -2975);
    Engine.MoveTo(147827, -58687, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end;  //listo
if user.inrange(147680, -58208, -2976, 450)
  then
    begin
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(148288, -58304, -2976, 450)
  then
    begin
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(147232, -58480, -2976, 450)
  then
    begin
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(149088, -56256, -2776, 450)
  then
    begin
    Engine.MoveTo(150496, -57283, -2975);
    Engine.MoveTo(148208, -58679, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
if user.inrange(146832, -55904, -2776, 450)
  then
    begin
    Engine.MoveTo(144981, -57365, -2975);
    Engine.MoveTo(147601, -58837, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(146368, -56256, -2776, 450)
  then
    begin
    Engine.MoveTo(144981, -57365, -2975);
    Engine.MoveTo(147601, -58837, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(147664, -56464, -2776, 450)
  then
    begin
    Engine.MoveTo(147628, -55463, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(147680, -56928, -2776, 450)
  then
    begin
    Engine.MoveTo(147628, -55463, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(148560, -55904, -2776, 450)
  then
    begin
    Engine.MoveTo(150373, -57246, -2975);
    Engine.MoveTo(148080, -58802, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(149872, -57424, -2976, 450)  
  then
    begin
    Engine.MoveTo(148080, -58802, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(144960, -56224, -2976, 450)  
  then
    begin
    Engine.MoveTo(145463, -57795, -2975);
    Engine.MoveTo(148080, -58802, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(144496, -55088, -2976, 450)  
  then
    begin
    Engine.MoveTo(145463, -57795, -2975);
    Engine.MoveTo(148080, -58802, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo
    
if user.inrange(145392, -56960, -2976, 450) 
  then 
   begin
    Engine.MoveTo(145463, -57795, -2975);
    Engine.MoveTo(148080, -58802, -2975);
    Engine.MoveTo(147626, -58349, -2975);
    Engine.MoveTo(147714, -57626, -2876);
    Engine.MoveTo(147687, -56072, -2775);
    Engine.MoveTo(147648, -55566, -2727);
    Engine.MoveTo(147806, -55252, -2727);
    end; //listo

if User.inrange(147806, -55252, -2727, 250, 150) then begin  //2 res
      Print('Buff');
     Engine.SetTarget('La2Dream');  //Target do NCP GK
     Delay(1500);
     Engine.DlgOpen; // abre chat combat npc
     Delay(1500);
     Engine.DlgSel(14);
     Delay(1500);
     Engine.bypasstoserver('npc_268473689_ProfBuffs MAGO');
     Delay(1500)
 end;


if User.inrange(147806, -55252, -2727, 250, 150) then begin  //2 res
      Print('Go Teleporte');
     Engine.SetTarget('Tatiana');  //Target do NCP GK
     Delay(1500);
     Engine.DlgOpen; // abre chat combat npc
     Delay(1500);
     Engine.DlgSel(4);
     Delay(1500);
     Engine.bypasstoserver('npc_268473858_Chat 2');
     Delay(1500);
     Engine.bypasstoserver('npc_268473858_goto 9068');
     Delay(1500);
 end;

if user.inrange(186583, -75845, -2819, 450) 
  then 
   begin
Engine.MoveTo(186826, -75934, -2819);
Engine.MoveTo(186555, -75551, -2820);
Engine.MoveTo(186218, -75551, -2726);
Engine.MoveTo(185082, -75690, -2726);
Engine.MoveTo(184762, -76547, -2726);
Engine.MoveTo(184646, -76855, -2726);
Engine.MoveTo(181391, -78683, -2723);
Engine.MoveTo(181383, -75282, -2726);
Engine.MoveTo(177914, -75302, -2726);
Engine.MoveTo(175017, -75332, -2726);
    end; //listo

 end;
end.

 

Sorry for my bad english

Posted
Quote

if user.inrange(186583, -75845, -2819, 450) 
  then 
   begin
Engine.MoveTo(186826, -75934, -2819);
Engine.MoveTo(186555, -75551, -2820);
Engine.MoveTo(186218, -75551, -2726);
Engine.MoveTo(185082, -75690, -2726);
Engine.MoveTo(184762, -76547, -2726);
Engine.MoveTo(184646, -76855, -2726);
Engine.MoveTo(181391, -78683, -2723);
Engine.MoveTo(181383, -75282, -2726);
Engine.MoveTo(177914, -75302, -2726);
Engine.MoveTo(175017, -75332, -2726);
    end; //listo

 end;
end.

change this to :

if user.inrange(186583, -75845, -2819, 450) 
  then 
   begin
Engine.MoveTo(186826, -75934, -2819);
Engine.MoveTo(186555, -75551, -2820);
Engine.MoveTo(186218, -75551, -2726);
Engine.MoveTo(185082, -75690, -2726);
Engine.MoveTo(184762, -76547, -2726);
Engine.MoveTo(184646, -76855, -2726);
Engine.MoveTo(181391, -78683, -2723);
Engine.MoveTo(181383, -75282, -2726);
Engine.MoveTo(177914, -75302, -2726);
Engine.MoveTo(175017, -75332, -2726);
Engine.FaceControl(1,true);      //     on bot
    end; //listo

 end;
end.

 

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.



×
×
  • Create New...