Results 1 to 7 of 7

Thread: lumbridge to varrok east test please.

  1. #1
    Join Date
    Nov 2006
    Posts
    94
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default lumbridge to varrok east test please.

    Ok, this is my first script. Dosent have anything specail just should walk from lumbridge to varrok. Please tell em how far you got or where you got lost. start by dieing or doing home tele then start script. Dont worry if it keeps clicking after it clicked transportion, it should still work so just let it go.

    SCAR Code:
    /////////////////////////////////////////////////////////////////////////
    ////////////////////////////////////////////////////////////////////////
    ////////////////////Test///////////////////////////////////////////////
    ////////////////////and///////////////////////////////////////////////
    ////////////////////help/////////////////////(What a bad intro)//////
    ////////////////////me//////////////////////////////////////////////
    ////////////////////out////////////////////////////////////////////
    ////////////////////!!!///////////////////////////////////////////
    /////////////////////////////////////////////////////////////////
    program New;
    {.include SRL\SRL.scar}

    Procedure WalkToVarrok1;
    begin
    MakeCompass('n');
    SetRun(true);
    RadialRoadWalk(FindRoadColor, 70, 40, 70, -1, 0);
      repeat
         Wait(50+random(100))
      until(FindSymbol(x, y, 'guide'))
      Mouse(x, y, 5, 5, true)
      Flag;
     end;
     
    Procedure WalkToVarrok2;
    begin
     repeat
        Wait(50+random(100))
      until(FindSymbol(x, y, 'transportation'))
      Mouse(x, y, 5, 5, true)
      Flag;
    end;

    Procedure WalkToVarrok3;
    begin
     RadialRoadWalk(FindRoadColor, 24, 42, 74, -1, -1);
    end;

    Procedure WalkToVarrok4;
    begin
     RadialRoadWalk(FindRoadColor,325,460,70, 2, 2)
    end;

    Procedure WalkToVarrok5;
    begin
     RadialRoadWalk(FindRoadColor, 310, 410, 70, 2, 2);
    end;

    Procedure WalkToVarrok6;
    begin
     RadialRoadWalk(FindRoadColor, 410, 310, 70, 2, 2);
    end;

    Procedure WalkToVarrok7;
    begin
     RadialRoadWalk(FindRoadColor, 90, 0, 70, 2, 2);
    end;

    Procedure WalkToVarrok8;
    begin
     RadialRoadWalk(FindRoadColor, 90, 0, 70, 2, 2);
    end;

    Procedure WalkToVarrok9;
    begin
     RadialRoadWalk(FindRoadColor, 90, 0, 70, 2, 2);
    end;

    Procedure WalkToVarrok10;
    begin
     RadialRoadWalk(FindRoadColor, 62, 92, 70, 2, 2);
    end;

    Procedure WalkToVarrok11;
    begin
     RadialRoadWalk(FindRoadColor, 320, 400, 65, 0, 0);
    end;

    Procedure WalkToVarrok12;
    begin
     RadialRoadWalk(FindRoadColor, 359, 328, 60, 2, 2);
    end;

    Procedure WalkToVarrok13;
    begin
     repeat
        Wait(50+random(100))
      until(FindSymbol(x, y, 'mining spot'))
      Mouse(x, y, 5, 5, true)
      Flag;
    end;

    Procedure WalkToVarrok14;
    begin
     RadialRoadWalk(FindRoadColor, 22, 52, 65, 0, 0);
    end;

    Procedure WalkToVarrok15;
    begin
     RadialRoadWalk(FindRoadColor, 359, 325, 65, 0, 0);
    end;

    Procedure WalkToVarrok16;
    begin
     repeat
        Wait(50+random(100))
      until(FindSymbol(x, y, 'quest'))
      Mouse(x, y, 5, 5, true)
      Flag;
    end;

    Procedure WalkToVarrok17;
    begin
     RadialRoadWalk(FindRoadColor, 0, 46, 65, 0, 0);
    end;

    Procedure WalkToVarrok18;
    begin
     RadialRoadWalk(FindRoadColor, 277, 304, 65, 0, 0);
    end;

    Procedure WalkToVarrok19;
    begin
     RadialRoadWalk(FindRoadColor, 257, 285, 50, 0, 0);
    end;

    Procedure WalkToVarrok20;
    var
      Start: Integer;
    begin
      MarkTime(Start);
      repeat
        Wait(50+random(100))
      until((FindSymbol(x, y, 'bank')) or (TimeFromMark(Start)>=15000))
      if(TimeFromMark(Start)>=15000) then
      else
      begin
        Mouse(x, y, 5, 5, true)
        Flag;
      end
    end;

    begin
    SetUpSRL;
    ActivateClient;
    Wait(5000);
    WalkToVarrok1;
    Wait(5000);
    WalkToVarrok2;
    Wait(5000);
    WalkToVarrok3;
    Wait(5000);
    WalkToVarrok4;
    Wait(5000);
    WalkToVarrok5;
    Wait(5000);
    WalkToVarrok6;
    Wait(5000);
    WalkToVarrok7;
    Wait(5000);
    WalkToVarrok8;
    Wait(5000);
    WalkToVarrok9;
    Wait(5000);
    WalkToVarrok10;
    Wait(5000);
    WalkToVarrok11;
    Wait(5000);
    WalkToVarrok12;
    Wait(5000);
    WalkToVarrok13;
    Wait(5000);
    WalkToVarrok14;
    Wait(5000);
    WalkToVarrok15;
    Wait(5000);
    WalkToVarrok16;
    Wait(5000);
    WalkToVarrok17;
    Wait(5000);
    WalkToVarrok18;
    Wait(5000);
    WalkToVarrok19;
    Wait(5000);
    WalkToVarrok20;
    Wait(5000);
    end.

    (wont let me upload)
    Please post suggestions.

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

    Default

    You REALLY need random waiting for your Wait(5000); or it will probably get you banned.. Good work though, don't know why you need the waits anyway, I'd just use Flag and FFlag.

  3. #3
    Join Date
    Nov 2006
    Posts
    94
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    well i used wait cause my comp laggs a lot and the flag wasnt working for me. adn what do u mean add randomness? make some 7000 some 5000 and stuff like that?

  4. #4
    Join Date
    Feb 2007
    Posts
    193
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Like not always the same thing like uhh the mouse speed doesnt constantly move at 15 it sometimes adds a speed of 3 or something like that

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

    Default

    Like this:

    Wait(5000+random(2000));

    that will wait anywhere from 5000milliseconds - 7000 milliseconds (5-7 seconds)

    Read whocares357's beginner tut and that'd teach you

  6. #6
    Join Date
    Oct 2006
    Location
    ithurtsithurtsithurtsithurts
    Posts
    2,930
    Mentioned
    7 Post(s)
    Quoted
    135 Post(s)

    Default

    I tried running it, and it got stuck at the cow pen repeatedly.

  7. #7
    Join Date
    Mar 2007
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    nice u just need to make it a bit smother and it would b mad

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 99
    Last Post: 01-26-2009, 06:52 AM
  2. varrok east oak cutter v1.0 - first ever script
    By poolikemax in forum First Scripts
    Replies: 8
    Last Post: 12-02-2008, 01:45 PM
  3. Edgeville/Varrok East AutoFM
    By wear all ded in forum RS3 Outdated / Broken Scripts
    Replies: 8
    Last Post: 09-03-2007, 02:50 PM
  4. Lumbridge East Chicken Killer
    By madmoon in forum RS3 Outdated / Broken Scripts
    Replies: 6
    Last Post: 03-02-2007, 01:38 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
  •