SRL Archive - First Scripts

Whith My Auto Login Its Simple It Will Open Intenet And Then Go Into The Login Pag And Even Log You In (all Bug Reports Pm Me Also It Only Logs You Into Member Worlds And Mor Of A Prob To Work You Must Have Rs As Ur Hompage And The Bowser Bar Must Have Exactly This Many Things The Bowsing Bar And A Toolbar That Is Exactly As Thin As Zangos [banana]( I Recomend Zangos Hers A Pic.)[/banana] (its An Attachment)

(it Works Whith Or Whithout Srl) (works For All Loading Time)
(also On The Side The World Loading Waits 2 Mins Sorry About That.)
Heres The Scar:

From: siraren3
Whith My Auto Login Its Simple It Will Open Intenet And Then Go Into The Login Pag And Even Log You In (all Bug Reports Pm Me Also It Only Logs You Into Member Worlds And Mor Of A Prob To Work You Must Have Rs As Ur Hompage And The Bowser Bar Must Have Exactly This Many Things The Bowsing Bar And A Toolbar That Is Exactly As Thin As Zangos [banana]( I Recomend Zangos Hers A Pic.)[/banana] (its An Attachment)

(it Works Whith Or Whithout Srl) (works For All Loading Time)
(also On The Side The World Loading Waits 2 Mins Sorry About That.)
Heres The Scar:

I AM NOW WORKING ON A ESSENCE MINER AND IT WILL HAVE ANTIBAN.

Ouch man! This script has quite a few problems :(
Instead of using MMouse and ClickMouse functions you should just simply use Mouse. That will mean it is less detectable.
I think this needs serious fixing…

program Mws;
{.include srl/srl.scar}

Const
 UserName=''; //Type Username here
 UserPassword=''; // Type pass here

Procedure StLogin;
var
  X, Y, G, J, O, P, r, w, l, b, s, z, e, t: INTEGER;
begin
if findcolor(x, y, 11762435, 10, 3, 65, 75)then
  Mouse(x,y,3,3,true);
  sleep(32000);
if findcolor(g, j, 5821947, 713, 447, 925, 547)then
  Mouse(g,j,3,3,true);
  sleep(20000);
if findcolor(o, p, 5726846, 215, 364, 622, 598)then
  Mouse(o,p,3,3,true);
  sleep(15000);
if findcolor(r, w, 5623804, 575, 434, 785, 559)then
  Mouse(r,w,3,3,true);
  sleep(120000)
if findcolor(l, b, 13158, 535, 306, 601, 343)then
  Mouse(l,b,3,3,true);
  TypeSend(UserName);
  sleep(20000);
if findcolor(s, z, 6063521, 501, 471, 619, 483)then
  Mouse(s,z,3,3,true);
  wait(9999);
  TypeSend(UserPassword);
if findcolor(e, t, 13158, 534, 502, 596, 526)then
  Mouse(e,t,3,3,true);
end;

Begin
  SetupSRL;
  StLogin;
end.

Did u actually test it? Fix Waits from Wait(Number) to Wait(Number+Random(Number));
Should be okay. Dont attempt to make a script without SRL or u WILL get banned.

please note that

if findcolor(l, b, 13158, 535, 306, 601, 343)then
Mouse(l,b,3,3,true);
TypeSend(UserName);

is the only line which gets executed XD
So if all those points are infact FALSE then your code will give :

Lots of sleeps
TypeSend(UserPassword);
TypeSend(User);

Then that's pretty much it XD

you need if() begin end

Okay im gonna say it once and hopefully you'll understand.

DO NOT DOWNLOAD ZANGO!

Not under any circumstances! It's spyware and seriously slows your PC down, if you do have it installed I recommend you delete it from your program files folder as it is very difficult to get rid of.

Taken from http://en.wikipedia.org/wiki/Zango

"StopBadware.org lists a number of undesirable behaviors associated with Zango Easy Messenger, including "behaves as spyware", "automatically runs on startup", "displays pop-up advertisements", "installs adware", and "bundled software cannot be closed"."

These include a failure to include an on-screen disclosure of material terms, widespread in-toolbar ads without the labeling and hyperlinks, ads for "bogus Sites that attempt to defraud users" and third party installations without any disclosure whatsoever.

So now you know dont download Zango!

I was only giving him something to work on. But this would be a disaster if used lol

Doesn't work?

I'm not saying it doesn't work, i'm just informing you not to download Zango as he says. I havn't tried this script myself but he tells you to download Zango which is adware.

Try the script yourself to see if it works.