SRL Archive - First Scripts

[LEFT]
Recommends

• Wear Stealing Creation armors for bonus magic xp, Use the melee version as they have negative magic bonuses and still give the magic bonus xp regardless of what combat version the armor is.
• Use a Mud staff
• Use a Low Ping world
• Babysit the script as it cannot solve randoms

[/LEFT]



Currently the script works pretty flawless for me however it does click on the wizard and gate now and then but the script does not get interrupted by doing so.

Added a Curser script to the collection download CURS0R.


Feedback is also appreciated.

Issues
The demon colour seems to change really frequently.
If something does not work tell me.



Update
V2 with Proggy!!
and autocoloraids!!

proggy

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| –> L0sers Curs0r OLDSEX room V1 <– |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
| Worked for 4 Hours, 58 Minutes and 13 Seconds |
| Stuns cast 4900 |
| Experience gained…142100 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Rep + I love you

PS: you left your user and pass in script, I've tried to change it for you but someone has already done it, I hope they send it back to you, anyways you should probably remove it from the script.

shit I forgot it someone send me my pass please

From: loser69
shit I forgot it someone send me my pass please

Was looking at the srl stats one, you should change that too but I managed to change your rs details, sent it to you in a pm

Yea thanks bro, haven't changed my pass for like 5 years,
amateur mistake of me, anyway does the script work for you?

From: loser69
Yea thanks bro, haven't changed my pass for like 5 years,
amateur mistake of me, anyway does the script work for you?

it's working beautifully, if an anti random could be added it would be so good, but I'll babysit, definitely worth the real scripts section.

How much EXP/hr is this?

I got 80 - 83 magic in about 5 hours, havn't made a progress report so I can't tell but possibly 80K+ or double that if you use stealing creation armors.

From: Lolsen
it's working beautifully, if an anti random could be added it would be so good, but I'll babysit, definitely worth the real scripts section.

I tried adding 'FindNormalRandoms' but it would slow the script down a lot as it would change to the inventory tab after every cast, however it does still work just implement it on line 159 or something

Got 80-85 magic so far from this.

also are you using my script?(pic related)

From: loser69
I got 80 - 83 magic in about 5 hours, havn't made a progress report so I can't tell but possibly 80K+ or double that if you use stealing creation armors.



I tried adding 'FindNormalRandoms' but it would slow the script down a lot as it would change to the inventory tab after every cast, however it does still work just implement it on line 159 or something

Write a case statement of about 20 to check for randoms.

aren't case statements for antibans?

I already have antibans on it if so.

A few things:

wait(2)    //Wait time is in milliseconds, there may as well not be a wait here..

Lets say you want it to proggy every minute yoy would:

 repeat
  Antiban
  Findspell
  Castspell
  ProgressReport   //Just add this procedure into the loop
 until(false)

However that would make it proggy every time the spell is cast, so lets use the "MarkTime" and "TimeFromMark" procedures to only call it say every 1 minute.

Before the loop starts we want to MarkTime so add something like:

  SetUpSRL;
  DeclarePlayers;
  LogInPlayer;
  StartTime:=GetSystemTime;
  ProgressReport;
  MarkTime(Proggy)   //This is the line I added
 repeat
  Antiban
  Findspell
  Castspell
  ProgressReport
 until(false)

Proggy is a variable so we need to declare that

Var
  stun, x, y, StartTime, Proggy : Integer;

We are storing in "Proggy" the time the script started, then in your progress report we add:

procedure ProgressReport;

var
Sec:integer;

begin

  SRLRandomsReport;


  If(TimeFromMark(Proggy) < 60000) then
    exit;

What this says is "if the time since 'proggy' is less than 60000 miliseconds (1minute) then we exit the procedure,

However then 1 minute into the script it will continuously proggy so we need to tell it when to measure the 60seconds from again so we do this:

procedure ProgressReport;

var
Sec:integer;

begin

  SRLRandomsReport;


  If(TimeFromMark(Proggy) < 60000) then
    exit;


  Sec:= (1+((Getsystemtime-StartTime)/1000));



  Writeln(' ');
  Writeln ('/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\');
  Writeln ('| -->          L0sers Stunn0r '+ Version +'             <-- |');
  Writeln ('\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/');
  Writeln('|' + PadR(' Worked for '+ (TimeRunning) , 49) + '|');
  Writeln('|' + PadR(' Stuns cast '+ IntToStr(stun) , 49) + '|');
  Writeln('|' + PadR(' Location:' + Players[CurrentPlayer].Loc, 49) + '|');
  Writeln ('\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/');

  MarkTime(Proggy) //This is the important line
end;

Hope this helped

Thanks that helped me understand a lot ,but it doesn't fix the proggy because everytime it casts stun it doesn't add a +1 here "IntToStr(stun)" it just stays at 0 the whole time.

If you have used my script you will notice it says "found demon" every time it casts stun.

is there anyway I can implement a +1 to Stuns cast everytime it shows the "found demon" line.

Tested this yesterday for a hour or so , changed the DTM to curse, seems to work really well, good job :)

Thanks perhaps you can give me the curse DTM?

From: loser69
Thanks that helped me understand a lot ,but it doesn't fix the proggy because everytime it casts stun it doesn't add a +1 here "IntToStr(stun)" it just stays at 0 the whole time.

If you have used my script you will notice it says "found demon" every time it casts stun.

is there anyway I can implement a +1 to Stuns cast everytime it shows the "found demon" line.

I have absolutely no experience with Pascal nor SRL so I might misunderstood the problem completely. I just checked your code and integer stun seems to be a global variable as it should. Why not just add Inc(stun) after, lets say, mouse( x, y, 5, 5, true); line?

such as l0ser script ,



jsut kidding gj

hmmm can you tell me what the inc() function does?

Inc() increases an integer by 1.
IncEx(Int, Value) increases an Integer "Int" by the value you desire.

thanks I'l give it a go see what happens.

Updated Proggy Now works yay!

huge thanks to Plekter and RISK.

Nice release thanks for crediting me :p yea A LOT of it looks like mine, but cool nice modification to change it to do something else, good job learning and contibuting!

I prefer supereating though, I think it's more xp/hr AND profitablle, but a lot of people seem to like stunning for some reason hmmm….!

Thanks YoHoJo, I also prefer to superheat but gathering materials takes time unless you already have them, while with stunning or cursing you can start straight away once you get the runes.

Hmm yeah true, you need quite a bit of GP to buy a lot of ores/coal to superheat long enough for it to be pretty constant, this way you can do it right away, but I bet it's quite a money sucker, but hey I've seen lots of people requesting one of these, so nice.

Yea spent like 6m on about 30k soul runes.

Proggy ! still running but what I have so far.

–> L0sers Stunn0r OLDSEX room <– |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
| Worked for 1 Hours, 12 Minutes and 13 Seconds |
| Stuns cast 1156 |
| Experience gained…104040 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| –> L0sers Stunn0r OLDSEX room <– |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
| Worked for 1 Hours, 45 Minutes and 1 Seconds |
| Stuns cast 1585 |
| Experience gained…142650 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Feel free to add this to your thread :)


Fight Pit's Stunning :)

No Randoms
No Reports
No Worries


Sorry about creating my own thread I just thought it would help people more and thats what this community is about.

Doing around 26k mage xp/hr using Curse

will proggy when 55 mage, or when I get a random

Love it when I catch people using my script.

cant find lesser demon!

it always says Exception in Script: Unable to find file 'SRL\SRL.scar' used from '' when i try using it. sorry if this a noob question kind of new :/

I am getting
Exception in Script: Unable to find file 'SRL\SRL\Misc\Stats.simba' used from ''
I had to changed the .scar to .simba because usually thats why it doesn't work. Not in this case.

From: Poofhead
I am getting
Exception in Script: Unable to find file 'SRL\SRL\Misc\Stats.simba' used from ''
I had to changed the .scar to .simba because usually thats why it doesn't work. Not in this case.

yea same here, can u fix it?

I do not know if "grave digging" is allowed, but as this is a script and not a topic, I am assuming it is. I made it work on the Monk of Zamorak in Varrock and made the antiban slightly better as it is a little slower and random. 100% credit goes to l0ser :)