Results 1 to 23 of 23

Thread: Drop timing ?????????

  1. #1
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Drop timing ?????????

    ok i currently have a very simple power woodcutter that cuts and then drops

    the only problem is that it drops a log every time one is cut....how would i go about making it so it waits till the inventory is full? here is my script im using the drop all procedure. i am using SCAR divi 3.11

    oh and one more thing...whats the point in disguising SCAR?

  2. #2
    Join Date
    Sep 2006
    Location
    New Jersey, USA
    Posts
    5,347
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    SCAR Code:
    { THIS IS A VERY SIMPLE WOOD CUTTING PROGRAM. IT DOESNT EVEN DROP THE LOGS
    BUT IM AM NEW TO SCAR SO I AM LEARNING.
    I WOULD LIKE TO THANK SOMEONE. BECUASE ME READING THEIR SCRIPT MADE ME
    UNDERSTAND HOW TO FIND COLORS ANS STUFF. BUT THE SCRIPT DIDNT HAVE A NAME ON
    IT.
    OK TO OPERATE THIS YOU NEED TO CHANGE THE TREE COLOR AND THEN
    THE LAST TWO CORDINATES OF THE FINDCOLORSPIRAL
    THEN ALL YOU NEED TO DO IS DRAG CROSSHAIR TO RS AND PRESS PLAY.}

    {IF YOU HAVE SUGGESTION OR WANT TO HELP ME WITH SCRIPTING. EMAIL ME AT
    [email]ajredalert@sbcglobal.net[/email]}


    // version 1.0 = very simple woodcutter\\
    // version 1.2 = added log droping\\


    program simplewc;
    {.include SRL/SRL.scar}
    {.include SRL\SRL\skill\WoodCutting.scar}

    // THE SETUP\\
    const tree=11047; // SET THE TREE COLOR\\
    // END SETUP\\

    procedure treekiller;
    begin
      findcolortolerance(x,y,tree,3,3,551, 224,5) //PUT IN LAST 2 CORDINATES FROM THE COLOR PICKER\\
      // DO NOT TOUCH BELOW\\
      mouse(x,y,0,0,true)
      wait(5000+random(5000))
    end;

    procedure drop;
    begin
      if(InvFull)then
        DropAll;
    end;

    begin
      writeln('CREDIT GOES TO ME HAVOC928 ...FEEL FREE TO DISTRIBUTE')
      repeat
        treekiller;
        wait(2000+random(500))
        drop;
      until (false)
    end.

    Learn standards, they're very helpful when you have to debug long scripts.
    Interested in C# and Electrical Engineering? This might interest you.

  3. #3
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hmmmm i tried the invfull but when it got full it kept on trying to cut and it wouldnt drop.

  4. #4
    Join Date
    Dec 2006
    Location
    Copy pastin to my C#
    Posts
    3,788
    Mentioned
    8 Post(s)
    Quoted
    29 Post(s)

    Default

    Try "ExistsItem(28)" and "InvCount = 28"

  5. #5
    Join Date
    Jul 2007
    Posts
    184
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default try

    Sorry will this help?

    Program hardman;
    {.Include SRL/SRL.Scar}
    Begin
    Repeat
    Wait(1000);
    If(InvFull)Then
    DropTo(2,28);
    Until(False);
    End.

    you got msn becuase i would like to ask u some questions about your script
    (im making a willow power cutter my self so)

  6. #6
    Join Date
    Apr 2007
    Location
    The Netherlands
    Posts
    5,553
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    why you dont let the script search the whole screen because now you need(you say you need) to put coords in it
    ~Hermen

  7. #7
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    im sry but im lost...im a total noob

  8. #8
    Join Date
    Jul 2007
    Posts
    184
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  9. #9
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    the whole droping when inv is full

  10. #10
    Join Date
    Jul 2007
    Posts
    184
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default help

    have u got msn? so i can help

  11. #11
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  12. #12
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default

    disguising scar is because jagex can see things running on your computer so if its not named scar then it wont be detected that way.

  13. #13
    Join Date
    Jul 2007
    Posts
    137
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here, i hope this works...

    SCAR Code:
    { THIS IS A VERY SIMPLE WOOD CUTTING PROGRAM. IT DOESNT EVEN DROP THE LOGS
    BUT IM AM NEW TO SCAR SO I AM LEARNING.
    I WOULD LIKE TO THANK SOMEONE. BECUASE ME READING THEIR SCRIPT MADE ME
    UNDERSTAND HOW TO FIND COLORS ANS STUFF. BUT THE SCRIPT DIDNT HAVE A NAME ON
    IT.
    OK TO OPERATE THIS YOU NEED TO CHANGE THE TREE COLOR AND THEN
    THE LAST TWO CORDINATES OF THE FINDCOLORSPIRAL
    THEN ALL YOU NEED TO DO IS DRAG CROSSHAIR TO RS AND PRESS PLAY.}

    {IF YOU HAVE SUGGESTION OR WANT TO HELP ME WITH SCRIPTING. EMAIL ME AT
    [email]ajredalert@sbcglobal.net[/email]}


    // version 1.0 = very simple woodcutter\\
    // version 1.2 = added log droping\\


    program simplewc;
    {.include SRL/SRL.scar}
    {.include SRL\SRL\skill\WoodCutting.scar}

    var
      logDTM{, x, y} : integer;
      invX1, invY1, invX2, invY2 : Integer;

    // THE SETUP\\
    const tree=11047; // SET THE TREE COLOR\\
    // END SETUP\\

    procedure setup;
    begin
      invX1:= 547;
      invY1:= 202;
      invX2:= 736;
      invY2:= 463;
      setupsrl;
      activateclient;
      writeln('CREDIT GOES TO ME HAVOC928 ...FEEL FREE TO DISTRIBUTE');
      wait(1000);
    end;

    procedure dtms;
    begin
      logDTM := DTMFromString('78DA63CC636660E861644006716E1C0CFF813' +
           '448F43F1030C601D54C425503918591401A64CE2C026A6A806A26' +
           '1350530054D34A404D2A504D3B7E350002D50BB3');
    end;

    procedure treekiller;   // you might want to add ent protection, antiban, and antirandoms
    begin
      repeat
        findcolortolerance(x, y, tree, 3, 3, 551, 224, 5) //PUT IN LAST 2 CORDINATES FROM THE COLOR PICKER\\
        // DO NOT TOUCH BELOW\\
        mouse(x,y,0,0,true)
        wait(5000+random(5000))
      until(invfull);
    end;

    procedure droplogs;  // some people have their axes in inventory... so i changed it to drop logs
    begin
      repeat
        if finddtm(logDTM, x, y, invX1, INVY1, INVX2, INVY2) then
        begin
          mouse(x, y, 2, 2, false);
          wait(200+random(100));
          chooseoption('Drop');
          wait(1000+random(200));
        end;
      until(invcount = 0) or (invcount = 1);
    end;

    begin
      dtms;
      setup;
      repeat
        treekiller;
        wait(2000+random(500))
        droplogs;
      until (false)
    end.
    Do not propose an idea of peculation without evidence of such action.

    http://cashcrate.com/704591 click here and make money!

  14. #14
    Join Date
    Sep 2006
    Location
    New Jersey, USA
    Posts
    5,347
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by jhildy View Post
    disguising scar is because jagex can see things running on your computer so if its not named scar then it wont be detected that way.
    What? Jagex can't see what's running on your computer. (they could, but they don't, it'd only work on signed anyways.)
    Interested in C# and Electrical Engineering? This might interest you.

  15. #15
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Line 64: [Error] (18105:21): Invalid number of parameters in script

  16. #16
    Join Date
    Jul 2007
    Posts
    137
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    you need to use srl v4 beta with scar 3.11

    try this one:

    SCAR Code:
    { THIS IS A VERY SIMPLE WOOD CUTTING PROGRAM. IT DOESNT EVEN DROP THE LOGS
    BUT IM AM NEW TO SCAR SO I AM LEARNING.
    I WOULD LIKE TO THANK SOMEONE. BECUASE ME READING THEIR SCRIPT MADE ME
    UNDERSTAND HOW TO FIND COLORS ANS STUFF. BUT THE SCRIPT DIDNT HAVE A NAME ON
    IT.
    OK TO OPERATE THIS YOU NEED TO CHANGE THE TREE COLOR AND THEN
    THE LAST TWO CORDINATES OF THE FINDCOLORSPIRAL
    THEN ALL YOU NEED TO DO IS DRAG CROSSHAIR TO RS AND PRESS PLAY.}

    {IF YOU HAVE SUGGESTION OR WANT TO HELP ME WITH SCRIPTING. EMAIL ME AT
    <a href="mailto:ajredalert@sbcglobal.net">ajredalert@sbcglobal.net</a>}


    // version 1.0 = very simple woodcutter\\
    // version 1.2 = added log droping\\


    program simplewc;
    {.include SRL/SRL.scar}
    {.include SRL\SRL\skill\WoodCutting.scar}

    var
      logDTM, x, y : integer;
      invX1, invY1, invX2, invY2 : Integer;

    // THE SETUP\\
    const tree=11047; // SET THE TREE COLOR\\
    // END SETUP\\

    procedure setup;
    begin
      invX1:= 547;
      invY1:= 202;
      invX2:= 736;
      invY2:= 463;
      setupsrl;
      activateclient;
      writeln('CREDIT GOES TO ME HAVOC928 ...FEEL FREE TO DISTRIBUTE');
      wait(1000);
    end;

    procedure dtms;
    begin
      logDTM := DTMFromString('78DA63CC636660E861644006716E1C0CFF813' +
           '448F43F1030C601D54C425503918591401A64CE2C026A6A806A26' +
           '1350530054D34A404D2A504D3B7E350002D50BB3');
    end;

    procedure treekiller;   // you might want to add ent protection, antiban, and antirandoms
    begin
      repeat
        findcolortolerance(x, y, tree, 3, 3, 551, 224, 5) //PUT IN LAST 2 CORDINATES FROM THE COLOR PICKER\\
        // DO NOT TOUCH BELOW\\
        mouse(x,y,0,0,true)
        wait(5000+random(5000))
      until(invfull);
    end;

    procedure droplogs;  // some people have their axes in inventory... so i changed it to drop logs
    begin
      repeat
        if finddtm(logDTM, x, y, invX1, INVY1, INVX2, INVY2) then
        begin
          mouse(x, y, 2, 2, false);
          wait(200+random(100));
          chooseoption(x, y, 'Drop');
          wait(1000+random(200));
        end;
      until(invcount = 0) or (invcount = 1);
    end;

    begin
      dtms;
      setup;
      repeat
        treekiller;
        wait(2000+random(500))
        droplogs;
      until (false)
    end.
    Do not propose an idea of peculation without evidence of such action.

    http://cashcrate.com/704591 click here and make money!

  17. #17
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default

    Quote Originally Posted by Smartzkid View Post
    What? Jagex can't see what's running on your computer. (they could, but they don't, it'd only work on signed anyways.)
    well not everyone uses unsigned (even though you should) and im pretty sure they do in some way see what you are running.

  18. #18
    Join Date
    Jun 2007
    Location
    NSW, Australia.
    Posts
    541
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I may be wrong, but wasn't InvFull; taken out of SRL in SRL4?

    I think this is because it was as useless function.

    All you need to do is check the inventory count, and make sure it equals 28 (a full load).

    SCAR Code:
    repeat
      Treekiller;
    until(InvCount = 28);

    May be wrong, its early in the morning
    Quote Originally Posted by RAM View Post
    I sam sofa king wee todd did ! ~RAM
    My SRL Army Blog.


  19. #19
    Join Date
    Jul 2007
    Posts
    137
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Pancakes View Post
    I may be wrong, but wasn't InvFull; taken out of SRL in SRL4?

    I think this is because it was as useless function.

    All you need to do is check the inventory count, and make sure it equals 28 (a full load).

    SCAR Code:
    repeat
      Treekiller;
    until(InvCount = 28);

    May be wrong, its early in the morning
    invfull is in srl 4
    Do not propose an idea of peculation without evidence of such action.

    http://cashcrate.com/704591 click here and make money!

  20. #20
    Join Date
    Jul 2007
    Posts
    42
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thank you pancakes it works finally... the only thing is that it didnt drop the whole right side....but o whole at least it drops good

  21. #21
    Join Date
    Aug 2007
    Location
    England
    Posts
    734
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    There are drop functions built into SRL so just use one of them,and to someone else above there are Inventory Coords built in too... In your script where it says
    findcolortolerance(x,y,tree,3,3,551, 224,5)
    you should make it search the intire screen so change it to

    SCAR Code:
    findcolortolerance(x,y,tree,MSX1,MSY1,MSX2, MSY2,5)

    this means that it searches the entire Main Screen (MS) for the color of the tree...

    Make sure you check out the tutorials
    The truth finally came out...


  22. #22
    Join Date
    Jul 2007
    Posts
    137
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    it would also be better to use findobj, instead of findcolortolerance.
    Do not propose an idea of peculation without evidence of such action.

    http://cashcrate.com/704591 click here and make money!

  23. #23
    Join Date
    Jun 2007
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Also, you should add a failsafe for the repeat loop at the end of yur script. Somthing like stop after a certain amt of time or prespecified number of loads =)

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Real timing of functions!
    By nielsie95 in forum Research & Development Lounge
    Replies: 7
    Last Post: 08-18-2009, 02:54 AM
  2. Timing?
    By marpis in forum OSR Help
    Replies: 7
    Last Post: 11-06-2008, 05:56 PM
  3. Logging and Timing
    By looneytoon in forum OSR Help
    Replies: 3
    Last Post: 03-27-2007, 03:55 AM
  4. timing
    By omgh4x0rz in forum OSR Help
    Replies: 4
    Last Post: 02-14-2007, 02:42 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
  •