Results 1 to 5 of 5

Thread: Best way to do this?

  1. #1
    Join Date
    Aug 2006
    Posts
    408
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Best way to do this?

    Well I'm making a script and I've pretty much got the radialwalking down to get to this location, and now I need to know the best way to get the script to climb over that still. Would I have it find the bitmap and if it finds the uptext to click?

    Here's a pic:

  2. #2
    Join Date
    Apr 2007
    Location
    Finland
    Posts
    938
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    That's pretty hard I'd say if you have to walk it rarely can't you go around it or something? If not then I suggest a DTM or try to find a almost unique color on the stile :/
    I hope you can figure something out.

  3. #3
    Join Date
    Apr 2007
    Posts
    3,152
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    make a DTM of the bigger red line...then im sure itll be easier to get past+ they qont need to have an agility req.
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  4. #4
    Join Date
    Aug 2006
    Posts
    408
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    This doesn't require agility, and I thought it might be easier because you don't have to worry about it being open or closed.

  5. #5
    Join Date
    Jan 2007
    Location
    Kansas
    Posts
    3,760
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    FindColorSkipBoxArrayTolerance. Change the color to the color of the stile. BTW this works for pretty much everything
    SCAR Code:
    program New;
    {.include SRL/SRL.scar}

    var
      StileBox : Array of TBox;
    function FindStile : Boolean;
    var Tries,i : Integer;
    begin
      repeat
       if (FindColorSkipBoxArrayTolerance(x,y,4934482,MSX1,MSY1,MSX2,MSY2,5,ManholeBox)) then
        begin
          MMouse(x,y,4,4);
          if (IsUpText('tile')) then
           begin
             Mouse(x,y,4,4,True);
             FFlag(0);
             Result:=True;
             Exit;
           end else
           begin
             Tries:=Tries+1
             i:=GetArrayLength(StileBox)+1;
             SetArrayLength(StileBox,i);
             i:=GetArrayLength(StileBox)-1;
             StileBox[i]:=cBox2(x-20,y-20,x+20,Y+20);
           end;
        end;
       until(Tries>=10);
       Result:=False;
    end;


    begin
      SetupSRL;
      ActivateClient;
      Wait(1000);
      if (FindStile) then
       WriteLn('We have clicked the Stile and are now climbing over :)');
    end.


Thread Information

Users Browsing this Thread

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

Posting Permissions

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