Results 1 to 3 of 3

Thread: Bigfish RandomAngleEvery Procedure

  1. #1
    Join Date
    Aug 2006
    Posts
    53
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Bigfish RandomAngleEvery Procedure

    This my Random Angle Procedure, meh, it might not be amazing, but, it wokrs

    Code:
    Procedure RandomAngleEvery(mins : integer);
    Begin;
    If ((TimeFromMark(Mark) / 1000) / 60 >= mins) Then
    begin
    If(Loggedin) then
    Begin
    MarkTime(Mark)
    case random(3) of
    0: Begin; KeyDown(VK_Left); Wait(1000+Random(500)); KeyUp(VK_Left); Wait(500+Random(700)); KeyDown(VK_Down); Wait(500+Random(200)); KeyUp(VK_Down); Wait(1000+Random(300)); MakeCompass('N'); End;
    1: Begin; KeyDown(VK_Right); Wait(1000+Random(500)); KeyUp(VK_Right); Wait(500+Random(700)); KeyDown(VK_Left); Wait(500+Random(200)); KeyUp(VK_Left); Wait(1000+Random(300)); MakeCompass('N'); End;
    2: Begin; KeyDown(VK_Down); Wait(1000+Random(500)); KeyUp(VK_Down); Wait(500+Random(700)); KeyDown(VK_Right); Wait(500+Random(200)); KeyUp(VK_Right); Wait(1000+Random(300)); MakeCompass('N'); End;
    end;
    end;
    end;
    end;
    To use:
    In main loop add:
    RandomAngleEvery(4); // Where the 4 is, change it to a number in minutes..

    Enjoy

    ~Bigfish

  2. #2
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    cool
    wrong sectino though
    belongs in SRL Snippits

  3. #3
    Join Date
    Sep 2006
    Posts
    5,219
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    Not everyone can get there.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Procedure TypeSendRandom & Procedure AutoResponder!
    By Ultra in forum Research & Development Lounge
    Replies: 12
    Last Post: 01-08-2008, 07:04 PM
  2. Replies: 8
    Last Post: 05-24-2007, 11:57 PM
  3. Procedure that calls random procedure?
    By Secet in forum OSR Help
    Replies: 2
    Last Post: 03-03-2007, 03:56 PM
  4. Bigfish Ess Miner 2007, reason for public realse...
    By Bigfish58 in forum RS3 Outdated / Broken Scripts
    Replies: 47
    Last Post: 10-31-2006, 11:02 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
  •