Own ur azz5
2009-08-22 08:15:49
How Long have You Played Runescape?
4 Year(s)
Are you affilated in anyway with Jagex LTD?
No
Were you Referred to SRL?
What is your general programming knowledge?
Java
C++
Pascal
COBAL
CL
HTML
Are you a member of any other communities?
4chan
Tell us about yourself…
Please show us one (or multiple) of your scripts.
4 Year(s)
Are you affilated in anyway with Jagex LTD?
No
Were you Referred to SRL?
What is your general programming knowledge?
Java
C++
Pascal
COBAL
CL
HTML
Are you a member of any other communities?
4chan
Tell us about yourself…
From: Own ur azz5
My name is Cody, I'm a decent scripter/coder, I'm real good in making bots for other RPG games and also RS2. I'm currently a Sophomore but I'm in the most advanced programming class available. Ive been accepted in a lot of HS's and Collages already for my astounding performance, Freshman year i got an award signed from the president for my great improvements in my programming class. overall I'm a good scripter and i would like to be a member in SRL. Thanks a lot :)
Please show us one (or multiple) of your scripts.
SIMPLE AUTO-TALKER:
{==================================================}
{================= AutoTalker V1.0 ================}
{==================================================}
{ Double press F9 to stop the script. }
{==================================================}
Program AutoTalker;
{.include SRL/SRL.Scar}
Var
Messages : Integer;
Const
{=============== EDIT HERE ===============}
Message1 = (' ');
Message2 = (' ');
Message3 = (' ');
{=========================================}
Procedure AntiBan;
Var
X, Y : Integer;
RandomCompass : TStringArray;
Begin
RandomCompass := ['E', 'S', 'W'];
Case Random(100) Of
0: BoredHuman;
1: RandomMovement;
2: PickUpMouse;
3,4: HoverSkill('random', False);
5: MMouse(Random(X), Random(Y), 0, 0);
6: begin
MakeCompass(RandomCompass);
Wait(2500 + Random(1000));
MakeCompass('N');
end;
end;
end;
Procedure AutoTalker;
Begin
TypeSend(AddMistakes(Message1, 20));
Wait(2000 + Random(1000));
inc(Messages);
TypeSend(AddMistakes(Message2, 20));
Wait(1500 + Random(1000));
inc(Messages);
TypeSend(AddMistakes(Message3, 20));
Wait(1750 + Random(1000));
inc(Messages);
AntiBan;
End;
Procedure ProgressReport;
Begin
ClearDebug;
WriteLn('|==================================================|');
WriteLn('| Auto Talker Report |');
WriteLn('|==================================================|');
WriteLn(' Time Running: ' + TimeRunning );
WriteLn(' Messages Said: ' + IntToStr(Messages));
WriteLn('|==================================================|');
WriteLn('| Created By: Own ur azz5. |');
WriteLn('|==================================================|');
End;
Begin
SetupSRL;
ActivateClient;
repeat
AutoTalker;
until(IsFKeyDown(9));
ProgressReport;
End.