Edgeville Yew Cutter

Edgeville Yew Cutter

By: NCDS

Status:Working;

Info:

This Script has gotten two of my accounts from 60 to 80+ WC with no bans and has proven to be quite reliable. Hopefully it works as good for all of you as it does for me.

Features:

SRL-Stats
MultiPlayer
100% Color
SMART
Hatchet can be anywhere in Inv or equipped.
Supports Dragon hatchets
Toggle debug
Single Player breaks

Features to come:

"F12 to talk" (Idea from RM's Guild Miner, thanks!)
"F** to abort tree"
I'm open to all suggestions

Bugs:

As this is a newly released re-written version of this script, it has not yet undergone as extensive testing as I usually would do. I've ran it a couple times for 2/3 hours at a time and everything seems to be working well, but please post about any problems you run into.

Progress Reports:
Progress Report by NCDS:
 __________________________________________________
|                                                  |
|           NCDS' Edgville Yew Chopper!            |
|                 Version: Alpha;                  |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Nick: ifex;                                       |
|Location: Bank;                                   |
|Total Logs Banked: 248;                           |
|Total Loads Done: 8;                              |
|Experience Gained: 1153993;                       |
|Levels Gained: 0;                                 |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|Nick: sare;                                       |
|Location: lost; //Stuck in random                                  |
|Total Logs Banked: 405;                           |
|Total Loads Done: 15;                             |
|Experience Gained: 1235221;                       |
|Levels Gained: 1;                                 |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
|                                                  |
| Time Running: 9 hr 15 min 46 sec;                |
|__________________________________________________|
Progress Report by fanboy:
Status: __________________________________________________
Status: | |
Status: | NCDS' Edgeville Yew Chopper! |
Status: | Version: Beta v2.5;; |
Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
Status: |Nick: pie; |
Status: |Location: Bank; |
Status: |Total Logs Banked: 588; |
Status: |Total Loads Done: 21; |
Status: |Experience Gained: 102900; |
Status: |Levels Gained: -85; |
Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
Status: |Nick: pie; |
Status: |Location: lost; |
Status: |Total Logs Banked: 182; |
Status: |Total Loads Done: 6; |
Status: |Experience Gained: 31850; |
Status: |Levels Gained: 0; |
Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
Status: | |
Status: | Time Running: 5 hr 29 min 49 sec; |
Status: |_________________________________________________ _|
Directions:

Place Charters in the Bank, at the SouthTree, or NorthTree. Just be sure to set your .Loc in DeclarePlayers accordingly.
Fill out DeclarePlayers; and run the script!

Dev Log:

Code:

6-22-2010 - Beta v.1 released. (SCAR) NCDS_EdgevilleYewCutter[BETA]v1.scar (27.3 KB, 26 views) 6-28-2010 - Beta v.2 released. (SCAR) NCDS_EdgevilleYewCutter[BETA]v2.scar (27.9 KB, 19 views) Fixes/Additions: *Added single player breaks *Added Log count debug to help deal with the log counting problem for some *Stabilized a problematic click *Slowed antiban during cutting 7-6-2010 - Beta v2.5 released. (SCAR) NCDS_EdgevilleYewCutter[BETA]v2.5.scar (27.6 KB, 23 views) Fixes/Additions: *Minor bug fixes and updates *Fixed SinglePlayerBreaks *Did some organizing with the code 7-20-2010 - Beta v2.6 released(by request). (SCAR) NCDS_EdgevilleYewCutter[BETA]v2.6.scar (27.6 KB, 41 views) Fixes/Additions: *Minor details and tweaks 8-2-2010 - Beta v2.7 released (SCAR) NCDS_EdgevilleYewCutter[BETA]v2.7.scar (27.7 KB, 63 views) Fixes/Additions: *Optimized Tree cutting 9-1-2010 - v3.0 released (Simba) NCDS_EdgevilleYewCutter_v3.0.simba (29.3 KB, 14 views) Updates: *Re-wrote most everything (Now working with Simba!) *Added support for hatchet anywhere in Inv or equipped. *Updated/Optimized most methods used. 9-6-2010 - v3.1 released (Simba) NCDS_EdgevilleYewCutter_v3.1.simba (29.3 KB, 5 views) Updates: *Added Dragon hatchet support *Updated Bank record 9-7-2010 - v3.3 released (Simba) NCDS_EdgevilleYewCutter_v3.3.simba (29.1 KB, 24 views) Updates: *Optimized Banking *Numerous tweaks to make thing's run smoother 9-21-2010 - v3.4 released (Simba) Updates: *Random updates to work with the recent RS update

More Updates to come! :)

Enjoy! and as always, progress reports are appreciated.

Works just fine in Simba by the way. I just changed the includes to be properly included. ;)

Quote:

Originally Posted by i luffs yeww

Works just fine in Simba by the way. I just changed the includes to be properly included. ;)

Thanks :) Did you happen to let it run at all?

quickly gave it a scan, well done looks nice :) I won't run it because I'm just way to lazy, but congrats on the release!

Quote:

Originally Posted by Blumblebee

quickly gave it a scan, well done looks nice :) I won't run it because I'm just way to lazy, but congrats on the release!

Thanks buddy :)

Lord knows it was long over due.

Going good still:

Code:

__________________________________________________ | | | NCDS' Edgeville Yew Chopper! | | Version: Beta v.1;; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: ifex; | |Location: Bank; | |Total Logs Banked: 135; | |Total Loads Done: 5; | |Experience Gained: 27825; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: sare; | |Location: Bank; | |Total Logs Banked: 135; | |Total Loads Done: 5; | |Experience Gained: 1333221; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | | | Time Running: 3 hr 8 min 41 sec; | |__________________________________________________|

Some feedback would certainly be nice.

when I get home and finish testing my fisher, I'll give this a go for you.

Oh yeah I ran it for a load but I forgot I had a bank pin so I didn't add it in and it failed at bank (my fault, not the script's). I tested it in Simba. Worked fine, but it was spamming like crazy since it writes "Disguising as: whatever" (or something like that) in a loop of yours.

Nothing really to change, just debugging.

Quote:

Originally Posted by i luffs yeww

Oh yeah I ran it for a load but I forgot I had a bank pin so I didn't add it in and it failed at bank (my fault, not the script's). I tested it in Simba. Worked fine, but it was spamming like crazy since it writes "Disguising as: whatever" (or something like that) in a loop of yours.

Nothing really to change, just debugging.

In Scar it doesn't actually write that out, it just changes the title bars. I can fix that accordingly when I switch this to Simba though.

:) I know. Sorry, that wasn't clear.. I was playing Halo and had to type that out very quickly and keep on checking back to the game.

What I meant to say was that all that really needs changing for it to be "fully compatible" with Simba.

Code:

Disguising as: Disguising as: Walking to bank... ** Warning in WalkTo: MM_DirtGround returned 0 results.** Counted 0 logs in inventory. Status: __________________________________________________ Status: | | Status: | NCDS' Edgeville Yew Chopper! | Status: | Version: Beta v.1;; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: |Nick: othi; | Status: |Location: lost; | Status: |Total Logs Banked: 0; | Status: |Total Loads Done: 0; | Status: |Experience Gained: 2854818; | Status: |Levels Gained: 0; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | | Status: | Time Running: 12 min 16 sec; | Status: |__________________________________________________| Status: /~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\ Status: | SRL Randoms Report | Status: | www.villavu.com | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | SRL Logs : 1 | Status: \~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/ NextPlayer SwitchToPlayer(PlayerNo: 0, Active: False); Player is not Active... All players not active! Thanks for using the script. Post the Proggy! Status: __________________________________________________ Status: | | Status: | NCDS' Edgeville Yew Chopper! | Status: | Version: Beta v.1;; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: |Nick: othi; | Status: |Location: lost; | Status: |Total Logs Banked: 0; | Status: |Total Loads Done: 0; | Status: |Experience Gained: 2854818; | Status: |Levels Gained: 0; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | | Status: | Time Running: 12 min 17 sec; | Status: |__________________________________________________| Successfully executed.

Was standing by the south tree with a full inventory of logs.

I would recommend using Scar until I have time to make it run smoothly with Simba.

=X Like I said, it ran just fine in Simba for me.

Quote:

Originally Posted by bbri06

Code:

Disguising as: Disguising as: Walking to bank... ** Warning in WalkTo: MM_DirtGround returned 0 results.** Counted 0 logs in inventory. Status: __________________________________________________ Status: | | Status: | NCDS' Edgeville Yew Chopper! | Status: | Version: Beta v.1;; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: |Nick: othi; | Status: |Location: lost; | Status: |Total Logs Banked: 0; | Status: |Total Loads Done: 0; | Status: |Experience Gained: 2854818; | Status: |Levels Gained: 0; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | | Status: | Time Running: 12 min 16 sec; | Status: |__________________________________________________| Status: /~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\ Status: | SRL Randoms Report | Status: | www.villavu.com | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | SRL Logs : 1 | Status: \~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/ NextPlayer SwitchToPlayer(PlayerNo: 0, Active: False); Player is not Active... All players not active! Thanks for using the script. Post the Proggy! Status: __________________________________________________ Status: | | Status: | NCDS' Edgeville Yew Chopper! | Status: | Version: Beta v.1;; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: |Nick: othi; | Status: |Location: lost; | Status: |Total Logs Banked: 0; | Status: |Total Loads Done: 0; | Status: |Experience Gained: 2854818; | Status: |Levels Gained: 0; | Status: |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| Status: | | Status: | Time Running: 12 min 17 sec; | Status: |__________________________________________________| Successfully executed.

Was standing by the south tree with a full inventory of logs.

Quote:

Originally Posted by i luffs yeww

=X Like I said, it ran just fine in Simba for me.

Hmm, I guess I'll have to have a look at it tomorrow then. I've never experienced the problem my self. Did anything out of the ordinary happen when the problem occurred?

I've got to get to bed right now, but after work tomorrow I will hopefully figure out what happened.

Thanks for the feedback it is greatly appreciated.

Also, have you tried to run it any other times besides that one?

finished 1 load then logs out O.o

box:

Counted 0 logs in inventory.

SwitchToPlayer(PlayerNo: 0, Active: False);
Player is not Active...
All players not active!
Thanks for using the script.
Post the Proggy!
Successfully executed

The anti-ban seems a bit... hyper. Needs a bit less randomness in my opinion. In 45 seconds, it checked WC exp twice, 3 random skills, examined strange rock, and then examined yew tree three times in a row. 9 randoms in 45 seconds is a bit nuts.

Also, stopped after 1 load. Filled inventory, logged out.
Counted 0 logs in inventory.
NextPlayer
SwitchToPlayer(PlayerNo: 0, Active: False);
Player is not Active...
All players not active!
Thanks for using the script.

Code:

__________________________________________________ | | | NCDS' Edgeville Yew Chopper! | | Version: Beta v.1;; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: gs; | |Location: lost; | |Total Logs Banked: 0; | |Total Loads Done: 0; | |Experience Gained: 696411; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | | | Time Running: 10 min 22 sec; | |__________________________________________________|

Quote:

Originally Posted by NCDS

Did anything out of the ordinary happen when the problem occurred?

I wasn't watching it closely enough to notice anything out of the ordinary, sorry.

Also, have you tried to run it any other times besides that one?[/QUOTE]

Nope, not yet. I'm leaving for two weeks tomorrow so I won't be able to test it again until I get back.

Quote:

Originally Posted by xSaintias

finished 1 load then logs out O.o

box:

Counted 0 logs in inventory.

SwitchToPlayer(PlayerNo: 0, Active: False);
Player is not Active...
All players not active!
Thanks for using the script.
Post the Proggy!
Successfully executed

Quote:

Originally Posted by scubajesus

The anti-ban seems a bit... hyper. Needs a bit less randomness in my opinion. In 45 seconds, it checked WC exp twice, 3 random skills, examined strange rock, and then examined yew tree three times in a row. 9 randoms in 45 seconds is a bit nuts.

Also, stopped after 1 load. Filled inventory, logged out.
Counted 0 logs in inventory.
NextPlayer
SwitchToPlayer(PlayerNo: 0, Active: False);
Player is not Active...
All players not active!
Thanks for using the script.

Code:

__________________________________________________ | | | NCDS' Edgeville Yew Chopper! | | Version: Beta v.1;; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: gs; | |Location: lost; | |Total Logs Banked: 0; | |Total Loads Done: 0; | |Experience Gained: 696411; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | | | Time Running: 10 min 22 sec; | |__________________________________________________|

I've never had the problem of it stopping after 1 load either...
Did it fail at banking? or not make it to the bank or something?

I'll slow down the AntiBan in the next version. Also, I have the Experience Gained bug fixed for the new version as well. I just want to try and figure out whats going wrong for you guy's so I can fix it before releasing another version.

Quote:

Originally Posted by NCDS

I've never had the problem of it stopping after 1 load either...
Did it fail at banking? or not make it to the bank or something?

I'll slow down the AntiBan in the next version. Also, I have the Experience Gained bug fixed for the new version as well. I just want to try and figure out whats going wrong for you guy's so I can fix it before releasing another version.

yah it made it to bank, but (apparently) thought that there were zero logs in my inventory so it logged out... (my inventory had the full 28 logs...)

EDIT: also just wondering, why does the script not check to see if i am wielding an axe when it logs me in?
it just checks what lvl wc i am and then heads straight to the yews...

Mine logged out at the south tree with full inventory, but as with xSaintias, the script thought I had 0 items in my inventory and logged.

Quote:

Originally Posted by xSaintias

EDIT: also just wondering, why does the script not check to see if i am wielding an axe when it logs me in?
it just checks what lvl wc i am and then heads straight to the yews...

There is a Boolean for it in DeclarePlayers; for right now.

Quote:

Originally Posted by scubajesus

Mine logged out at the south tree with full inventory, but as with xSaintias, the script thought I had 0 items in my inventory and logged.

I will hopefully be able to figure that out today, its never given me any sort of problem with counting the logs.

Edit: Stats keep going up but not many post's :/

Edit2: I'm gone for the night but I will be back working on this tomorrow when I return. To all those having problems with the script, add my MSN and message me tomorrow evening when I get back. I'm curious to figure out what is going on.

Edit3: I'm pretty sure I figured out what was happening with you guy's. I had just changed the color for the ground and I think that may have been messing it up for you. I just changed it again to a more common color and it seems to be running well for me, although it has been the whole time, but I will post an updated version tomorrow when I get out of work. I just want to let it go for a little bit and make sure I have everything done that I want done right now.

Also, I added a debug part to the CountLogsInInv function with a constant. So, for all you who were having problems with counting the logs, please just set 'DebugLogOutline' to True and post what it says the Outline is and I should be able to fix it.

Beta v.2 is now released.

Quote:

Originally Posted by FirstPost

Fixes/Additions:
*Added single player breaks
*Added Log count debug to help deal with the log counting problem for some
*Stabilized a problematic click
*Slowed antiban during cutting

Refer to the first post for other updates etc.

All is running well for me. Hopefully it works the same for you!

Edit: Be sure to say something if the SinglePlayerBreak messes anything up for you. I haven't really tested it very much. I am now though.

Both were in Randoms, but just to show that the version is working:

Code:

__________________________________________________ | | | NCDS' Edgeville Yew Chopper! | | Version: Beta v.2;; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: esar; | |Location: lost; | |Total Logs Banked: 27; | |Total Loads Done: 1; | |Experience Gained: 4725; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: ifex; | |Location: lost; | |Total Logs Banked: 54; | |Total Loads Done: 2; | |Experience Gained: 9450; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | | | Time Running: 1 hr 9 min 14 sec; | |__________________________________________________|

Can you please add a Member option? There is none in this script.

That's an awful lot of global variables. I'd break them down for clarity.
SCAR Code:
FindColorsSpiralTolerance(x, y, Arr, tLoc[Loc].Color, tLoc[Loc].Coords[0],
                               tLoc[Loc].Coords[1], tLoc[Loc].Coords[2],
                                 tLoc[Loc].Coords[3], tLoc[Loc].Tol);
    Result := (Length(Arr) >= tLoc[Loc].cCount);
with tLoc do ?

btw, where did you learn to find the symbol by its outline and then its inside color? :p

I'm liking the BlackList used in the inv counting. Maybe make a constant there?

Loved the looping in the bank opening, to find a close-by booth.

For the deposting, guess you don't really support the axe being anywhere in the inv. You could check for the axe's or the log's blacklist, and then go by that.

And I would definitely make the mainloop shorter, by putting some of the code in procedures (or functions) ;)

Overall, seems like a very good script.

~RM :)

Quote:

Originally Posted by Rasta Magician

That's an awful lot of global variables. I'd break them down for clarity.

Already planned on it ;)
Quote:
Originally Posted by Rasta Magician
SCAR Code:
FindColorsSpiralTolerance(x, y, Arr, tLoc[Loc].Color, tLoc[Loc].Coords[0],
                               tLoc[Loc].Coords[1], tLoc[Loc].Coords[2],
                                 tLoc[Loc].Coords[3], tLoc[Loc].Tol);
    Result := (Length(Arr) >= tLoc[Loc].cCount);
with tLoc do ?
That part currently isn't used but when I fix it and get it working properly it will be clear. It's basically just an identification process for thecurrent location.

Quote:

Originally Posted by Rasta Magician

btw, where did you learn to find the symbol by its outline and then its inside color? :p

I honestly don't remember but it work's great!

Quote:

Originally Posted by Rasta Magician

I'm liking the BlackList used in the inv counting. Maybe make a constant there?

Will do!

Quote:

Originally Posted by Rasta Magician

Loved the looping in the bank opening, to find a close-by booth.

For the deposting, guess you don't really support the axe being anywhere in the inv. You could check for the axe's or the log's blacklist, and then go by that.

Yeah, I've been meaning to work on the the AxeEquipped stuff to make it cooler than just a boolean :p

Quote:

Originally Posted by Rasta Magician

And I would definitely make the mainloop shorter, by putting some of the code in procedures (or functions) ;)

Like MSI's? :p
I probably will end up doing that, I get lost once in a while.

Quote:

Originally Posted by Rasta Magician

Overall, seems like a very good script.

Thank you very much! I appreciate you taking the time to go through it :)

Quote:

Originally Posted by ffcfoo

Can you please add a Member option? There is none in this script.

Next update ;)

RM Guild Miner

SCAR Code:

{ RM --------------------------------------------------------------------------]
[ Finds symbol Which through TPA Analysis                                      ]
[------------------------------------------------------------------------------}
Function FindSymbolWithTPA(Which: integer; var Where: TPoint): boolean;
var
  TPA : TPointArray;
  ATPA: T2DPointArray;
  TBArr  : TBoxArray;
  i, h, t, waste, CTS: integer;
  Hue, Sat: extended;
  TIA: TIntegerArray;
  Symb: TSymbol;
begin
  RMRandoms(true);
  if not FindColors(TPA, SYMBOL_OUTLINE, MMX1, MMY1, MMX2, MMY2) then
  begin
    srl_warn('FindSymbolThroughTPA', 'Could not find symbol', warn_AllVersions);
    exit;
  end;

  ATPA := SplitTPA(TPA, 2);

  t := 0;
  h := High(ATPA);
  SetLength(TIA, h + 1);
  SetLength(TBArr, h + 1);

  for i:= 0 to h do
  begin
    TBArr[i] := GetTPABounds(ATPA[i]);
    if FindColor(waste, waste, SYMBOL_FILL, TBArr[i].x1, TBArr[i].y1, TBArr[i].x2, TBArr[i].y2) then
    begin
      TIA[t] := i;
      Inc(t);
    end;
  end;

  if (t = 0) then
  begin
    RMDebug('Impossible walk');
    Result := false;
    exit;
  end;

  SetLength(TIA, t);

  case which of

    SYMBOL_BANK :
      with Symb do
      begin
        Color := 6542813; {2216175, 4694448, 9697013}
        Tol   := 15;
        Hue   :=  0.10;
        Sat   :=  1.49;
      end;

    SYMBOL_DUNGEON:
      with Symb do
      begin
        Color := 6645236; {10526972, 2763504, 5263604}
        Tol   := 13;
        Hue   :=  0.0;
        Sat   :=  0.29;
      end;


    SYMBOL_MINING:
    with Symb do
      begin
        Color := 8092796;
        Tol   := 14;
        Hue   := 2.39;
        Sat   := 0.03;

      end;
  end;

  GetCTS(CTS, Hue, Sat);
  SetCTS(2, Symb.Hue, Symb.sat);

  for i:= 0 to t-1 do
  begin
    h := TIA[i];
    if FindColorsToleranceBox(TPA, Symb.Color, Symb.Tol, TBArr[h]) then
    begin
      Where := MiddleTPA(TPA);
      Result := true;
      break;
    end;
  end;

  SetCTS(CTS, Hue, Sat);

  if i = t then
    RMDebug('could not find symbol fill');

end;

~RM ;)

Quote:

Originally Posted by Rasta Magician

RM Guild Miner

SCAR Code:

{ RM --------------------------------------------------------------------------]
[ Finds symbol Which through TPA Analysis                                      ]
[------------------------------------------------------------------------------}
Function FindSymbolWithTPA(Which: integer; var Where: TPoint): boolean;
var
  TPA : TPointArray;
  ATPA: T2DPointArray;
  TBArr  : TBoxArray;
  i, h, t, waste, CTS: integer;
  Hue, Sat: extended;
  TIA: TIntegerArray;
  Symb: TSymbol;
begin
  RMRandoms(true);
  if not FindColors(TPA, SYMBOL_OUTLINE, MMX1, MMY1, MMX2, MMY2) then
  begin
    srl_warn('FindSymbolThroughTPA', 'Could not find symbol', warn_AllVersions);
    exit;
  end;

  ATPA := SplitTPA(TPA, 2);

  t := 0;
  h := High(ATPA);
  SetLength(TIA, h + 1);
  SetLength(TBArr, h + 1);

  for i:= 0 to h do
  begin
    TBArr[i] := GetTPABounds(ATPA[i]);
    if FindColor(waste, waste, SYMBOL_FILL, TBArr[i].x1, TBArr[i].y1, TBArr[i].x2, TBArr[i].y2) then
    begin
      TIA[t] := i;
      Inc(t);
    end;
  end;

  if (t = 0) then
  begin
    RMDebug('Impossible walk');
    Result := false;
    exit;
  end;

  SetLength(TIA, t);

  case which of

    SYMBOL_BANK :
      with Symb do
      begin
        Color := 6542813; {2216175, 4694448, 9697013}
        Tol   := 15;
        Hue   :=  0.10;
        Sat   :=  1.49;
      end;

    SYMBOL_DUNGEON:
      with Symb do
      begin
        Color := 6645236; {10526972, 2763504, 5263604}
        Tol   := 13;
        Hue   :=  0.0;
        Sat   :=  0.29;
      end;


    SYMBOL_MINING:
    with Symb do
      begin
        Color := 8092796;
        Tol   := 14;
        Hue   := 2.39;
        Sat   := 0.03;

      end;
  end;

  GetCTS(CTS, Hue, Sat);
  SetCTS(2, Symb.Hue, Symb.sat);

  for i:= 0 to t-1 do
  begin
    h := TIA[i];
    if FindColorsToleranceBox(TPA, Symb.Color, Symb.Tol, TBArr[h]) then
    begin
      Where := MiddleTPA(TPA);
      Result := true;
      break;
    end;
  end;

  SetCTS(CTS, Hue, Sat);

  if i = t then
    RMDebug('could not find symbol fill');

end;

~RM ;)

>.< I didn't even realize! Mine is not nearly as thorough as yours, but it work's good!

I'm pretty sure I originally got the idea from something Narcle said a long time ago, not positive though.

Great

thanks, it's very good, I'm running it right now,
__________________________________________________
| |
| NCDS' Edgeville Yew Chopper! |
| Version: Beta v.2;; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
|Nick: xtnc; |
|Location: Bank; |
|Total Logs Banked: 27; |
|Total Loads Done: 1; |
|Experience Gained: 4725; |
|Levels Gained: -69; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
|Nick: ; |
|Location: Bank; |
|Total Logs Banked: 0; |
|Total Loads Done: 0; |
|Experience Gained: 0; |
|Levels Gained: 0; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
| |
| Time Running: 12 min 10 sec; |
|_________________________________________________ _|
Oh and sometimes it logs out and doens't log in don't know why, help would be appreciated if someone could

I love this just a bug would be it logs me out sometimes

Quote:

Originally Posted by jakobr

I love this just a bug would be it logs me out sometimes

I'm glad you like it. If you could post what the Debug box say's when it logs you out and describe the situation a little that would help me help you a lot.

P.S. Wait a few more loads before you post the proggy next time :p Thanks though!

I plan on having a new release for this sometime this week hopefully, depending on what kind of feedback I can get on bugs...which is slim to none at the moment..

Quote:

Originally Posted by jakobr

thanks, it's very good, I'm running it right now,
__________________________________________________
| |
| NCDS' Edgeville Yew Chopper! |
| Version: Beta v.2;; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
|Nick: xtnc; |
|Location: Bank; |
|Total Logs Banked: 27; |
|Total Loads Done: 1; |
|Experience Gained: 4725; |
|Levels Gained: -69; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
|Nick: ; |
|Location: Bank; |
|Total Logs Banked: 0; |
|Total Loads Done: 0; |
|Experience Gained: 0; |
|Levels Gained: 0; |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~|
| |
| Time Running: 12 min 10 sec; |
|_________________________________________________ _|
Oh and sometimes it logs out and doens't log in don't know why, help would be appreciated if someone could

I agree, it logs out on the breaks and doesn't log back in also Jakobr, Use the edit button instead of posting again! I told you in another thread to use the edit button :fiery:

Here is where I told you: http://villavu.com/forum/showthread.php?t=56488&page=4

Quote:

Originally Posted by ffcfoo

I agree, it logs out on the breaks and doesn't log back in

Does it do this every time or just sometimes?

I haven't really tested the single player breaking as I always use multiple players.

I'll try and get this fixed tomorrow as I have a couple other thing's that I changed too, so I should have a new version up tomorrow hopefully.

Quote:

Originally Posted by NCDS

Does it do this every time or just sometimes?

I haven't really tested the single player breaking as I always use multiple players.

I'll try and get this fixed tomorrow as I have a couple other thing's that I changed too, so I should have a new version up tomorrow hopefully.

Alright, It does it in singleplayer breaking I am not sure in Multiplayer I never tryed it.

Quote:

Originally Posted by ffcfoo

Alright, It does it in singleplayer breaking I am not sure in Multiplayer I never tryed it.

The script will only take breaks if one player remains active. I am running it right now to test it so hopefully any problems with it, I will have fixed today.

Updated!

Code:

Fixes/Additions: *Minor bug fixes and updates *Fixed SinglePlayerBreaks *Did some organizing with the code

Quote:

Originally Posted by NCDS

Updated!

Code:

Fixes/Additions: *Minor bug fixes and updates *Fixed SinglePlayerBreaks *Did some organizing with the code

Finally! Now I am going to test this out and post a proggy tomorrow because im going to run it while I sleep.

EDIT: You forgot something xD! Where is the members option huh?! Lol, Make sure you add it in next release, I am just going to add it for myself but you should really add members option for others :D

Quote:

Originally Posted by ffcfoo

Finally! Now I am going to test this out and post a proggy tomorrow because im going to run it while I sleep.

EDIT: You forgot something xD! Where is the members option huh?! Lol, Make sure you add it in next release, I am just going to add it for myself but you should really add members option for others :D

My bad, I really did mean to add that, just slipped my mind I guess :duh:

I look forward to a proggy though, it's been running for a little over 3 hours for me right now and it's been looking great to me so let me know how it goes for you!

Code:

__________________________________________________ | | | NCDS' Edgeville Yew Chopper! | | Version: Beta v2.5;; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: ifex; | |Location: Bank; | |Total Logs Banked: 162; | |Total Loads Done: 5; | |Experience Gained: 28350; | |Levels Gained: 0; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| |Nick: sare; | |Location: lost; | |Total Logs Banked: 406; | |Total Loads Done: 14; | |Experience Gained: 71050; | |Levels Gained: 79; | |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | | | Time Running: 4 hr 23 min 39 sec; | |__________________________________________________|

Not entirely sure what happened to the first player, but the second one ended up in a random. Other wise everything seems to be working quite well!

Quote:

Originally Posted by NCDS

My bad, I really did mean to add that, just slipped my mind I guess :duh:

I look forward to a proggy though, it's been running for a little over 3 hours for me right now and it's been looking great to me so let me know how it goes for you!

Im running it right now. Running it for a long time so you gotta wait a while. 9:12 PM right now so about 9:00 AM you will have it. Maybe earlier I have no clue.

Quote:

Originally Posted by ffcfoo

Im running it right now. Running it for a long time so you gotta wait a while. 9:12 PM right now so about 9:00 AM you will have it. Maybe earlier I have no clue.

I just noticed something, in DeclarePlayers, change the second "with Players[0] do" to "with Players[1] do" I forgot to before I uploaded it.

Quote:

Originally Posted by NCDS

I just noticed something, in DeclarePlayers, change the second "with Players[0] do" to "with Players[1] do" I forgot to before I uploaded it.

Huh.... I never saw that xD nice find. But I am using single player though hehe.