Results 1 to 7 of 7

Thread: First Auto Fisher

  1. #1
    Join Date
    Oct 2007
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default First Auto Fisher

    Alright so i have a work in progress. I used to script back in rs classic but that was much much easier and i quite wow and decided to get back to autoing in runescape for a sorta hobby. I began last week looking over all the pascal and what not and i began my first script. Now this isnt suppose to be anything fancy and its not going to be thats for sure but with help from the community and about 100 edits i hope to be left with something decent.

    So I have this currently. My first question is, simply, is there any other way simplier to have it right click and select harpoon ( for fishing sharks ), other than clickmouse(x, Y+40, true); ?
    Second question is, how come i have to put end; end; begin catchfish; end. for the last 5 lines? when even i try to put end; end; end. after wait(1000 +random(25)); it says unexpected end, when i erase the last end. it says expects beginning.
    Now I did have a second part to this that checked for a shark color in the last slot of your invetory as a way to determine when to stop fishing but that wasnt working so i erased it im going to script it back in really quick and see if anyone can help me with that. Thanks for all the help guys.

    SCAR Code:
    program catchfish;
    procedure catchfish;
      var x, y: integer;
      begin
        if findcolor(x, y, 14858129, 337, 163, 412, 474) then
        begin
          clickmouse(x, y, false);
          wait(1000 + random(250));
          clickmouse(x, y+40 ,true);
          wait(1000 + random(250));
        end;
        end;
      begin
      catchfish;
      end.

  2. #2
    Join Date
    Jul 2007
    Location
    Right now? Chair.
    Posts
    8,488
    Mentioned
    3 Post(s)
    Quoted
    12 Post(s)

    Default

    ok here's many things for you:
    learn the standards for scripting,
    download SRL? if you already have it i'd suggest you had a look around the srl files and basically read most of it, because you can find amazing functions there.

    clickmouse is detectable, so i suggest you use SRL's Mouse(x, y, randomx, randomy:integer; LeftClick: boolean)

    in SRL you also have InvFull
    so you could have
    repeat
    catchfish
    until(InvFull)

    i'd suggest you spend about a week looking at tutorials, that should get you enought questions to make 10 useful posts and enought knowledge to do a decent script

    welcome back, n Good Luck
    RMagician

    I & I know Zion. It is in the spirit, body and mind of every one of us
    RMouse(obj: TMSIObject): boolean;

  3. #3
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    After "program catchfish;" You should have this:
    SCAR Code:
    {.Include SRL/SRL.Scar}

    Your main loop should then look like this:

    SCAR Code:
    Begin
      SetupSRL;
      CatchFish;
    End.

    SetupSRL Loads all the needed items for example FindSymbol(X, Y, Symbol);
    FindSymbol wont work without SetupSRL;

    This includes the Scar Resource Library AKA SRL.

    Then your "Procedure CatchFish;"
    Should Be:


    SCAR Code:
    procedure catchfish;
    var x, y: integer;
    begin
      if findcolor(x, y, 14858129, 337, 163, 412, 474) then
        begin
          Mouse(X, Y, 3, 3, False);
          wait(1000 + random(250));
          ChooseOption('Cage');
          wait(1000 + random(250));
        end;
    end;

    Mouse(X, Y, RandX, RandY, Left);
    X And Y Is the cordinates to click
    RandX and Randy is random cordinates that it adds to the point it clicks.
    Left obvious Left button or right? Left False is a right click. Left True is a left Click.

    ChooseOption(txt);
    The chooseoption procedure is used after a "Mouse(X, Y, RandX, RandY, False); To make it click the Text you specify. ChooseOption('Walk here'); Would click Walk Here when u left click on screen.

    Hope it helped

    -JuKKa

    Code:
    • Narcle: I recall Jukka releasing a bunch of scripts like this before... Its how he rolls I think. rofl
    • Solarwind: Dude, you are like... t3h s3x.
    • Hy71194: JuKKa you're a machine! You released 3 scripts in 10 minutes! :O
    • benjaa: woah.... Jukka is the man Guildminer pwns all
    • NaumanAkhlaQ: And JuKKa Is my Her0!

  4. #4
    Join Date
    Oct 2007
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Sweet thanks guys, I understand how repeatative some of these things are and the fact that alot can be solved by diving in and studying everything you can first, but unfortunity I have enough work on my hands as well so please bear with me, and thanks alot for both good advice and bad.

  5. #5
    Join Date
    Oct 2007
    Location
    lisbon
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    very nice
    PAIN is temporary GLORY is forever!

  6. #6
    Join Date
    Oct 2007
    Posts
    17
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Don“t work for me!

  7. #7
    Join Date
    Oct 2007
    Posts
    11
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    wao.. that's really basics

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Really Need Help With Auto Fisher
    By LOL? in forum OSR Help
    Replies: 3
    Last Post: 10-03-2007, 06:09 PM
  2. HELP ME with my auto fisher
    By HarryJames in forum OSR Help
    Replies: 11
    Last Post: 04-29-2007, 03:34 PM
  3. auto fisher plz
    By haxal in forum RS3 Outdated / Broken Scripts
    Replies: 10
    Last Post: 04-12-2007, 12:20 AM
  4. help whit auto fisher
    By robeike in forum OSR Help
    Replies: 8
    Last Post: 03-15-2007, 06:20 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
  •