Results 1 to 15 of 15

Thread: a feather buyer that will buy at anything plus 960

  1. #1
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default a feather buyer that will buy at anything plus 960

    i tried makeing money but it just got messed uop can some1 healp me plz

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

    Default

    help u with what?
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  3. #3
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default well i donna is there already a feather buyer out there

    the way i was playing on doing it was have all bitmaps for 960 961 962 -1000 and when the program found one it would buy would that work?

  4. #4
    Join Date
    Feb 2007
    Location
    Florida
    Posts
    460
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    So,

    let me see if i get you here you want a script that will find 1000-960 feather's in the store and stop the log out switch world.

    i think there is a script that already does that in the free section.

    [off topic]watch out for that double post i'd edit to say sorry or something[/off topic]
    Varrock gTanner
    Previously known as England155.

  5. #5
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    well imma try to make my own if i need any help will u help me?
    and 1 more question how do u urm well when i declare a bitmap how can i get it to click liek randomly around it u no what i mean so its always not clicking same spot

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

    Default

    u dont need bitmaps to buy stuff at stores....if it has a set spot...like at rune stores and stuff..there are procedures for that
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  7. #7
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    theres functions that do the counting for you...

    SCAR Code:
    function AmountColor(area: String; color, tol: Integer): Integer;
    By: masquerader
    Description:
         Counts the number of items found with a color in a certain area. (Counts stacks)

    function AmountBmp(area: String; itembmp, tol: Integer): Integer;
    By: masquerader
    Description:
         Counts the number of items found with a bitmap in a certain area. (Counts stacks)

    function AmountDtm(area: String; dtm: Integer): Integer;
    By: masquerader
    Description:
         Counts the number of items found with a dtm in a certain area. (Counts stacks)

    usage:
    FeatherBitmap = A Feather Bitmap? (without the 960-100) Just take a 5x5 BMP of the center of the feather.

    if AmountBmp('shop', FeatherBitmap, 15) >= 960 then
    buyfeathers;

    Quote Originally Posted by dan cardin View Post
    u dont need bitmaps to buy stuff at stores....if it has a set spot...like at rune stores and stuff..there are procedures for that
    He still needs to get the amount of feathers the store has.

    Hope this helps!

  8. #8
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default sick man thanks for the help

    rep+

  9. #9
    Join Date
    Feb 2007
    Location
    Het ademt zwaar en moedeloos vannacht.
    Posts
    7,211
    Mentioned
    26 Post(s)
    Quoted
    72 Post(s)

    Default

    There's one in members section.
    I made a new script, check it out!.

  10. #10
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default well this is what i got but it wont complie and i think its rly messed up can some1

    plz help me



    {.include SRL/SRL.Scar}
    FeatherBmp : Integer;
    function AmountBmp(area: String; itembmp, tol: Integer): Integer;

    procedure LoadBmps;
    Begin
    FeatherBmp := BitmapFromString(6, 2, 'CEC7C6FF0000FF280' +
    '0FFB2B5BDAEAD000000000000002800BDAEADBDAEADB5AEAD B5AA' +
    'AD');

    end;

    procedure buyFeathers;
    if AmountBmp('shop', FeatherBmp, 15) >= 960 then
    Mouse(x, y, 1, 1, true);

    end;


    where did i mess up

  11. #11
    Join Date
    Feb 2007
    Location
    Alberta, Canada
    Posts
    4,615
    Mentioned
    50 Post(s)
    Quoted
    429 Post(s)

    Default

    alot of places... this
    SCAR Code:
    {.include SRL/SRL.Scar}
    FeatherBmp : Integer;
    function AmountBmp(area: String; itembmp, tol: Integer): Integer;

    procedure LoadBmps;
    Begin
    FeatherBmp := BitmapFromString(6, 2, 'CEC7C6FF0000FF280' +
    '0FFB2B5BDAEAD000000000000002800BDAEADBDAEADB5AEAD B5AA' +
    'AD');

    end;

    procedure buyFeathers;
    if AmountBmp('shop', FeatherBmp, 15) >= 960 then
    Mouse(x, y, 1, 1, true);

    end;

    SHOULD BE!

    this

    SCAR Code:
    program Buyer;
    {.include SRL/SRL.Scar}
    FeatherBmp : Integer;

    procedure LoadBmps;
    Begin
     FeatherBmp := BitmapFromString(6, 2, 'CEC7C6FF0000FF280' +
     '0FFB2B5BDAEAD000000000000002800BDAEADBDAEADB5AEAD B5AA' +
     'AD');
    end;

    procedure BuyFeathers;
    begin
    if AmountBmp('shop' , FeatherBmp, 15) >= 960 then
     begin
     Mouse(x, y, 1, 1, true);
     end;
    end;

    begin
    SetupSRL;
     repeat
      BuyFeathers
     until AmountBmp('shop' , FeatherBmp, 15) < 960
    end.

    I guess. i think its right but im not sure, plus you need to have if findcolortolerance then, in there before the mouse part, or else it wont know where to click

    Scripts: Edgeville Chop & Bank, GE Merchanting Aid
    Tutorials: How to Dominate the Grand Exchange

    Quote Originally Posted by YoHoJo View Post
    I like hentai.

  12. #12
    Join Date
    Oct 2006
    Location
    Ireland
    Posts
    855
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Forgot your begin in buyFeathers

  13. #13
    Join Date
    Feb 2007
    Location
    Alberta, Canada
    Posts
    4,615
    Mentioned
    50 Post(s)
    Quoted
    429 Post(s)

    Default

    crap! i hate you.. but now its fixed so im a winner

    Scripts: Edgeville Chop & Bank, GE Merchanting Aid
    Tutorials: How to Dominate the Grand Exchange

    Quote Originally Posted by YoHoJo View Post
    I like hentai.

  14. #14
    Join Date
    Sep 2006
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default error when trying to run ur script

    Line 4: [Error] (14405:1): 'BEGIN' expected in script
    this is what i got with ur help


    program Buyer;
    {.include SRL/SRL.Scar}
    FeatherBmp : Integer;

    procedure LoadBmps;
    Begin
    FeatherBmp := BitmapFromString(6, 2, 'CEC7C6FF0000FF280' +
    '0FFB2B5BDAEAD000000000000002800BDAEADBDAEADB5AEAD B5AA' +
    'AD');
    end;

    procedure BuyFeathers;
    begin
    if AmountBmp('shop' , FeatherBmp, 15) >= 960 then
    begin
    if (findcolortolerance(x, y, : Integer; 12369093) then
    wait(50+random(150));
    Mouse(x, y, 1, 1, False);
    ChooseOption(x, y, 'Buy 10');
    end;
    end;

    begin
    SetupSRL;
    repeat
    BuyFeathers
    until AmountBmp('shop' , FeatherBmp, 15) < 960
    end.

  15. #15
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    program Buyer;
    {.include SRL/SRL.Scar}
    {.include srl\srl\misc\amount.scar}
    var //forgot this, need to declare a variable, in this case "featherBMP"
    FeatherBmp : Integer;

    procedure LoadBmps;
    Begin
      FeatherBmp := BitmapFromString(6, 2, 'CEC7C6FF0000FF280' +
      '0FFB2B5BDAEAD000000000000002800BDAEADBDAEADB5AEAD B5AA' +
      'AD');
    end;

    procedure BuyFeathers;
    begin
      if AmountBmp('shop' , FeatherBmp, 15) >= 960 then
      begin                                    //screen           \\  tolerance
        if findcolortolerance(x, y, 12369093, MSX1, MSY1, MSX2, MSY2, 10) then //why not use findbmp, u already have it loaded?  , and u didnt even fill out the function right
        begin                              //add begin
          wait(50+random(150));            // without begin it would only do this
          Mouse(x, y, 1, 1, False);        // and do these regardless of the
          ChooseOption(x, y, 'Buy 10');    // if statement
        end;                               //add end
      end;
    end;

    begin
      SetupSRL;
      repeat
        BuyFeathers
      until AmountBmp('shop' , FeatherBmp, 15) < 960
      //This will exit loop if theres less then 960 feathers
      //and end the script... needs changing...
    end.

    you need to learn a few basic things first:
    1. Standards, if you dont no how,
    2 spaces after begin, if, repeat, var
    2 spaces back after end;, end of an if, until(false)

    2. Learn to fill out procedures all the way,
    u filled out FindColorTolerance and there was like 5 more params missing

    3. Read a bit more tutorials.. and read my comments
    4. Learn to use tags


    and idk if the AmountBMP are workin, mostlikely they are..

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Feather Buyer
    By rscheater13 in forum RS3 Outdated / Broken Scripts
    Replies: 14
    Last Post: 05-22-2007, 01:22 AM
  2. Help with feather buyer
    By krunkjuice in forum OSR Help
    Replies: 5
    Last Post: 12-06-2006, 12:32 AM
  3. My Feather Buyer
    By I Pick Axes in forum RS3 Outdated / Broken Scripts
    Replies: 0
    Last Post: 10-02-2006, 03:41 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
  •