Results 1 to 6 of 6

Thread: Very noob Clay softener

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

    Default Very noob Clay softener

    This is my second script ever... You will probably have to modify but it is a start.

    You have to be i the crafting guide for this to work.... A bucket or jug has to be in your second inventory slot... and dry clay in most of the rest.

    To start, will have to face the sink in the crafting guide. I knwo this isn't profesional or whatever, but the blue water should be towards the top of your screen. Having the highest view angle would probably be best. The script must be stopped manually. Here it is:

    program wetclay;
    var
    x, y, x1, y1: Integer;
    begin
    repeat
    //click on water jug 636, 305
    MoveMouseCC(636, 305, 2, 9, 3, 2);
    Wait(RandomRange(150, 200));
    ClickMouseBox(629, 299, 642, 309, True);
    Wait(RandomRange(150, 200));

    if(FindColorTolerance(x, y, 8677464, 40, 131, 524, 409, 1
    ))then//found water in sink
    begin
    MoveMouseCC(x, y+8, 2, 9, 3, 2); //MoveMouseCC(x, y, range, segments, pcount, delay);
    Wait(RandomRange(150, 200));
    ClickMouseBox(x-2, y+6, x+2, y+10, True);
    end
    else
    begin
    Wait(RandomRange(500, 1000));
    Writeln('not found');
    end
    //full jug
    MoveMouseCC(636, 305, 2, 9, 3, 2);
    Wait(RandomRange(150, 200));
    ClickMouseBox(629, 299, 642, 309, True);
    Wait(RandomRange(150, 200));


    //click clay
    FindColorTolerance(x, y, 5276319, 573, 292, 743, 532, 3)
    MoveMouseCC(x, y, 2, 9, 3, 2); //MoveMouseCC(x, y, range, segments, pcount, delay);
    Wait(RandomRange(500, 800));
    ClickMouseBox(x-2, y-2, x+2, y+2, True);
    Wait(RandomRange(150, 200));

    until(False)
    end.


    I know I'm a runescape script noob, but If anyone sees my potential... Just contact me and give me a starting on how I can learn more.

    Syphon.

  2. #2
    Join Date
    Nov 2006
    Location
    NSW, Australia
    Posts
    3,487
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Not bad...instead of MoveMouseCC use MMouse...it's less detectable.

    MMouse(x, y, 5, 5); 5, 5 is random offset...
    [CENTER][img]http://signatures.mylivesignature.com/54486/113/4539C8FAAF3EAB109A3CC1811EF0941B.png[/img][/CENTER]
    [CENTER][BANANA]TSN ~ Vacation! ~ says :I Love Santy[/BANANA][/CENTER]

    [CENTER][BANANA]Raymond - Oh rilie? says :Your smart[/BANANA][/CENTER]

  3. #3
    Join Date
    Aug 2007
    Posts
    5
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I hate the documentation of SRL. How do I cange the speed of the mouse with the mmouse function? Also, I want the mouse to move to a random spot within 5 pixles or whatever, then click in that exact same spot... How can I do that?

  4. #4
    Join Date
    Aug 2007
    Posts
    78
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    add +random(5) inside the brackets...

  5. #5
    Join Date
    Nov 2006
    Location
    In an Amish Paradise
    Posts
    729
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Added Standards and some Srl mouse functions

    SCAR Code:
    program wetclay;
    {.Include SRL/SRL.scar}

    begin
    MouseSpeed:= 10; //lower the number faster the mouse
    repeat
      //click on water jug 636, 305
      MMouse(636, 305,5, 5); //Moves it to cords 636 305, mising by 5 pixles x and y
      Wait(RandomRange(150, 200));          
      if (IsUpText('Jug'))then //looks for text upper left connor
      begin
        Mouse(636, 305, 5, 5, True); //moves and clicks mising by 5 pixles x and y
        Wait(RandomRange(150, 200));
      end;
    if(FindColorTolerance(x, y, 8677464, 40, 131, 524, 409, 1))then//found water in sink
    begin
      MMouse(x, y+8, 2, 2); //MMouse(xCoord,yCoord,xOff,yOff);
      Wait(RandomRange(150, 200));
      Mouse(x-2, y+6, 2, 10, True);
    end;
    else
    begin
      Wait(RandomRange(500, 1000));
      Writeln('Sink not found');//be specific to what wasn't found
    end;
    //full jug
    begin
      MMouse(636, 305, 2, 9);
      Wait(RandomRange(150, 200));
      Mouse(636, 305, 5, 5, True);
      Wait(RandomRange(150, 200));
    end;

    //click clay
    begin
      FindColorTolerance(x, y, 5276319, 573, 292, 743, 532, 3)
      MMouse(x, y, 2, 2);
      Wait(RandomRange(500, 800));
      Mouse(x, y, 2, 2, True);
      Wait(RandomRange(150, 200));
    end;
    until(False)
    end.

    Look into Bitmaps or DTMs for easy item finding
    Hope this helps,
    ~Stupedspam

  6. #6
    Join Date
    Jun 2007
    Location
    In my computer room
    Posts
    148
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Offtopic - StupedSpam I like your Siggy!

    Ontopic - This script is a little simple but seeing its your second script it will suffice.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Clay Softener
    By arteest90 in forum RS3 Outdated / Broken Scripts
    Replies: 1
    Last Post: 11-20-2008, 10:54 PM
  2. My Noob Clay Softener
    By Da 0wner in forum RS3 Outdated / Broken Scripts
    Replies: 10
    Last Post: 05-10-2008, 10:06 AM
  3. Clay Softener
    By Killerdou in forum RS3 Outdated / Broken Scripts
    Replies: 2
    Last Post: 02-20-2007, 12:18 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
  •