SRL Archive - RS Scripts

Hi wlel i was just thinking well what am i going to do with all these scipts that i have been cloctioning well then i thought why not shear with the world so here they are since i cant upload around 200 meg to put them all here just post what sort of script you want and ill up load around 2-5 of that sort of script.Im not promising they all work and that there all safe but here they are so post away

mmmmmmm….. Sp?


Fawki made something like that right? it just hasnt been updated

o lol and wtf is sp?

Spelling, nub.

From: JiveTonto@Gmail.com
o lol and wtf is sp?

Lmao, didn't you ever take an English Class before? Sp is popular in school. Teachers use a red pen and write sp all over the place. Then out of 6 for punctuation/spelling/grammar they give you a 1.

Btw, this is very helpful of you.

they never used Sp in my school.. nor in my city.. lol they always used CSP (correct spelling please).. umm besides that.. why not put it in a rar? unless you tried that already.. :confused: or your could upload 100 mb ea to like megaupload.com or something? :rolleyes:

ehhh ill jsut upload as people ask hehe

ok cowhide collectors, bone buriers, meat collector and cooker

hey you go and hey just edit the cow hdie one to pick up meat instead of hides =p

OUCH those are old..

… hey i said so nee dot coment but there is more but im far to lazy to go thougth them all and find new ones

Good thought Jive.

But I already made a ScriptDump here. Maybe you want me to host the stuff you got?

na this si strickly a request dump so ti will nto end up taking up all that much room

also if you have some scripts uplaod them here so ic an downlaod and add to my set hehe andlos post what way you want the scripts e.g text or in file format

Double posters will be shot, heard of the edit button?

From: The Prince of Randomness
Double posters will be shot, heard of the edit button?

sorry mom next time ill try harder =p

Dude, I don't want to be mean or something, but can you atleast add some punctuations to your posts, and do double check for typos in posts before you actually post them. It's really annoying to read posts like those. No hard feelings :/ I'm saying this for your own good.

so any oen else want a script

hm, lots have been made.. just go to srl script section..

well i got a lot more =p

It is an auto talker

You got a nice teleporter/high alcher… Looking for a flawless one!

Alcher

program New;
{.include osi.txt}

procedure LowAlc;
begin
 wait(100);
 Mouse(635,248,2,2,true);
 wait(200);
 UseItem(1);
 wait(400);
end;

begin
setuposi
Mouse(737,189,3,3,true);
 wait(600);
repeat
 LowAlc;
until(false)
end.

Alcher

program New;
{.include osi.txt}

procedure OpenMagic;
begin
 Mouse(737,188,2,2,true);
 wait(200);
end;

procedure UseSpell(row,col:integer);
var tx,ty:integer;
begin
 tx:=539; ty:=200;
 wait(150);
 Mouse(tx+row*24,ty+col*24,1,1,true);
 wait(200);
end;

procedure LowAlc;
begin
 OpenMagic;
 repeat
  UseSpell(4,2);
  UseItem(1);
  repeat
   wait(10);
  until(GetColor(729,398)=0)
  wait(50);
 until(false)
end;

procedure HighAlc;
begin
 OpenMagic;
 repeat
  UseSpell(8,4);
  UseItem(1);
  repeat
   wait(10);
  until(GetColor(729,398)=0)
  wait(50);
 until(false)
end;

begin
setuposi
//HighAlc;
LowAlc;
end.

Teleporter

{Teleporter By HatlessCow
This is a powerteleporter! just keep teleporting you to the same
spot over and over again. Full anti-randos and stuff too.
}
program TelePorter;
{.include osi.txt}
{.include boxbreaker2.txt}

const
Location = 4;//1.Varrock, 2.Lumbridge, 3.Falador 4.Camelot
//5.Ardougne, 6.WatchTower, 7.Trollheim
Times = 10;//Number of times to teleport
Username = '';
Password = '';

var ax,ay,ALD:integer;
iLamp,TalkW,TalkY:integer;

procedure LoadBmps;
begin
TalkW := BitmapFromString(17, 10,
        'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000' +
        '000000000000000000000000000000000000FFFFFFFFFFFF000000' +
        '000000FFFFFFFFFFFF000000000000000000000000000000000000' +
        '000000000000000000000000000000FFFFFFFFFFFF000000000000' +
        'FFFFFFFFFFFF000000000000000000000000000000000000000000' +
        '000000000000000000000000FFFFFFFFFFFF000000000000FFFFFF' +
        'FFFFFF000000000000000000000000000000000000000000000000' +
        '000000000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
        '000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000' +
        '000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
        '000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
        '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
        '000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
        'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000000000' +
        'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFF' +
        'FFFFFF000000000000FFFFFFFFFFFF000000000000000000FFFFFF' +
        'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
        '000000000000FFFFFFFFFFFF000000000000000000000000FFFFFF' +
        'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF');
TalkY := BitmapFromString(17, 10,
        'FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00000000000000000000' +
        '000000000000000000000000000000000000FFFF00FFFF00000000' +
        '000000FFFF00FFFF00000000000000000000000000000000000000' +
        '000000000000000000000000000000FFFF00FFFF00000000000000' +
        'FFFF00FFFF00000000000000000000000000000000000000000000' +
        '000000000000000000000000FFFF00FFFF00000000000000FFFF00' +
        'FFFF00000000000000000000000000000000000000000000000000' +
        '000000000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
        '000000000000000000000000FFFF00FFFF00FFFF00FFFF00000000' +
        '000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
        '000000000000FFFF00FFFF00000000000000FFFF00FFFF00000000' +
        '000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
        '000000000000FFFF00FFFF00FFFF00FFFF00FFFF00000000000000' +
        'FFFF00FFFF00000000000000FFFF00FFFF00000000000000000000' +
        'FFFF00FFFF00000000000000FFFF00FFFF00000000000000FFFF00' +
        'FFFF00000000000000FFFF00FFFF00000000000000000000FFFF00' +
        'FFFF00000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
        '000000000000FFFF00FFFF00000000000000000000000000FFFF00' +
        'FFFF00FFFF00FFFF00FFFF00000000000000FFFF00FFFF00');
iLamp := BitmapFromString(17, 6,
       '000001000001000001000001BAB815B2B015AEAD15ABAA159C9A12' +
       '9291128C8A1275740E000001000001000001000001000001D0CE18' +
       'CBC918C8C618C5C418C5C418C0BE18BAB815B5B315ABAA15A3A112' +
       '99971292911284820E79780E6968095C5A09A6A415CECC18C5C418' +
       'C2C118C0BE18BDBB18BAB815B8B615B5B315B2B015A8A715A3A112' +
       '9C9A129594128E8D1281800E999712AEAD15CECC18CBC918C0BE18' +
       'BDBB18BAB815B5B315B2B015AEAD15A8A715A3A1129F9E12999712' +
       '88860E84820E8C8A129291129C9A12000001CBC918CBC918BAB815' +
       'B8B615B5B315B2B015AEAD15A8A715A3A1129C9A1295941281800E' +
       '79780E84820E000001000001000001CBC918CBC918C0BE18B8B615' +
       'B2B015AEAD15ABAA15A6A4159F9E129997128C8A1279780E75740E' +
       '000001000001C2C118');
end;

procedure Run;
begin
 SetRun(true);
 MouseFlag(645,148,1,1);
 StandStill;
 MouseFlag(648,20,1,1);
end;

function Fight:boolean;
begin
 if(FindColorSpiral(x,y,65280,216,115,284,171))then
  Result:=true;
end;

procedure FindMiscRandoms;
var ax,ay:integer;
begin
 if(FindColor(ax,ay,786423,10,350,150,433))then
  begin
   GetScreenshot('Mod',1);
   LogOut('UHOH, A MOD!!!');
  end;
 if(GetColor(30,418)=0)and(GetColor(72,429)=0)then
  begin
   GetScreenshot('Dead',1);
   LogOut('You are dead!');
  end;
 if(FindColor(ax,ay,11503238,10,350,479,433))then
  begin
   GetScreenshot('Mime',1);
   LogOut('Mime Found');
  end;
end;

procedure LoginifNeeded(Username,Password:string);
begin
 if(GetColor(328,294)=16777215)then
  begin
   Mouse(461,295,9,9,true);
   wait(600);
   Mouse(373,255,0,0,true);
   wait(200);
   Say(username);
   wait(400);
   Say(password);
   wait(200);
   Mouse(302,320,9,9,true);
   repeat
    wait(50);
   until(not(GetColor(540,268)=3879730))
   wait(500);
   repeat
    Mouse(461,95,8,8,true);
   until(not(GetColor(463,93)=8421504))and(not(GetColor(463,93)=16777215))
  end;
end;

procedure FindText;
var counter,c:integer; Talked2Rand:boolean;
begin
if(FindColor(x,y,65535,5,5,514,337))then wait(100)
if(FindColor(x,y,65535,5,5,514,337))and(LogedIn)then
 begin
  repeat
   counter:=counter+2+random(1);
   if((x+counter) < 515)and((y+18) < 338)then
    MoveMouseSmoothEx(x+counter,y+15+random(3),1,6,15,20,20);
   wait(5);
   if(FindColorSpiral(x,y,65280,180,90,320,230))then
    break;
   if(IsTextAt2(9,9,'Ta',100))then
    begin
     GetMousePos(x,y);
     Mouse(x,y,0,0,false);
     Wait(200+random(100));
     if(FindBitmap(TalkW,x,y))or(FindBitmap(TalkY,x,y))then
      begin
       Mouse(x,y,40,5,true);
       MapFlag;
       wait(1000+random(1000));
       while((FindColor(x,y,16711680,5,345,510,465))or //Replaces TalkToRand
            (FindColor(x,y,16777215,5,345,510,465)))and
            (not(GetColor(20,434)=0))and(c<=10)do
        begin
         Mouse(x,y,50,2,true);
         wait(2000+random(1000));
         c:=c+1;
        end;
       Talked2Rand:=true;
      end;
    end;
  until(counter>=250)or(Talked2Rand);
 end;
end;

Procedure FindLamp;
begin
while(FindBitmapSpiralTolerance(iLamp,x,y,550,200,745,470,100)) do
 begin
  Mouse(x+random(2),y+random(2),10,10,true);
  wait(3000+random(1000));
  Mouse(157+random(2),220+random(2),12,12,true)
  wait(3000+random(1000));
  Mouse(248+random(2),255+random(2),10,2,true);
  wait(3000+random(1000));
  Mouse(226+random(2),442+random(2),10,3,true);
  wait(3000+random(1000));
  end;
end;

procedure Randoms;
begin
 LogInIfneeded(username,password);
 if(Fight)then
  Run;
 FindMiscRandoms;
 FindText;
 FindLamp;
 FindStrangeBox;
end;

procedure LoadLocation;
begin
 if(Location=1)then
  begin
   ax:=682;
   ay:=248;
  end;
 if(Location=2)then
  begin
   ax:=564;
   ay:=273;
  end;
 if(Location=3)then
  begin
   ax:=636;
   ay:=272;
  end;
 if(Location=4)then
  begin
   ax:=730;
   ay:=272;
  end;
 if(Location=5)then
  begin
   ax:=660;
   ay:=296;
  end;
 if(Location=6)then
  begin
   ax:=588;
   ay:=320;
  end;
 if(Location=7)then
  begin
   ax:=735;
   ay:=320;
  end;
end;

procedure TelePort;
begin
 Randoms;
 Mouse(ax,ay,1,1,true);
 wait(2500);
 Randoms;
end;

begin
setuposi
LoadLocation;
ALD:=0;
Mouse(736,185,5,5,true);
repeat
ALD:=ALD+1;
TelePort;
until(ALD>=Times)
end.

leatherworker?

Bump (so0z for this jsut to the top of page so peoplea dd them)

i need a wcer anything under mages that actully works

how about a willow cutter plus banker i can never find one that works

Use Charmz…works great!

Hey dude do you by any chance have Pwnds old Auto fletcher it uses SI.Scar, pm me or post it here if you do :)

a friggin ess miner/banker so many that suck it's not funny and the ones that work are payscript. *sighs*

From: rkroxpunk
a friggin ess miner/banker so many that suck it's not funny and the ones that work are payscript. *sighs*

wizzups…

could i get a auto woodcutter that banks and maybe a autofighter

I need a flax spiner. It dosen't need to pick…just spin.

If I made a script, I would be Appalled if it ended up in some script dump -.-

mind crafter…

flax picker or spinner, that is close to being flawless, every single one ive found has flaws up the ass like no belief

can u email me a auto fletcher! "chiraag2000@gmail.com"!please and thank you

Guys please stop grave digging.
brianbg, this thread was un posted at at for 1 year. Its old dont use it
If you want a script, look in SRL Free script section.
No1 pays attention to this thread.

So how many scripts do u have

soul wars or pest control script please

Wow over 2 years gravedig!