Results 1 to 8 of 8

Thread: Very First Auto!

  1. #1
    Join Date
    Feb 2008
    Location
    Fremont, OH
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Very First Auto!

    Well this isnt much but this is my very first script ever. All it does it just kills Goblins. Some things I have noticed with this is it will attack one goblin then before your done killing it, it will try to go to another. Any way to make that stop?
    Any adjustments just post them here. =D
    Please no flaming me this is my very first script.
    SCAR Code:
    {.Script Info:
    # ScriptName  = AutoFight and Walker
    # Author      = Ziphlon
    # Description = Fights Goblins for now.
    # Version     = V1.2
    # Date        = 2/14/08
    # DateVersion = 2/14/08 = V1.0   2/15/08 = V1.2
    # Comments    = The fighter now has SRL codeing!
    /Script Info}

    // ******************INSTRUCTIONS*******************
    // All you need to do is drag the selection tool to
    // the runescape applet and it will do the rest for
    // you! You must sign on to a **LOW DETAIL** world
    // in order for this to work properly.
    //                  **NOTE**
    // You may have to change the goblin color in order
    // for this to work and if you dont you will just be
    // standing there doing nothing.

    program AutoFighter;
    {.include SRl/SRL.scar}

    var
    x,y: Integer;

    const
    Monster = 1658212; //input the goblin color here
    LumbridgeColor = 10116152; //input the color of the blue shield on the wall in lumbridge

    // ************ANYTHING BELOW THIS LINE DO NOT TOUCH!****************

    procedure FindMonster;                                //This block to the left
    begin                                                 //searches for the monster
     if(findcolor(x,y,Monster,0,0,700,700)) then          //and then it will target
      begin                                               //it.
        Writeln('Monster found!');                        //       **NOTE**
        MMouse(x,y,3,3);                                  // This has only been
        Wait(50+random(100));                             // tested on goblins north
        Mouse(x,y,0,0,true);                              // of lumbridge any other
      end else                                            // monster MAY work but I
        Writeln('Monster not found...Searching again');   // do not gurrentee results.
      end;
    //*******************Setup Block********************
    procedure Setup;
    begin
    cleardebug;
     Writeln('You will now have 5 seconds to get to the runscape applet');
      Wait(5000);
     if(findcolor(x,y,LumbridgeColor,0,0,700,700)) then
      begin
       Writeln('Setting to run.');
       MMouse(674,484,2,2);
         Wait(100+random(500));
       Mouse(674,484,0,0,true); // Clicks the screw icon
         Wait(500+random(1000));
       MMouse(642,427,3,3);
         Wait(100+random(500));
       Mouse(642,427,0,0,true); // Clicks the run icon
         Wait(500+random(1000));
       MMouse(648,186,2,2);
         Wait(100+random(500));
       Mouse(648,186,0,0,true); // Clicks the Backpack icon
         Wait(500+random(1000));
       end else
       Writeln('Not in lumbridge or colors are wrong.'); //This will just skip the whole test above
      end;
     //*******************Walking Block********************
    procedure Walking;
     begin
      MMouse(676,45,0,0);                                //Everything to the left
      Mouse(676,45,0,0,true);                            //is the way to the goblin
       Wait(7000+random(2500));                          //field.
      MMouse(582,42,0,0);                                //
      Mouse(582,42,0,0,true);                            //
       Wait(4700+random(1900));                          //
      MMouse(572,84,0,0);                                //
      Mouse(572,84,0,0,true);                            //
       Wait(4500+random(1430));                          //
      MMouse(560,59,0,0);                                //
      Mouse(560,59,0,0,true);
        Wait(5000+random(1532));
       end;
    //*******************StopRun Block*********************
    procedure StopRun;
     begin
     Writeln('Stoping run.');
      MMouse(671,477,2,2);
        Wait(100+random(500));
      Mouse(671,477,0,0,true); //Clicks tool icon
        Wait(500+random(1000));
      MMouse(654,436,3,3);
        Wait(100+random(500));
      Mouse(654,436,0,0,true); // Clicks run icon
        Wait(500+random(1000));
      MMouse(653,194,3,3);
        Wait(100+random(500));
      Mouse(653,194,0,0,true); // Clicks the backpack icon
        Wait(4500+random(4000));
     end;

    begin
     SetupSRL;
     Setup
     Walking
     StopRun
     repeat
     FindMonster
     Wait(7000+random(6000));
     until(false);
    end.

    **EDIT** Huge update to the script and it now has SRL codeing into it! Any more adjustments I should make to this?

  2. #2
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    I reccomend you replace MoveMouseSmooth with MMouse from SRL, and ClickMouse with Mouse And add some random Wait time after it kills the Goblin (Wait(5000+Random(5000));

    Good job besides that


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  3. #3
    Join Date
    Feb 2008
    Location
    Fremont, OH
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Hy71194 View Post
    I reccomend you replace MoveMouseSmooth with MMouse from SRL, and ClickMouse with Mouse And add some random Wait time after it kills the Goblin (Wait(5000+Random(5000));

    Good job besides that
    I have all ready gave the last wait time a random but now my other question is the MMouse and the Mouse codes. When I input them they say that it dosnt exist.

    Any way to help me? Sorry for being a noob its my first time here and learning the scripts for SCAR (although i have been reading tuts for a week now)

  4. #4
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    repeat
    FindMonster
    Wait(5000);

    O rly? I don't see a random wait there.

    Read a tut on how to implant SRL into your scripts Good luck.

    ~ Harry


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  5. #5
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    it say that doesnt exists becouse you have to include SRL.
    SCAR Code:
    Program New;
    {.include srl/srl.scar}
    and at your main loop:
    SCAR Code:
    SetupSRL;


  6. #6
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    This is just a basic suggession, put more than one color into the var section and then you dont have the risk of the mouse clicking something completely different.

    var area:
    SCAR Code:
    Var
    x, y, i: integer;
    Monster: array [0..3] of integer;

    The actual killing part:
    SCAR Code:
    Procedure Kill;
    Begin
      MosterColor[0]:= color here
      MosterColor[1]:= color here
      MosterColor[2]:= color here
      MosterColor[3]:= color here
      if (FindColor(x, y, MosterColor[i], number junk here) then
        Rest of stuff

  7. #7
    Join Date
    Apr 2007
    Location
    Michigan -.-
    Posts
    1,357
    Mentioned
    2 Post(s)
    Quoted
    4 Post(s)

    Default

    not bad, just read up on some tutorials for scripting with SRL because without it you will either:

    a. Get banned
    b. Just have ineffective scripts

    good luck dude and see the tutorial link in my sig if you need help
    METAL HEAD FOR LIFE!!!

  8. #8
    Join Date
    Feb 2008
    Location
    Fremont, OH
    Posts
    4
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by gerauchert View Post
    not bad, just read up on some tutorials for scripting with SRL because without it you will either:

    a. Get banned
    b. Just have ineffective scripts

    good luck dude and see the tutorial link in my sig if you need help
    Thank you so much gerauchert! Your tut helped me the most in SRl. + rep for you

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Your Full Guide to Preparing to Auto [SCAR, SRL, SVN, HowTo Auto]
    By Runescapian321 in forum Outdated Tutorials
    Replies: 71
    Last Post: 10-11-2008, 03:46 AM
  2. Replies: 5
    Last Post: 11-23-2007, 08:45 PM
  3. need a good script , auto miner auto banker plz!!
    By samuel in forum RS3 Outdated / Broken Scripts
    Replies: 27
    Last Post: 11-19-2007, 08:46 AM
  4. Help with auto trade/ auto talker script
    By logik in forum OSR Help
    Replies: 5
    Last Post: 03-16-2007, 11:16 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
  •