SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
yoctown - SRL Member Application Form
yoctown

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
no


Programming Knowledge


Other Communitys
sythe.org (even though i dont really go there)

How Long have You Played Runescape
first 1000 people before wildy came out and most cities

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

well i pretty much learned basic scar scripting way back in the day and stopped playin runescape made a script or two for other games with scar.. came back to runescape like 2 weeks ago.. read a tutorial on scripting scripted that autologin (to test what i learned) and a server changer to apply it to something useful. i pretty much plan to script other things in the future and i started playin runescape when i was like 12 and im 19 now even though i stopped playin for like 3 years so pretty much u should let me be a member :)

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

runescape scripts

program YocsAutoLogin;
{.include SRL/SRL.scar}

procedure login;
var x,y : integer;
begin
if (findcolortolerance(x,y,4471610,465,285,475,295,5)) then
mouse(x,y,40,10,true)
wait(500+random(25))
typesend('username')
typesend('password')
wait(500+random(25))
mouse(300,320,40,10,true)
end;

Begin
activateClient;
wait(200+random(25))
Login;
end.

program YocsServerChanger;
{.include SRL/SRL.scar}

procedure changeservers;
begin
  wait(200+random(30))
  mouse(55,480,40,10,true)
  wait(600+random(200))
  mouse(630,10,3,3,true)
  wait(600+random(200))
  repeat
  case random(4) of
  0: mouse(105,263,35,220,true)
  1: mouse(200,263,35,220,true)
  2: mouse(290,263,35,220,true)
  3: mouse(385,180,35,150,true)
  end;
  until (findcolortolerance(x,y,4471610,465,285,475,295,5))
end;

begin
activateclient;
wait(500+random(50))
changeservers;
wait(500+random(50))
end.

other scripts i made with scar for other games

program New;
var x,y:integer;

procedure killnom;
begin;
wait(100)
if findcolortolerance(x,y,6049082,60,130,425,590,20)
or findcolortolerance(x,y,6049082,575,135,985,670,20)
then
wait(100)
movemousesmooth(x,y)
wait(100)
clickmouse(x,y,true)
wait(3000)
end;

procedure killwm;
begin;
wait(100)
if findcolortolerance(x,y,6049082,60,130,425,590,20)
or findcolortolerance(x,y,6049082,575,135,985,670,20)
then
wait(100)
movemousesmooth(x,y)
wait(100)
clickmouse(x,y,false)
wait(3000)
end;

begin
repeat
if findcolor(x,y,13654016,50,25,55,30)
then
begin killwm;
end
else
begin killnom;
end
until(false)
end.

——————————————————
<!– END TEMPLATE: formanswers –>

Way simple man…

Make a full script
with
multiplayer antiban antirandoms failsaifes good coding

end;
until (findcolortolerance(x,y,4471610,465,285,475,295,5))
end; = failsafe? ya i believe so

:s u believe wrong……..that means u'll be stuk in an endless loop if it doesn't find that colour :D

No, if you at least wrote a script that does something that isn't built in SRL…

That would be a no, these scripts are way to simple. Plus in the last one, clickmouse and movemousesmooth are very detectable.

Try reading my tut (links in sig) Learning the things to become a SRL member, then maybe you can apply again in a month after learning a lot more.

Sorry, its a definite no though.

These are simple looking, even though I'm fairly new. I also suggest focusing on the anti-randoms and anti-ban. You should also make some custom functions/procedures to include in your script, and credit to the people who helped you proofread and test it (unless there are tons of people).