SRL Archive - Archive

stefuck - SRL Member Application


stefuck

2009-10-17 14:04:46

How Long have You Played Runescape?
4 Year(s)


Are you affilated in anyway with Jagex LTD?
no

Were you Referred to SRL?
freddy1990


What is your general programming knowledge?
only scar thing:P


Are you a member of any other communities?
no


Tell us about yourself…
From: stefuck
im a kind person who want to help other peoples. im addicted to my computer because peoples treat me bad in my life so i dont come out alot.



Please show us one (or multiple) of your scripts.
program AutoFighter;
//By: stefuck also known as widurski16
const
MonsterColor= 10989487;//replace with color of the creature to be fought
MonsterColor2= 9936542;
bmppickcolor= 11712699;
SkyColor= 3478561;
LowHealth= 255;
MedLowHealth= 2070783;
MedHighHealth= 65535;

var
x,y: integer;

procedure Login;
begin
if (findcolortolerance (x, y, SkyColor, 18, 17, 498, 327, 5)) then
begin
clickmouse(381, 183, true)
wait(1000+random(500))
sendkeys('new name')//replace username with your username
wait(1000+random(500))
clickmouse(370, 336, true)
wait(1000+random(500))
sendkeys('new pass')//replace password with your password
wait(1000+random(500))
clickmouse(380, 380, true)
wait(4000+random(500))
movemousesmooth(382, 353)
clickmouse(382, 353, true)
end
else
end;

procedure CheckHealth;
begin
if (findcolortolerance (x, y, MedLowHealth{adjust depending on monster}, 723, 26, 740, 38, 5)) then
begin
if (findcolortolerance (x, y, 5264753{put the food color here}, 558, 210, 730, 460, 5)) then
clickmouse(x, y, true);
end
else
end;

procedure FindAndAttackMonster;
begin
wait(2000+random(1000))
if (findcolortolerance (x, y, MonsterColor, 18, 17, 498, 327, 5)) or
(findcolortolerance (x, y, MonsterColor2, 18, 17, 498, 327, 5)) then
begin
clickmouse (x, y, true);
wait(7000+random(2000))//adjust the times as needed
sendarrowwait(0+random(4), 1150+random(950));
end
else
sendarrowwait(0+random(4), 700+random(850));
writeln('Could not Find')
wait(2000+random(1000))
findcolor(x, y, bmppickcolor, 577, 35, 693, 150);
end;

begin
Login;
wait(5000+random(1750))
repeat
CheckHealth;
FindAndAttackMonster;
until false
end.




thats my first script its bad but when i have some more time soon il read more tuts

JAD

2009-10-17 14:05:48

Sorry ste****, but this is not complex enough to get SRL members. Did you try the Mouse/MMouse/TypeSend SRL commands I told you about in your other thread?

This is a good start, but you still have a lot more to learn. Just read up on some tutorials and better luck next time!

~JAD

stefuck

2009-10-17 14:12:48

From: JAD
Sorry ste****, but this is not complex enough to get SRL members. Did you try the Mouse/MMouse/TypeSend SRL commands I told you about in your other thread?

This is a good start, but you still have a lot more to learn. Just read up on some tutorials and better luck next time!

~JAD



oke delete the topic then:P il try in next month no time this days for scripting almost vacation so then il do my best

greetz stan

Sabzi

2009-10-17 14:15:07

As the title says:
SRL Membership - READ before applying to members!
From this you will know what you need to have a successful application.