Results 1 to 6 of 6

Thread: Doesn't AutoColor

  1. #1
    Join Date
    Oct 2007
    Location
    brooklyn, new york
    Posts
    258
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Doesn't AutoColor

    Here is part that does not work. it just doesn't autocolor. What am i doing wrong.

    SCAR Code:
    procedure Chop;
    //-------------------------------Chops willows-------------------------------
    var times,Ax, Ay,rx, ry,WillowTree: Integer;
    begin
    Marktime(Times);
      Status('AutoColoring...');
      AntiRandom;
    WillowTree := BitmapFromString(5, 1, 'beNrzVtfRVXfylXEPUAMy' +
           'XAEZHQMg');
          AutoColorThis(WillowTree, 10, X1, Y1, X2, Y2)
            repeat
              Status('Chopping...');
              FindObjCustom(rx, ry, ['Wil','low'], [Ax, Ay], 5);
              Wait(100+random(100));
              Mouse(rx, ry, 2, 2, true);
              AntiBan;
            until(InvFull) or (TimeFromMark(times) > 45000);
    end;

  2. #2
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    First ax,ay must have a color assigned to them for it to work
    Thats the main problem another thing I have noticed that AutoColorThis isn't used in that part of the script.
    So to fix it:

    SCAR Code:
    procedure Chop;
    //-------------------------------Chops willows-------------------------------
    var times,Ax, Ay,rx, ry,WillowTree: Integer;
    begin
    Marktime(Times);
      Status('AutoColoring...');
      AntiRandom;
    WillowTree := BitmapFromString(5, 1, 'beNrzVtfRVXfylXEPUAMy' +
           'XAEZHQMg');
          AutoColorThis(WillowTree, 10, X1, Y1, X2, Y2)
            repeat
              Status('Chopping...');
              ax:={color here};
              ay:={second color here};
              FindObjCustom(rx, ry, ['Wil','low'], [Ax, Ay], 5);
              Wait(100+random(100));
              Mouse(rx, ry, 2, 2, true);
              AntiBan;
            until(InvFull) or (TimeFromMark(times) > 45000);
    end;

    Hope I Helped

  3. #3
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NaumanAkhlaQ View Post
    First ax,ay must have a color assigned to them for it to work
    Thats the main problem another thing I have noticed that AutoColorThis isn't used in that part of the script.
    So to fix it:

    SCAR Code:
    procedure Chop;
    //-------------------------------Chops willows-------------------------------
    var times,Ax, Ay,rx, ry,WillowTree: Integer;
    begin
    Marktime(Times);
      Status('AutoColoring...');
      AntiRandom;
    WillowTree := BitmapFromString(5, 1, 'beNrzVtfRVXfylXEPUAMy' +
           'XAEZHQMg');
          AutoColorThis(WillowTree, 10, X1, Y1, X2, Y2)
            repeat
              Status('Chopping...');
              ax:={color here};
              ay:={second color here};
              FindObjCustom(rx, ry, ['Wil','low'], [Ax, Ay], 5);
              Wait(100+random(100));
              Mouse(rx, ry, 2, 2, true);
              AntiBan;
            until(InvFull) or (TimeFromMark(times) > 45000);
    end;

    Hope I Helped
    DId you read the title? it odesn't work because he doesn't uses the return function because it returns a color as Function have to do WillowColorOutOfACT:=AutoColorThis(WillowTree, 10, X1, Y1, X2, Y2)

    okay let me fix this all up for you a bit k?

    SCAR Code:
    procedure Chop;
    var Times, Ax, Ay, Rx, Ry, WillowTree, TheColor: Integer;
    begin
      Marktime(Times);
      Status('AutoColoring...');
      AntiRandom;
      WillowTree := BitmapFromString(5, 1, 'beNrzVtfRVXfylXEPUAMyXAEZHQMg');
      TheColor:=AutoColorThis(WillowTree, 50, MSX1, MSY1, MSX2, MSY2)// MS means the mainscreen box
      If TheColor < 1 Then TheColor:={PUT IN HERE A WILLOW COLOR!} // this is a failsafe because
      //if it couldn't find the color then the color will be smaller(<) then 1 so then thecolor will be a normal willo0w color
            repeat
              Status('Chopping...');
              FindObjCustom(rx, ry, ['Wil','low'], [TheColor], 10);
              Mouse(rx, ry, 2, 2, true);
              AntiBan;
            until(InvFull) or (TimeFromMark(times) > 45000);
    end;
    Done Should work read the comments
    ~Hermen

  4. #4
    Join Date
    Mar 2007
    Posts
    4,810
    Mentioned
    3 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by Hermpie View Post
    DId you read the title? it odesn't work because he doesn't uses the return function because it returns a color as Function have to do WillowColorOutOfACT:=AutoColorThis(WillowTree, 10, X1, Y1, X2, Y2)

    okay let me fix this all up for you a bit k?

    In English?

  5. #5
    Join Date
    Dec 2006
    Location
    Copy pastin to my C#
    Posts
    3,788
    Mentioned
    8 Post(s)
    Quoted
    29 Post(s)

    Default

    AutoColorThis wasn't designed to autocolor things on mainscreen, just find a good color in the tree and use tolerance.

  6. #6
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by n3ss3s View Post
    AutoColorThis wasn't designed to autocolor things on mainscreen, just find a good color in the tree and use tolerance.
    Yeah, right i just thought let him explain how it works...
    ~Hermen

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Help AUTOCOLOR???
    By papenco in forum OSR Help
    Replies: 0
    Last Post: 12-06-2007, 06:27 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •