Results 1 to 9 of 9

Thread: help whit auto fisher

  1. #1
    Join Date
    Nov 2006
    Location
    belgium
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default help whit auto fisher

    ok first off al i'm not going to post my script i'm gonna use it to aply for srl member status.But yesterday I've added something to my procedure ChopDown;this chops down a tree.
    SCAR Code:
    if (Fishspot = 1)then
       begin
        Mouse(624, 98, 5, 5,true);
        Flag;
        FFlag(0);
         repeat
          FindFastRandoms;
          wait(450+random(90));
         until(FindColorCircleTolerance(x,y,462606,80,246,170,7)=true);//this searches the tree
        Mouse(x,y,2,2,false);
        wait(250+random(50));
        PopUp('Chop');//this should click on chop down :(
         repeat
          FindFastRandoms;
          wait(250+random(150));
         until WeHaveLogs(X,Y);//this checks for logs
        if ExistsItem (5) then
         begin
          Getmousepos(x,y);
          MMouse(585,265,5,5);
          wait(500+random(250));
           If IsUpText ('Logs') then//this is going to be changed,it will rune back to the place where he came from :p
            begin
             writeln('we have some logs haha :p');
            end else
             begin
              writeln('wtf no logs,..ohh well whatever');
             end
           end
         end

    well actually yesterday evrything was just working fine but today only the tree finding works and when he finds the tree he moves his mouse clicks right,then he should click on chop down (doesn't do that) he just moves his mouse to the inventory.But yesterday i had something else,he cutted down the tree he knew that there were logs and he succesfully ran back to where he came from but then the procedure is over...I've added in the main loop after this procedure that he needs to start fishing he just restarts the procedure!and i also got this don't know what wrong...
    SRL Compiled in 407msec.
    --> Invalid Password for UserID: 227

    --> Invalid Password for UserID: 227
    it says invalid password of my srl stats account that can't be it worked before and i didn't change it... plz help me out.i'm getting depressed

  2. #2
    Join Date
    Feb 2007
    Posts
    3,616
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    instead of popup try ChooseOption('hop'); or something like that, that may solve your problem IDK.

  3. #3
    Join Date
    Nov 2006
    Location
    belgium
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    k...ChooseOption('hop');also tried chop didn't do it but I tried it whit ClickOption('Chop',1); and that did it

    edit:how can i get out of a procedure i tried whit Exit; but sometimes doesn't do it...And for the Log finding i need to make my own procedure :s

  4. #4
    Join Date
    Feb 2007
    Posts
    3,616
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    just use DTM's for logs, that would be the best thing.

  5. #5
    Join Date
    Nov 2006
    Location
    belgium
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I'm trying DTMS now but, i created my DTM and i tested it and it says that he found it.but when i use this little script to test it in game then nothing happens....
    SCAR Code:
    program DTMtester;
    var DTM, x, y:integer;
    begin
    DTM := DTMFromString('78DA635CC0C8C03089010564041830C80169A' +
           '00CC37F20609C04644D4555B37D7A385C0D0830AE05B226A3AAC9' +
           '0F354655B308C89A85AAA631C50655CD1C20AB93010D30A2AA590' +
           'A64B51150330BC89A81AAA2325C0E450D00B73712D0');

    If FindDTM(DTM,x,y,350,390,540,137)then
     begin
      MoveMouse(x,y);
     end
    end.
    so i think he doesn't find it

  6. #6
    Join Date
    Dec 2006
    Location
    Ky
    Posts
    390
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    First make sure you have read YohoJo's DTM Tut.. Then what you may have to do is add some tolerance to the parent point on your log.. Next I recommend using SRL's FindInvDTM, it works pretty well and has set parameters so you don't have to worry about them.
    SUMMER BREAK be back when I want to

  7. #7
    Join Date
    Nov 2006
    Location
    belgium
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ok i'm reading tutorials for DTM's but the function WeHaveLogs;in SRL doesn't work like it should be.sometimes he finds it sometimes not...so i made my own function but i need some help whit it...
    SCAR Code:
    function IsLogs(lx,ly:integer):boolean;
    var lx,ly,BMPLogs:integer;//Duplicate identifier 'lx' in script,why does he always keep telling me this lx and ly are variables so i should declare like that.
    begin

    BMPLogs := BitmapFromString(5, 13, 'z78DA8D903B1203310843AF' +
           '640C025CFA7BFF23656771614F52A451C113A0910E19D42D23517' +
           '751E5E1A4C2DD9612D7C6452075FA02FDA054087CD1C373520398' +
           'A69B3AAFF0FC4FB7A7C01E4FD52674ED1EF37D21A165B2814233F' +
           '4A4CFAFCA76CED591388506C5944CAAD14CF80F0DBAEFBFC9A30D' +
           '145EA457F2EE0329126EFAF6F99DFF03C391560A');

    wait (560+random(600));
    GetMousePos(x,y);
    wait (800+random(50));
     if FindBitmapToleranceIn(BMPLogs,x,y,565,270,740,530,45) then//will change to DTM
      begin
       result:=true;
       lx:=x;
       ly:=y;
       writeln('BMP was found at'+inttostr(lx,ly)+'in inventory');
      end else
      begin
       result:=false;
       WritelN('BMP was not found');
      end
    end;

  8. #8
    Join Date
    Dec 2006
    Location
    Ky
    Posts
    390
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Sorry I'm a little late getting to this but I've been busy..

    The duplicate identifier is probably because SRL allready uses it..
    I'm confused as to why you have GetMousePositon.. Take it out
    Do this
    SCAR Code:
    Writeln('BMP was found at'+inttostr(lx)+inttostr(ly)+'in inventory');
    Your other way will not work

    USE DTMS! they will be much more reliable and accurate than bitmaps in this case.
    Other than that it should work.. Post more if you need help
    SUMMER BREAK be back when I want to

  9. #9
    Join Date
    Nov 2006
    Location
    belgium
    Posts
    73
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    k thanks for the replies but could someone add me on msn or send me pm plz,
    i need a trusted person someone like fakawi.there is something wierd in my script that i can't fix...look when i cal this function
    SCAR Code:
    function IsLogs(lx,ly:integer):boolean;
    var DTMlogs:integer;
    begin

    DTMlogs := DTMFromString('78DA633CCAC8C070920105B4A4DA32E80269A' +
           '00CC37F20603C0C641D6640038C703560DE1620EB1C01351731D5' +
           'E4851AA3AA3905645DC6ED1EB09AED986A727DA551D59C01B24EE' +
           '0B70B002425154C');

    wait (560+random(600));
    GetMousePos(x,y);
    wait (800+random(50));
     if FindInvDtm(x,y,DTMlogs) then
      begin
       result:=true;
       lx:=x;//see this...when i ask to move the mouse to it he moves to the
       ly:=y;//upperleft corner.I don not know why but plz help me out
       writeln('DTM was found at '+inttostr(lx)+','+inttostr(ly)+ ' in inventory');
      end else
      begin
       result:=false;
       WritelN('logs where not found');
      end
    end;

    then i got this in my debug box:
    SCAR Code:
    DTM was found at 586,262 in inventory
    so he found the logs and now he also knows the cords of it...
    but when i use the following
    SCAR Code:
    Mouse(lx,ly,5,5,true);
    then he moves his mouse to the upperleft corner of my rs screen and he also writes this in the debug box
    SCAR Code:
    DTM was found at 586,262 in inventory
    and in the function IsLogs; i stored those cords to lx and ly so now lx and ly are having those cords where he found it.

    editk i got some help from sumillion,i forgot the var :s

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. First Auto Fisher
    By fusion in forum First Scripts
    Replies: 6
    Last Post: 10-25-2007, 07:26 AM
  2. Really Need Help With Auto Fisher
    By LOL? in forum OSR Help
    Replies: 3
    Last Post: 10-03-2007, 06:09 PM
  3. auto shrimp fisher
    By kelly slater pro surfer in forum RS3 Outdated / Broken Scripts
    Replies: 4
    Last Post: 09-04-2007, 11:54 PM
  4. HELP ME with my auto fisher
    By HarryJames in forum OSR Help
    Replies: 11
    Last Post: 04-29-2007, 03:34 PM
  5. auto fisher plz
    By haxal in forum RS3 Outdated / Broken Scripts
    Replies: 10
    Last Post: 04-12-2007, 12:20 AM

Posting Permissions

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