AutoRangeGuilder_11

[abibot]

tryed every angle ectect for an hour all the script dose is run to the other side -.-

Try using dewrange's spam clicker and then editing the camera angle to be something that works for you (this line):

P07_MakeCompassDegree(randomrange(304,316));

Error: Exception: Font [P07UpChars] not found. at line 226
The following DTMs were not freed: [0, 1, 2, 3]
[Error] C:\Documents and Settings\Eigenaar\Mijn documenten\Downloads\P07Include.Simba(57:3): Unknown identifier 'MMouse' at line 56
Compiling failed.

help me please

Try re-installing simba, smart 8, and the 07 includes by following Yohojo's video tutorials, first one here, check the video description for the others; http://www.youtube.com/watch?v=mho1ek92jgY

[xdragon23]

Hey abibot. how would you change the camera angle?? i mean like to what numbeer?? just guess? or what tools do we used

[sillyfrog]

Hey abibot. how would you change the camera angle?? i mean like to what numbeer?? just guess? or what tools do we used

just play around with it until you get it to work right for you. It's all going to depend on where you're character is standing.

[benzz]

2nd day in a row it has been failing ive given up on it

[sillyfrog]

benzz just play around with it a little and babysit it and it works alright. There should be an update in the next few days he says. Just be patient :]

[koolaidsman]

just play around with it until you get it to work right for you. It's all going to depend on where you're character is standing.

doesn't work for me? just says over and over that it can't find the judge

[Shryry]

I got it to work perfectly for 3 rounds, but after 3 it goes to an angle it has already used writes the firing line but doesn't click anything.

I've change the competition number to 200 at the bottom so that isn't it, is it?

[Sk1nyNerd]

sorry if i am not allowed to do this and if that is the case contact me and i will remove this post.

anyone looking for a spamclick option for this script replace lines 104 to 113 with this code

procedure Wield_Arrow;
begin
  BronzeArrowDTM := DTMFromString('mggAAAHicY2NgYDjBxMBwCIj3AvFxID4LxNuBmImRgeE/AwT/BeJ/QCwAFHM2lgXjeE8dMK2nIsKQK8LLwA+Ux4YZcWAIAACNZgyT');
  if FindDTM(BronzeArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
  begin
    MMouse(x,y,5,5);
    ClickMouse2(mouse_left);
  end;
FreeDTM(BronzeArrowDTM);
  end;

and lines 118 to 158 with this code

procedure Fire_Target;
begin
  P07_MakeCameraAngleLow;
  P07_MakeCompassDegree(randomrange(304,316));
  writeln('Compass Angle set for:' + IntToStr(P07_GetCompassAngle));
  mouseclickcount := 0;
  mouseclickcount2 := 0;
  wait(randomrange(300,500));
  TargetDTM := DTMFromString('mlwAAAHicY2dgYPgDxD+B+B+U/Q2IGRghYvJArAvEekCsCcTKUGwIxM9vRzNs2tjDEJkizpAVZsMQnTWfYW2YP0N8rhEDF1AeF2bEg6EAAKUoEN4=');
  CloseDTM := DTMFromString('mFQEAAHic42VgYHjKyMDwCogfQjGIfQ+I3zJC5J5B2feQxDWB+lSgWA+KNRgg4kpAbAilYWwQZmBgxMAp4Y5gXJDoxhDiaQ6mYWwQZgWqIhVj2kIYowAAOJcV5Q==');

  if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
  writeln('Firing at Target!');
    repeat
      if Findcolorspiraltolerance(x, y, 10513243, 209, 24, 248, 48, 10) then
        begin
          clickmouse(x, y, mouse_left);
          wait(randomrange(75, 100));
          mouseclickcount := mouseclickcount + 1;
        end;
    until(findcolorspiraltolerance(x, y, 128, 175, 352, 433, 402, 10));
      begin
        if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
          begin
          ClickMouse(x, y, mouse_left);
          wait(randomrange(50, 60));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;

and make sure you stand on the west side of the competition area

Excellent! You have saved me some time very nice

Those having trouble make sure you have downloaded 1.3 correctly. It worked great for the hour i tested it last night. The angles I used are well focused on the scripts ability to find the target. if you look at dewranges image below the optium standing point is behind the judge along the fence, thats where i made the dtm for the target.

I appreciate your guys' patience and help - keep the suggestions coming. I should have some free time tuesday to hammer some stuff out

Thanks again dewrange

[Sk1nyNerd]

not sure as to why that is happening i have been running more than an hour straight now with this working. when i say the most western side i mean stand here. just wait for the judge to walk over and you should be fine Attachment 20397

dews' image

[bongmaster420]

hey it keeps spamming 'the automatically split characters are too wide. Try decreasing min spacing' can anyone help?

[waqqas123]

[Error] (10:3): Unknown identifier 'P07_PlayerName' at line 9
Compiling failed.

how do i fix this?

[Anzi]

The script doesnt work. It doesnt close the "Target View" window. The script just moves the cursos do the X but never presses it.

[Anzi]

When I try to use the spamclick tweak I get this error:
[Error] F:\Simba\Scripts\AutoRangeGuilder_11 [1.3].simba(106:1): Identifier expected at line 105
Compiling failed.

program AutoRangeGuilder_11;
{$DEFINE SMART8}

//Welcome to the AutoRangeGuilder_11! This is my first official script so please feel
//free to comment me on the forums/inbox for problems and suggestions.
//Currently I know that it keeps 'talking' to the judge sometimes, simply end the script
//and try a different spot or rotate the camera a bit.
//Thanks to everyone who dedicated their time for the OldSchool Simba support.
//First script, no leech. There is something you may want to change however.


{$I SRL/SRL.Simba}
{$I P07Include.Simba}
{$I SRL/SRL/Misc/Debug.Simba}


 var
    TargetDTM, BronzeArrowDTM, CloseDTM, x, y, a, b, mouseclickcount, mouseclickcount2, competitionsplayedcount: integer;

 const
    judgecolor1 = 3364126;
    judgecolor2 = 3033937;
    judgecolor3 = 3763576;

procedure P07_DeclarePlayer;
begin
  P07_Playername:=''; //enter your username
  P07_Playerpass:=''; //enter your password
end;

procedure Open_Inv_Tab;
begin
  if(not P07_TabInventoryTab(4)) then
  begin
    P07_TabInventoryTab(4)
  end;
end;

procedure Start_Comp;
begin
  wait(randomrange(500,1000));
  begin
    case random(10000) of
    1..50: wait(randomrange(3000,6000));
    200..276: wait(randomrange(7000,12000));
    9875..10000: P07_HoverSkill('ranged', random(6000));
    end;
  end;
  P07_MakeCameraAngleHigh;
  begin
    if P07_FindObjCustom(x, y, ['omp', 'tition', 'judge'], [judgecolor1, judgecolor2, judgecolor3], 5) then
    begin
      MMouse(x,y,5,5);
      ClickMouse2(mouse_left);
      writeln('');
      writeln('Talking to the Judge...');
    end
    else
    begin
      writeln('Unable to find the Judge, looking again...');
      P07_MakeCameraAngleHigh;
      Start_Comp;
    end;
  end;
end;

procedure Click_to_Continue;
begin
  wait(randomrange(1000,1500));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of    //click sure
    1..20: MMouse(320,396,5,5);
    21..35: MMouse(273,390,5,5);
    36..50: MMouse(197,394,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000)); //click to continue
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(400,600));
  writeln('The competition has started! Wielding the Bronze arrows...');

procedure Wield_Arrow;                          // <--------------- LINE 105
begin
  BronzeArrowDTM := DTMFromString('mggAAAHicY2NgYDjBxMBwCIj3AvFxID4LxNuBmImRgeE/AwT/BeJ/QCwAFHM2lgXjeE8dMK2nIsKQK8LLwA+Ux4YZcWAIAACNZgyT');
  if FindDTM(BronzeArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
  begin
    MMouse(x,y,5,5);
    ClickMouse2(mouse_left);
  end;
FreeDTM(BronzeArrowDTM);
  end;
  else
  begin
    MMouse(675,184,10,10); //equipment
    ClickMouse2(mouse_left);
procedure Fire_Target;
begin
  P07_MakeCameraAngleLow;
  P07_MakeCompassDegree(randomrange(304,316));
  writeln('Compass Angle set for:' + IntToStr(P07_GetCompassAngle));
  mouseclickcount := 0;
  mouseclickcount2 := 0;
  wait(randomrange(300,500));
  TargetDTM := DTMFromString('mlwAAAHicY2dgYPgDxD+B+B+U/Q2IGRghYvJArAvEekCsCcTKUGwIxM9vRzNs2tjDEJkizpAVZsMQnTWfYW2YP0N8rhEDF1AeF2bEg6EAAKUoEN4=');
  CloseDTM := DTMFromString('mFQEAAHic42VgYHjKyMDwCogfQjGIfQ+I3zJC5J5B2feQxDWB+lSgWA+KNRgg4kpAbAilYWwQZmBgxMAp4Y5gXJDoxhDiaQ6mYWwQZgWqIhVj2kIYowAAOJcV5Q==');

  if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
  writeln('Firing at Target!');
    repeat
      if Findcolorspiraltolerance(x, y, 10513243, 209, 24, 248, 48, 10) then
        begin
          clickmouse(x, y, mouse_left);
          wait(randomrange(75, 100));
          mouseclickcount := mouseclickcount + 1;
        end;
    until(findcolorspiraltolerance(x, y, 128, 175, 352, 433, 402, 10));
      begin
        if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
          begin
          ClickMouse(x, y, mouse_left);
          wait(randomrange(50, 60));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;
          begin
            MMouse(x,y,5,5);
            ClickMouse2(mouse_left);
            ClickMouse2(mouse_left);
            wait(randomrange(200,600));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;

begin
setupSRL;
SetupP07Include;
ActivateClient;
ClearDebug;
Wait(1000);
If (Not P07_LoggedIn) then
begin
  P07_LogInPlayer;
end;
repeat
Open_Inv_Tab;
Start_Comp;
Click_to_Continue;
Wield_Arrow;
Fire_Target;
until(competitionsplayedcount = 3);
  begin
  writeln('Number of Competitions completed!');
  writeln('Logging out...');
  MMouse(644,483,5,5);
  ClickMouse2(mouse_left);
  wait(randomrange(500,1500));
  MMouse(633,378,5,5);
  ClickMouse2(mouse_left);
  end;
TerminateScript;
end.

[waqqas123]

[Error] (10:3): Unknown identifier 'P07_PlayerName' at line 9
Compiling failed.

i get this error and i have allready put my details between the ''

please help me to fix.

[elvemage07]

My problem is it will do one or two games flawless, then just clicks the target and never speaks to the judge after that...

[extazypros]

The script doesnt work. It doesnt close the "Target View" window. The script just moves the cursos do the X but never presses it.

Use dewrange spam click.

[hippy123]

delete this script its terrible doesnt work..........................


scripter is bad and should be banned tbh.

[extazypros]

[Error] (10:3): Unknown identifier 'P07_PlayerName' at line 9
Compiling failed.

i get this error and i have allready put my details between the ''

please help me to fix.

Just log in and then run the script again.

[extazypros]

delete this script its terrible doesnt work..........................


scripter is bad and should be banned tbh.

Scripter is new at this, and this is his first script so dont judge him.
It needs some fixes, but you can do it by yourself.

[extazypros]

When I try to use the spamclick tweak I get this error:
[Error] F:\Simba\Scripts\AutoRangeGuilder_11 [1.3].simba(106:1): Identifier expected at line 105
Compiling failed.

program AutoRangeGuilder_11;
{$DEFINE SMART8}

//Welcome to the AutoRangeGuilder_11! This is my first official script so please feel
//free to comment me on the forums/inbox for problems and suggestions.
//Currently I know that it keeps 'talking' to the judge sometimes, simply end the script
//and try a different spot or rotate the camera a bit.
//Thanks to everyone who dedicated their time for the OldSchool Simba support.
//First script, no leech. There is something you may want to change however.


{$I SRL/SRL.Simba}
{$I P07Include.Simba}
{$I SRL/SRL/Misc/Debug.Simba}


 var
    TargetDTM, BronzeArrowDTM, CloseDTM, x, y, a, b, mouseclickcount, mouseclickcount2, competitionsplayedcount: integer;

 const
    judgecolor1 = 3364126;
    judgecolor2 = 3033937;
    judgecolor3 = 3763576;

procedure P07_DeclarePlayer;
begin
  P07_Playername:=''; //enter your username
  P07_Playerpass:=''; //enter your password
end;

procedure Open_Inv_Tab;
begin
  if(not P07_TabInventoryTab(4)) then
  begin
    P07_TabInventoryTab(4)
  end;
end;

procedure Start_Comp;
begin
  wait(randomrange(500,1000));
  begin
    case random(10000) of
    1..50: wait(randomrange(3000,6000));
    200..276: wait(randomrange(7000,12000));
    9875..10000: P07_HoverSkill('ranged', random(6000));
    end;
  end;
  P07_MakeCameraAngleHigh;
  begin
    if P07_FindObjCustom(x, y, ['omp', 'tition', 'judge'], [judgecolor1, judgecolor2, judgecolor3], 5) then
    begin
      MMouse(x,y,5,5);
      ClickMouse2(mouse_left);
      writeln('');
      writeln('Talking to the Judge...');
    end
    else
    begin
      writeln('Unable to find the Judge, looking again...');
      P07_MakeCameraAngleHigh;
      Start_Comp;
    end;
  end;
end;

procedure Click_to_Continue;
begin
  wait(randomrange(1000,1500));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of    //click sure
    1..20: MMouse(320,396,5,5);
    21..35: MMouse(273,390,5,5);
    36..50: MMouse(197,394,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000)); //click to continue
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(400,600));
  writeln('The competition has started! Wielding the Bronze arrows...');

procedure Wield_Arrow;                          // <--------------- LINE 105
begin
  BronzeArrowDTM := DTMFromString('mggAAAHicY2NgYDjBxMBwCIj3AvFxID4LxNuBmImRgeE/AwT/BeJ/QCwAFHM2lgXjeE8dMK2nIsKQK8LLwA+Ux4YZcWAIAACNZgyT');
  if FindDTM(BronzeArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
  begin
    MMouse(x,y,5,5);
    ClickMouse2(mouse_left);
  end;
FreeDTM(BronzeArrowDTM);
  end;
  else
  begin
    MMouse(675,184,10,10); //equipment
    ClickMouse2(mouse_left);
procedure Fire_Target;
begin
  P07_MakeCameraAngleLow;
  P07_MakeCompassDegree(randomrange(304,316));
  writeln('Compass Angle set for:' + IntToStr(P07_GetCompassAngle));
  mouseclickcount := 0;
  mouseclickcount2 := 0;
  wait(randomrange(300,500));
  TargetDTM := DTMFromString('mlwAAAHicY2dgYPgDxD+B+B+U/Q2IGRghYvJArAvEekCsCcTKUGwIxM9vRzNs2tjDEJkizpAVZsMQnTWfYW2YP0N8rhEDF1AeF2bEg6EAAKUoEN4=');
  CloseDTM := DTMFromString('mFQEAAHic42VgYHjKyMDwCogfQjGIfQ+I3zJC5J5B2feQxDWB+lSgWA+KNRgg4kpAbAilYWwQZmBgxMAp4Y5gXJDoxhDiaQ6mYWwQZgWqIhVj2kIYowAAOJcV5Q==');

  if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
  writeln('Firing at Target!');
    repeat
      if Findcolorspiraltolerance(x, y, 10513243, 209, 24, 248, 48, 10) then
        begin
          clickmouse(x, y, mouse_left);
          wait(randomrange(75, 100));
          mouseclickcount := mouseclickcount + 1;
        end;
    until(findcolorspiraltolerance(x, y, 128, 175, 352, 433, 402, 10));
      begin
        if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
          begin
          ClickMouse(x, y, mouse_left);
          wait(randomrange(50, 60));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;
          begin
            MMouse(x,y,5,5);
            ClickMouse2(mouse_left);
            ClickMouse2(mouse_left);
            wait(randomrange(200,600));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;

begin
setupSRL;
SetupP07Include;
ActivateClient;
ClearDebug;
Wait(1000);
If (Not P07_LoggedIn) then
begin
  P07_LogInPlayer;
end;
repeat
Open_Inv_Tab;
Start_Comp;
Click_to_Continue;
Wield_Arrow;
Fire_Target;
until(competitionsplayedcount = 3);
  begin
  writeln('Number of Competitions completed!');
  writeln('Logging out...');
  MMouse(644,483,5,5);
  ClickMouse2(mouse_left);
  wait(randomrange(500,1500));
  MMouse(633,378,5,5);
  ClickMouse2(mouse_left);
  end;
TerminateScript;
end.

You made a mistake by coping pasting spam click code, do it again.

[Anzi]

Now I'm getting begin expected error at line 114.

program AutoRangeGuilder_11;
{$DEFINE SMART8}

//Welcome to the AutoRangeGuilder_11! This is my first official script so please feel
//free to comment me on the forums/inbox for problems and suggestions.
//Currently I know that it keeps 'talking' to the judge sometimes, simply end the script
//and try a different spot or rotate the camera a bit.
//Thanks to everyone who dedicated their time for the OldSchool Simba support.
//First script, no leech. There is something you may want to change however.

{$I SRL/SRL.Simba}
{$I SRL/SRL/Misc/Debug.Simba}
{$I P07Include.Simba}

 var
    TargetDTM, BronzeArrowDTM, CloseDTM, x, y, a, b, mouseclickcount, mouseclickcount2, competitionsplayedcount: integer;

 const
    judgecolor1 = 3364126;
    judgecolor2 = 3033937;
    judgecolor3 = 3763576;

procedure P07_DeclarePlayer;
begin
  P07_Playername:=''; //enter your username
  P07_Playerpass:=''; //enter your password
end;

procedure Open_Inv_Tab;
begin
  if(not P07_TabInventoryTab(4)) then
  begin
    P07_TabInventoryTab(4)
  end;
end;

procedure Start_Comp;
begin
  wait(randomrange(500,1000));
  begin
    case random(10000) of
    1..50: wait(randomrange(3000,6000));
    200..276: wait(randomrange(7000,12000));
    9875..10000: P07_HoverSkill('ranged', random(6000));
    end;
  end;
  P07_MakeCameraAngleHigh;
  begin
    if P07_FindObjCustom(x, y, ['omp', 'tition', 'judge'], [judgecolor1, judgecolor2, judgecolor3], 5) then
    begin
      MMouse(x,y,5,5);
      ClickMouse2(mouse_left);
      writeln('');
      writeln('Talking to the Judge...');
    end
    else
    begin
      writeln('Unable to find the Judge, looking again...');
      P07_MakeCameraAngleHigh;
      Start_Comp;
    end;
  end;
end;

procedure Click_to_Continue;
begin
  wait(randomrange(1000,1500));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of    //click sure
    1..20: MMouse(320,396,5,5);
    21..35: MMouse(273,390,5,5);
    36..50: MMouse(197,394,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000));
  begin
    case random(50) of   //click to continue
    1..20: MMouse(380,454,5,5);
    21..35: MMouse(310,455,5,5);
    36..50: MMouse(246,453,5,5);
    end;
  end;
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(600,1000)); //click to continue
  ClickMouse2(mouse_left);
  ClickMouse2(mouse_left);
  wait(randomrange(400,600));
  writeln('The competition has started! Wielding the Bronze arrows...');
end;

procedure Wield_Arrow;
begin
  BronzeArrowDTM := DTMFromString('mggAAAHicY2NgYDjBxMBwCIj3AvFxID4LxNuBmImRgeE/AwT/BeJ/QCwAFHM2lgXjeE8dMK2nIsKQK8LLwA+Ux4YZcWAIAACNZgyT');
  if FindDTM(BronzeArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) then
  begin
    MMouse(x,y,5,5);
    ClickMouse2(mouse_left);
  end;
FreeDTM(BronzeArrowDTM);
  end;
    MMouse(675,184,10,10); //equipment    <----------------- LINE 114
    ClickMouse2(mouse_left);
    if FindDTM(BronzeArrowDTM, x, y, MIX1, MIY1, MIX2, MIY2) then

procedure Fire_Target;
begin
  P07_MakeCameraAngleLow;
  P07_MakeCompassDegree(randomrange(304,316));
  writeln('Compass Angle set for:' + IntToStr(P07_GetCompassAngle));
  mouseclickcount := 0;
  mouseclickcount2 := 0;
  wait(randomrange(300,500));
  TargetDTM := DTMFromString('mlwAAAHicY2dgYPgDxD+B+B+U/Q2IGRghYvJArAvEekCsCcTKUGwIxM9vRzNs2tjDEJkizpAVZsMQnTWfYW2YP0N8rhEDF1AeF2bEg6EAAKUoEN4=');
  CloseDTM := DTMFromString('mFQEAAHic42VgYHjKyMDwCogfQjGIfQ+I3zJC5J5B2feQxDWB+lSgWA+KNRgg4kpAbAilYWwQZmBgxMAp4Y5gXJDoxhDiaQ6mYWwQZgWqIhVj2kIYowAAOJcV5Q==');

  if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
  writeln('Firing at Target!');
    repeat
      if Findcolorspiraltolerance(x, y, 10513243, 209, 24, 248, 48, 10) then
        begin
          clickmouse(x, y, mouse_left);
          wait(randomrange(75, 100));
          mouseclickcount := mouseclickcount + 1;
        end;
    until(findcolorspiraltolerance(x, y, 128, 175, 352, 433, 402, 10));
      begin
        if FindDTM(TargetDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
          begin
          ClickMouse(x, y, mouse_left);
          wait(randomrange(50, 60));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;
            ClickMouse2(mouse_left);
            ClickMouse2(mouse_left);
            wait(randomrange(200,600));
          end;
      end;
  end
  else
  begin
    FreeDTM(TargetDTM);
    writeln('Unable to find Target... Trying again...');
    Fire_Target;
  end;
  competitionsplayedcount := competitionsplayedcount + 1;
  writeln('Competitions Played:' + IntToStr(competitionsplayedcount) +'!');
  FreeDTM(TargetDTM);
  FreeDTM(CloseDTM);
end;

begin
setupSRL;
SetupP07Include;
ActivateClient;
ClearDebug;
Wait(1000);
If (Not P07_LoggedIn) then
begin
  P07_LogInPlayer;
end;
repeat
Open_Inv_Tab;
Start_Comp;
Click_to_Continue;
Wield_Arrow;
Fire_Target;
until(competitionsplayedcount = 3);
  begin
  writeln('Number of Competitions completed!');
  writeln('Logging out...');
  MMouse(644,483,5,5);
  ClickMouse2(mouse_left);
  wait(randomrange(500,1500));
  MMouse(633,378,5,5);
  ClickMouse2(mouse_left);
  end;
TerminateScript;
end.

[anthonizad]

I get the same exact error

[dewrange]

Excellent! You have saved me some time very nice

Those having trouble make sure you have downloaded 1.3 correctly. It worked great for the hour i tested it last night. The angles I used are well focused on the scripts ability to find the target. if you look at dewranges image below the optium standing point is behind the judge along the fence, thats where i made the dtm for the target.


I appreciate your guys' patience and help - keep the suggestions coming. I should have some free time tuesday to hammer some stuff out

Thanks again dewrange

no problem at all! its my pleasure im just glad you were okay with my post

[profile1121]

How can i get this to run on smart, it keeps using my mouse

[shyne99]

so i got it to work in smart, with a help of a friend but my problem is that it fires 3 arrows then stops with the mox on the x box on the target interface and does nothing. what did i do wrong?