Results 1 to 6 of 6

Thread: i made a radialroadwalk script w00t!...

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

    Default i made a radialroadwalk script w00t!...

    no talking but scripting( )
    SCAR Code:
    program LumbyAllInOne;
    {.include SRL/SRL.scar}
    {.include SRL/SRL/skill/woodcutting.scar}
    {.include SRL/SRL/skill/cooking.scar}
    {.include SRL/SRL/skill/fighting.scar}

    var
    hometeleport, lx, ly, x,y:integer;

    const
     Location = 'chicken pen'; //You can use Chicken Pen, Lumbridge, or Other.

    {=====================================================================================]
                DONT TOUCH THIS BELOW IF YOU DONT KNOW WHAT YOUR DOING!
    [=====================================================================================}


    procedure loadbitmaps;
     begin
      hometeleport := BitmapFromString2(False, 'a84B1878DA8D8E510A0' +
           '3210C44AF944493D84F75F5FE47EA8E5B4C410A55181EE14D9488' +
           '58E93ECCF94E6D6063014F4316A469D9AC23D8247C4B7D9B52D63' +
           '6ED7BCFC75C5DD7894C17260DCF7BCBC1D2839DC27FC936F94297' +
           '5AA5F5F739701F3E274953B6E1D5EB2C4FFED33ABBDFCE797FB5D' +
           'E870');
     end;





    Procedure casthometeleport;
     begin
      gametab(7);
      wait(400+Random(600));
       If(FindBitmap(hometeleport, lx, ly)) Then
        Begin
        wait(100 + Random(150));
        Mouse(lx, ly, 5, 5, True);
        wait(15000);
        WriteLn('your in limbridge, have a nice day!');
      end
       else
        If Not(FindBitmap(HomeTelePort, lx, ly)) Then
         begin
          WriteLn('couldnt fin spell.');
       end;
    end;


    procedure Move;
    begin
      if Location='Other' then
        begin
          casthometeleport;
          HighestAngle;
          MakeCompass('N');
          FindRoadColor;
          SetRun(true);
          RadialRoadWalk(RoadColor, 60, 65, 66, 0, 0);
          WriteLn('to bridge');
          FFlag(5);
          RadialRoadWalk(RoadColor, 80, 120, 63, 0, 0);
          WriteLn('passed the bridge');
          FFlag(5);
          RadialRoadWalk(RoadColor, 30, 50, 66, 0, 5);
          WriteLn('almost next to goblin house');
          FFlag(5);
          RadialRoadWalk(RoadColor, 360, 335, 65, 0, 0);
          WriteLn('passed goblin house');
          FFlag(4);
          RadialRoadWalk(RoadColor, 332, 350, 71, 0, 1);
          WriteLn('next to cows');
          FFlag(6);
          RadialRoadWalk(RoadColor, 315, 330, 72, 0, 0);
          WriteLn('next to cows');
          FFlag(5);
          RadialRoadWalk(RoadColor, 337, 350, 65, 0, 1);
          WriteLn('in chickenpen');
          FFlag(5);
        SetRun(false);
      end
    if Location='Lumbridge' then
      begin
          HighestAngle;
          MakeCompass('N');
          FindRoadColor;
          SetRun(true);
          RadialRoadWalk(RoadColor, 60, 65, 66, 0, 0);
          WriteLn('to bridge');
          FFlag(5);
          RadialRoadWalk(RoadColor, 80, 120, 63, 0, 0);
          WriteLn('passed the bridge');
          FFlag(5);
          RadialRoadWalk(RoadColor, 30, 50, 66, 0, 5);
          WriteLn('almost next to goblin house');
          FFlag(5);
          RadialRoadWalk(RoadColor, 360, 335, 65, 0, 0);
          WriteLn('passed goblin house');
          FFlag(4);
          RadialRoadWalk(RoadColor, 332, 350, 71, 0, 1);
          WriteLn('next to cows');
          FFlag(6);
          RadialRoadWalk(RoadColor, 315, 330, 72, 0, 0);
          WriteLn('next to cows');
          FFlag(5);
          RadialRoadWalk(RoadColor, 337, 350, 65, 0, 1);
          WriteLn('in chickenpen');
          FFlag(5);
         SetRun(false);
      end
        If Location='Chicken Pen' Then
         Begin
          Exit;
        end;
    end;


    begin
    SetupSrl;
    activateclient;
    loadbitmaps;
    Move;

    end.
    ~Hermen

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

    Default w000t

    w00t Very nice i like the idea.
    i think that could be used a death walk

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

    Default

    Needs more failsafes (symbols, water, etc)

    but not bad for your first walker.
    Interested in C# and Electrical Engineering? This might interest you.

  4. #4
    Join Date
    Jul 2007
    Location
    America
    Posts
    421
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yeah, good job for a first time radialwalk. You could add failsafes, though (like for i:=0 to 3 do....if(findsymbol)then break)
    I dunno, those asians are pretty difficult to out-auto, legend has it they don't need sleep or food...~tim0suprem0
    Activity is on the decline - school's got me
    Check out my tutorial[s] on Color Finding!||Procedures and Functions!

  5. #5
    Join Date
    Sep 2006
    Location
    Texas
    Posts
    65
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    looks cool!

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

    Default

    dude i made it for fun if i want to add failsafes and that stuff i will do it
    and btw i will do that later this was just walker
    ~Hermen

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. yew script i made
    By onizak in forum OSR Help
    Replies: 6
    Last Post: 03-08-2009, 01:34 AM
  2. Part Made Script - Big one
    By HarryJames in forum First Scripts
    Replies: 4
    Last Post: 11-08-2008, 01:48 PM
  3. I need a VERY simple script made please
    By spork985 in forum RS3 Outdated / Broken Scripts
    Replies: 26
    Last Post: 11-29-2007, 05:54 PM
  4. a fun little script i made for ScapeRune
    By mal1t1a in forum First Scripts
    Replies: 23
    Last Post: 10-06-2007, 03:15 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
  •