Results 1 to 21 of 21

Thread: Bank Finding Help!

  1. #1
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Bank Finding Help!

    Hello Guys,
    I'm currently working on my first script. It is a Varrock East Miner and I need it to bank properly. What the problem is that there is the New varrock museum. Any DTM I try to use it gets confused with the Varrock Museum. So I have come to a conclusion to see how I can make it find the bank by only looking if its there at the bottom half of the minimap. So is there any function for it to search for the Bank onlly in the bottom half of the minimap screen? Because I know that the varrock museum can be only found my looking at the top of the minimap screen.

    Here is the part of my script that I use for finding the bank. I need to change this so it looks for DTM rotated but only from the 90 degrees mark to the 270degrees mark ( bottom half of minimap) .
    SCAR Code:
    repeat
        Myrandom;
        RadialRoadWalk(FindVarrockRoadColor,270,390,65,-2,0);
        Wait (1000+ random(200));
        FFlag(0);
        until  DTMRotated(BankDTM,x,y,MMX1,MMY1,MMX2,MMY2);
        begin
          WriteLn('  Entering Bank  ');
          Mouse(x, y, 6, 6, True);
          Wait(900 +random(250));
          FFlag(0);
          exit;

    ALL HELP IS APPRECIATED AND WILL BE REPPED!!

  2. #2
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Two ways:

    - Make DDTM.

    - Instead of putting 'MMX1, MMY1, MMX2, MMY2' put the box coords for the half part.


  3. #3
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Well Cazax I wish to do your second way but how can I find what MMX1's coordinate because I dont know which is difference for MMX2...like im really confused...hmmm can you please post the 'MMX1, MMY1, MMX2, MMY2' replaced for the co-ordinates ill be shur to credit you properly! Please AND THANKS...if anyone else would do this 4 me please do so and you'll be credited nd REPPED!

  4. #4
    Join Date
    Aug 2007
    Location
    Georgia, U.S.
    Posts
    890
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    im pretty sure this is right.


  5. #5
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by faster789 View Post
    Well Cazax I wish to do your second way but how can I find what MMX1's coordinate because I dont know which is difference for MMX2...like im really confused...hmmm can you please post the 'MMX1, MMY1, MMX2, MMY2' replaced for the co-ordinates ill be shur to credit you properly! Please AND THANKS...if anyone else would do this 4 me please do so and you'll be credited nd REPPED!
    Easy to find the coords:

    Look at your MM:

    then select two points of the MM and pick the color there, and you will get the coords & color:



    Then you use:
    SCAR Code:
    repeat
     bla...
    until DTMRotated(Bank, x, y, Coords1, Coords2, Coords3, Coords4);

    Safer:
    SCAR Code:
    Function FindBankDTM : Boolean;
    var
      Coords : TBox;
      x,y : Integer;
    begin
      Coords := IntToBox(Coords1, Coords2, Coords3, Coords4); // Here put the coords!
      if DTMRotated(Bank, x, y, Coords.X1, Coords.Y1, Coords.X2, Coords.Y2) then
      begin
        Writeln('Found Bank');
        Mosue(x y, 4, 4, True);
        FFlag(0);
        result := True;
      end else
      Result := False;
    end;


    EDIT: Wrong skilld, X1 starts form the left upper corner.


  6. #6
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Thanks a bunch to both of u! RELY helped..reps up!

    EDIT!!: TO BOTH OF U...im confused again..lol does this mean that I only select 2 points? and those 2 points are wat : MMX1 or MMX2 or MMY1 or MMY2? and i suppose to select 4 points...then can you guys tell me like which point is MMX1 for example..is MMX1 the top right corner point? and can you also tell me where the other coords points should be located?


    EDIT22!! NVM I FOUND OUT!

  7. #7
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by faster789 View Post
    Thanks a bunch to both of u! RELY helped..reps up!
    Skilld was wrong, it starts from the left upper corner, and finish at right corner.


  8. #8
    Join Date
    Aug 2007
    Location
    Georgia, U.S.
    Posts
    890
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    sorry...I always use bottom left, top right.

  9. #9
    Join Date
    Jul 2007
    Location
    Ottawa, Canada
    Posts
    930
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    @ Cazax, yes caz is right

    MMX1//Y1-------------
    | |
    | |
    | |
    | |
    |__________________|MMX2//Y2

    and btw, try using the banker dots as a dtm. just take some yellow from each and it should find it i think *this is off the top of my head*

    if you want the bottom half you would do this

    number, number, MMX2, MMY2

    btw, im bored to tears atm, so if u wanna get into conversation with me just add me on msn: click my name.

  10. #10
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    @ Cazax and Metagen!
    is this wat u meant?
    SCAR Code:
    procedure Walktobank;
    var  x, y, BankDTM: integer;
    Coords : TBox;
    begin
       BankDTM := DTMFromString('78DA637CCDC4C060C4C80002CC0C10F0E70F1' +
           '30317906684F219DF13A1E633116A9E13560300C7210CAD');
      if Not(LoggedIn) then exit;
      SetAngle(True);
      MakeCompass('N');
      SetRun(False);
      RadialRoadWalk(FindVarrockRoadColor,0,90,65,-2,0);
      Wait (1000+ random(200));
      repeat
        Myrandom;
        RadialRoadWalk(FindVarrockRoadColor,270,390,65,-2,0);
        Wait (1000+ random(200));
        FFlag(0);
      Coords := IntToBox(911, 363, 809, 305);
      until DTMRotated(Bank, x, y, 911, 363, 809, 305);
          WriteLn('  Entering Bank  ');

    but there is a problem...it says this error:
    Line 377: [Error] (13105:49): Type mismatch in script C:\Documents and Settings\Owner\My Documents\Grade 7\SCAR 3.15\Scripts\oredoutSMARTeditedbank.scar

    btw if your wandering wat line is 377..its this one..
    SCAR Code:
    until DTMRotated(Bank, x, y, 911, 363, 809, 305);

  11. #11
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by faster789 View Post
    @ Cazax and Metagen!
    is this wat u meant?
    SCAR Code:
    procedure Walktobank;
    var  x, y, BankDTM: integer;
    Coords : TBox;
    begin
       BankDTM := DTMFromString('78DA637CCDC4C060C4C80002CC0C10F0E70F1' +
           '30317906684F219DF13A1E633116A9E13560300C7210CAD');
      if Not(LoggedIn) then exit;
      SetAngle(True);
      MakeCompass('N');
      SetRun(False);
      RadialRoadWalk(FindVarrockRoadColor,0,90,65,-2,0);
      Wait (1000+ random(200));
      repeat
        Myrandom;
        RadialRoadWalk(FindVarrockRoadColor,270,390,65,-2,0);
        Wait (1000+ random(200));
        FFlag(0);
      Coords := IntToBox(911, 363, 809, 305);
      until DTMRotated(Bank, x, y, 911, 363, 809, 305);
          WriteLn('  Entering Bank  ');

    but there is a problem...it says this error:
    Line 377: [Error] (13105:49): Type mismatch in script C:\Documents and Settings\Owner\My Documents\Grade 7\SCAR 3.15\Scripts\oredoutSMARTeditedbank.scar

    btw if your wandering wat line is 377..its this one..
    SCAR Code:
    until DTMRotated(Bank, x, y, 911, 363, 809, 305);
    hmm.. Try deleting the TBox thing?


  12. #12
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    nope sry but that didnt work...

  13. #13
    Join Date
    Jul 2007
    Location
    Ottawa, Canada
    Posts
    930
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    function DTMRotated(DTM: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean; ..... wait this is in ur grade 7 folder?
    ~ Metagen

  14. #14
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    Quote Originally Posted by metagen View Post
    function DTMRotated(DTM: Integer; var x, y: Integer; x1, y1, x2, y2: Integer): Boolean; ..... wait this is in ur grade 7 folder?
    LOL haha good catch but im in grade 8 now

  15. #15
    Join Date
    Jul 2007
    Location
    Ottawa, Canada
    Posts
    930
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    until DTMRotated(Bank, x, y, 911, 363, 809, 305);
    should be
    until DTMRotated(BankDTM, x, y, 911, 363, 809, 305);
    ~ Metagen

  16. #16
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    ok but now its jus keeps rrw walking... it doesnt find the bank anymore plz help any1?

  17. #17
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by faster789 View Post
    ok but now its jus keeps rrw walking... it doesnt find the bank anymore plz help any1?
    Make it again, add more tol or make a ddtm.


  18. #18
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    whats the diff between ddtm and dtm?? and wat shud i make the ddtm of? the bank or waT?

  19. #19
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    @ cazax!
    i've created a DDTM but it doesnt seem to find the DDTM is there anything wrong with this part?

    SCAR Code:
    repeat
        Myrandom;
        RadialRoadWalk(FindVarrockRoadColor,270,390,65,-2,0);
        Wait (1000+ random(200));
        FFlag(0);
        until DTMRotated(LoadBank, x, y, MMX1, MMY1, MMX2, MMY2);
          WriteLn('  Entering Bank  ');
          Mouse(x, y, 6, 6, True);

  20. #20
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by faster789 View Post
    @ cazax!
    i've created a DDTM but it doesnt seem to find the DDTM is there anything wrong with this part?

    SCAR Code:
    repeat
        Myrandom;
        RadialRoadWalk(FindVarrockRoadColor,270,390,65,-2,0);
        Wait (1000+ random(200));
        FFlag(0);
        until DTMRotated(LoadBank, x, y, MMX1, MMY1, MMX2, MMY2);
          WriteLn('  Entering Bank  ');
          Mouse(x, y, 6, 6, True);
    I have to see the DDTM first, i cant say anything about the DDTM atm.


  21. #21
    Join Date
    Mar 2007
    Posts
    1,223
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    @ Cazax...
    here it is..
    SCAR Code:
    function Loadbank: Integer;
    var
      bankMP: TDTMPointDef;
      bankSP: array of TDTMPointDef;
      bankDDTM: TDTM;
    begin
      SetArrayLength(bankSP, 6);

      bankMP.x := 22;
      bankMP.y := 18;
      bankMP.areasize := 1;
      bankMP.areashape := 0;
      bankMP.color := 9693678;
      bankMP.tolerance := 9;

      bankSP[0].x := 29;
      bankSP[0].y := 38;
      bankSP[0].areasize := 1;
      bankSP[0].areashape := 0;
      bankSP[0].color := 15920875;
      bankSP[0].tolerance := 1;

      bankSP[1].x := 5;
      bankSP[1].y := 27;
      bankSP[1].areasize := 1;
      bankSP[1].areashape := 0;
      bankSP[1].color := 15920875;
      bankSP[1].tolerance := 1;

      bankSP[2].x := 9;
      bankSP[2].y := 6;
      bankSP[2].areasize := 1;
      bankSP[2].areashape := 0;
      bankSP[2].color := 15920875;
      bankSP[2].tolerance := 1;

      bankSP[3].x := 31;
      bankSP[3].y := 3;
      bankSP[3].areasize := 1;
      bankSP[3].areashape := 0;
      bankSP[3].color := 15920875;
      bankSP[3].tolerance := 1;

      bankSP[4].x := 36;
      bankSP[4].y := 21;
      bankSP[4].areasize := 1;
      bankSP[4].areashape := 0;
      bankSP[4].color := 15920875;
      bankSP[4].tolerance := 1;
     
      bankSP[5].x := 21;
      bankSP[5].y := 39;
      bankSP[5].areasize := 1;
      bankSP[5].areashape := 0;
      bankSP[5].color := 15920875;
      bankSP[5].tolerance := 1;

      bankDDTM.MainPoint := bankMP;
      bankDDTM.SubPoints := bankSP;
      result := AddDTM(bankDDTM);
    end;

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Finding Bank
    By sirlaughsalot in forum OSR Help
    Replies: 47
    Last Post: 05-29-2008, 06:10 PM
  2. Finding the bank
    By sirlaughsalot in forum OSR Help
    Replies: 30
    Last Post: 05-09-2008, 07:48 AM
  3. help with bank finding
    By zenma in forum OSR Help
    Replies: 4
    Last Post: 09-08-2007, 12:08 PM
  4. need help with bank finding
    By del_signo in forum OSR Help
    Replies: 3
    Last Post: 04-12-2007, 03:29 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
  •