Results 1 to 10 of 10

Thread: Problem Walking

  1. #1
    Join Date
    Aug 2007
    Location
    In Your Front Door!
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Problem Walking

    This is the my script/procedure, It won't Walk It skips it, Please Tell me whats wrong. The Script Compiles, I dont know whats wrong!!

    SCAR Code:
    Procedure WalktoWillow;

    Var
    Color, Rockpic:integer;

    begin
       
       Rockpic := BitmapFromString(14, 12, 'beNpjYKAb0NfQJkaNp5MTE' +
           'OFXLCkkDFeJRzFQHILgKnEpxlQGQZSbiaYYl1MhPkJGBAOKmPDECQ' +
           'CdqB/R');

     Color := AutoColorThis(Rockpic,75,MMX1,MMY1,MMX2,MMY2);
     RadialWalk(Color, 187, 547, 40, 2, 2);
     Flag;
     WriteLn('Walked To Willow')
    end;

    I Know it Does the Procedure because it Writes in 'walked to willow'.

    I also tried Not autocoloring, just filling in but i got the same result.
    For Example; RadialWalk(0,187,547,40,2,2)
    of course 0 wasn't the color i typed. You get the point.

    I also Tried Using RadialWalkEx But i get the same result.

    Please Tell Me Whats Wrong!!!

  2. #2
    Join Date
    Jul 2007
    Location
    America
    Posts
    421
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Your radialwalk wasn't finding the color, so it had nothing to click.
    I dunno, those asians are pretty difficult to out-auto, legend has it they don't need sleep or food...~tim0suprem0
    Activity is on the decline - school's got me
    Check out my tutorial[s] on Color Finding!||Procedures and Functions!

  3. #3
    Join Date
    Aug 2007
    Location
    In Your Front Door!
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    How Do I fix it, I have Tried Many Thing Including Changing the colors?

  4. #4
    Join Date
    Jul 2007
    Location
    America
    Posts
    421
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    radialwalkex would be the only thing I could think of... sorry, I'm not the best person with walking.

    EDIT: Oh, or is there a function like GetVarrockRoadColor 'cept with grass colors?
    I dunno, those asians are pretty difficult to out-auto, legend has it they don't need sleep or food...~tim0suprem0
    Activity is on the decline - school's got me
    Check out my tutorial[s] on Color Finding!||Procedures and Functions!

  5. #5
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by gamer 5 View Post
    This is the my script/procedure, It won't Walk It skips it, Please Tell me whats wrong. The Script Compiles, I dont know whats wrong!!

    SCAR Code:
    Procedure WalktoWillow;

    Var
    Color, Rockpic:integer;

    begin
       
       Rockpic := BitmapFromString(14, 12, 'beNpjYKAb0NfQJkaNp5MTE' +
           'OFXLCkkDFeJRzFQHILgKnEpxlQGQZSbiaYYl1MhPkJGBAOKmPDECQ' +
           'CdqB/R');

     Color := AutoColorThis(Rockpic,75,MMX1,MMY1,MMX2,MMY2);
     RadialWalk(Color, 187, 547, 40, 2, 2);
     Flag;
     WriteLn('Walked To Willow')
    end;

    I Know it Does the Procedure because it Writes in 'walked to willow'.

    I also tried Not autocoloring, just filling in but i got the same result.
    For Example; RadialWalk(0,187,547,40,2,2)
    of course 0 wasn't the color i typed. You get the point.

    I also Tried Using RadialWalkEx But i get the same result.

    Please Tell Me Whats Wrong!!!
    Try to re make bmp and give more accurate "scrren areas" than mmx1,mmy1,ect. ( if your in drayor bank use radial walk with the water color...)

  6. #6
    Join Date
    Jul 2007
    Location
    America
    Posts
    421
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    BTW, your radialwalk range is huge... 187 - 547 is pretty much the entire map. Try using a small range.
    I dunno, those asians are pretty difficult to out-auto, legend has it they don't need sleep or food...~tim0suprem0
    Activity is on the decline - school's got me
    Check out my tutorial[s] on Color Finding!||Procedures and Functions!

  7. #7
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    yes, what kik said.. lol

  8. #8
    Join Date
    Aug 2007
    Location
    In Your Front Door!
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    okay ill try your suggestions!

    How Would you guys write it?

  9. #9
    Join Date
    Jul 2007
    Posts
    242
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    radial tolerance walk..

    SCAR Code:
    function RadialToleranceWalk(TheColor: Integer; StartRadial, EndRadial: Integer;
      Radius: Integer; Xmod, Ymod, Tol: Integer): Boolean; // By Wizzup? and WT-Fakawi.
    var
      i, X1, Y1, x, y: Integer;
    begin
      if (RoadColorChecker) then
        if (DebugRadialRoad) then
          WriteLn(' THROUGH RADIALROADWALK=  ---> ' + IntToStr(RoadColor));
      if (StartRadial = EndRadial) then
      begin
        WriteLn('Using LinearRoadWalk, equal values.')
          if LinearRoadWalk(TheColor, StartRadial, Radius, Xmod, Ymod) then
          Result := True;
      end
      else if (StartRadial < EndRadial) then
      begin
        repeat
          for i := StartRadial to EndRadial do
          begin
            x1 := Round(Radius * Sine(i)) + 646;
            y1 := Round(-Radius * Cose(i)) + 84;
            if Not LoggedIn then Exit;
            if (FindColorTolerance(x, y, TheColor, X1, Y1, X1 + 1, Y1 + 1, Tol)) then
            begin
              MouseFindNoFlag(X,Y,Xmod,Ymod);
              Result := True;
              CountFlag(10);
              Exit;
            end;
          end;
          Radius := Radius - 4;
        until (Radius <= 1);
      end else
        if (StartRadial > EndRadial) then
        begin
          repeat
            for i := StartRadial downto EndRadial do
            begin
              x1 := Round(Radius * Sine(i)) + 646;
              y1 := Round(-Radius * Cose(i)) + 84;
              if Not LoggedIn then Exit;
              if (FindColorTolerance(x, y, TheColor, X1, Y1, X1 + 1, Y1 + 1, Tol)) then
              begin
                MouseFindNoFlag(X,Y,Xmod,Ymod);
                Result := True;
                CountFlag(10);
                Exit;
              end;
            end;
            Radius := Radius - 4;
          until (Radius <= 1);
        end
    end;





  10. #10
    Join Date
    Aug 2007
    Location
    In Your Front Door!
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thanks for the help guys, its because i was using radialwalk aid incorrectly.
    I got it now the Script is working!!

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Walking Problem
    By D1zl3 in forum OSR Help
    Replies: 5
    Last Post: 11-23-2008, 02:02 AM
  2. Walking/AutoColoring problem ughh
    By Dudenow12 in forum OSR Help
    Replies: 4
    Last Post: 11-22-2007, 04:42 PM
  3. Walking + Other problem
    By Tails111 in forum OSR Help
    Replies: 8
    Last Post: 08-23-2007, 07:39 PM
  4. Radial walking problem
    By Fearlesssss in forum OSR Help
    Replies: 4
    Last Post: 06-10-2007, 06:45 PM
  5. Walking??????
    By wtf i sp4nk in forum OSR Help
    Replies: 6
    Last Post: 12-18-2006, 10:31 PM

Posting Permissions

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