apx900
10-12-2006, 06:36 PM
WELL THIS IS MY FIRST SRL SCRIPT.
I'M NOT RESPONSIBLE FOR WHAT HAPPENS
TO YOU FOR USING THIS SCRIPT.
YOU ARE NOT TO SELL THIS SCRIPT.
YOU ARE NOT TO SAY THAT THIS SCRIPT
WAS MADE BY YOU. IF YOU HAPPEN TO
POST THIS SCRIPT ANY WHERE ELSE OR USE
IS IN ANY OTHER SCRIPT PLEASE MAKE SURE
PROPER CREDITS ARE GIVEN.
if you have any idea on how i can improve
this script please feel free to pm me or post it here.
AND A GREAT THANKS TO :
THE SRL COMMUNITY
&
L337_MACRO
FOR HELPING ME MAKE THIS SCRIPT.
THE SCRIPT REQUIRES SRL 3.4 I BELIVE
ALL YOU DO IS COPY AND PASTE THE CODE
ON TO SCAR AND DRAG THE CROSSHAIR TO
RS AND PRESS PLAY
// ___________ __________ ___ ___
// |aaaaaaaaaa| |pppppppppp| \ \ / /
// |aa| |aa| |pp| |pp| \ \ / /
// |aa| |aa| |pp|____|pp| \ \ / /
// |aa|____|aa| |pppppppppp| \ \/ /
// |aa aaaa aa| |pppp| / /\ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| /__/ \__\
//
//
// Antilogout For Runescape
//
///////////////Created By Apx900////////////
////////Free For All Fagex Members//////////
//////Free For All SRL Forms Members////////
/////You Are Not to sell this Script////////
////////////////////////////////////////////
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
program New;
{.include srl/srl.scar}
{.include srl/srl/skill/WoodCutting.scar}
{.Include SRL\SRL\Misc\PlayerForm.scar}
{.Include SRL/SRL/Extended/xMapWalk.Scar}
var
ModulationY:integer;
trips: integer;
/// -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ ///
procedure Findrandoms;
begin
Findnormalrandoms;
LeaveScreenEvery(1);
if (FindFight) then
begin
Writeln('Shit were in a freaking fight');
RunAwayDirection('E');
wait(6000 + random(99));
RunBack;
Writeln('That was freaking close! Better be glad im watching you!');
end;
end;
Procedure SetModulationy;
begin
ModulationY:=0
ModulationY:=random(2)+1;
end;
procedure Report;
begin
Trips := Trips + 1
wait(500 + random(345))
end;
procedure ProgressReport;
begin
writeln(' ');
writeln('<=================Progress Report================ > ');
writeln('Modulated And Clicked ' + inttostr(Trips) + ' times.');
writeln(' ');
writeln('<=================Randoms Report================ > ');
writeln(' This Script Dosent Have AntiRandoms ');
writeln(' If You Would Like To Help Me Make AntiRandoms ');
writeln(' Please Contact Apx900 On Fagex.net ');
writeln(' ');
writeln('<================================================ > ');
end;
Procedure Clicking;
begin
SetModulationy;
Clickmouse(590,190 + Random(2),true)
Report;
ProgressReport;
Wait(30000 + Random(10000));
SetModulationy;
Clickmouse(652,183 + Random(1),true)
Report;
ProgressReport;
Wait(40000 + Random(10000));
SetModulationy;
Clickmouse(576,178 + Random(2),true)
Report;
ProgressReport;
Wait(60000 + Random(20000));
SetModulationy;
Clickmouse(715,182 + Random(3),true)
Report;
ProgressReport;
Wait(30000 + Random(20000));
SetModulationy;
Clickmouse(554,192 + Random(3),true)
Report;
ProgressReport;
Wait(30000 + Random(20000));
SetModulationy;
Clickmouse(715,182 + Random(3),true)
Report;
ProgressReport;
Wait(15000 + Random(10000));
end;
Procedure actualwork;
begin
SetModulationy;
Clicking;
SetModulationy;
Clicking;
repeat
until(false)
end;
Begin
SetupSRL;
Findrandoms;
actualwork;
end.
I'M NOT RESPONSIBLE FOR WHAT HAPPENS
TO YOU FOR USING THIS SCRIPT.
YOU ARE NOT TO SELL THIS SCRIPT.
YOU ARE NOT TO SAY THAT THIS SCRIPT
WAS MADE BY YOU. IF YOU HAPPEN TO
POST THIS SCRIPT ANY WHERE ELSE OR USE
IS IN ANY OTHER SCRIPT PLEASE MAKE SURE
PROPER CREDITS ARE GIVEN.
if you have any idea on how i can improve
this script please feel free to pm me or post it here.
AND A GREAT THANKS TO :
THE SRL COMMUNITY
&
L337_MACRO
FOR HELPING ME MAKE THIS SCRIPT.
THE SCRIPT REQUIRES SRL 3.4 I BELIVE
ALL YOU DO IS COPY AND PASTE THE CODE
ON TO SCAR AND DRAG THE CROSSHAIR TO
RS AND PRESS PLAY
// ___________ __________ ___ ___
// |aaaaaaaaaa| |pppppppppp| \ \ / /
// |aa| |aa| |pp| |pp| \ \ / /
// |aa| |aa| |pp|____|pp| \ \ / /
// |aa|____|aa| |pppppppppp| \ \/ /
// |aa aaaa aa| |pppp| / /\ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| / / \ \
// |aa| |aa| |pppp| /__/ \__\
//
//
// Antilogout For Runescape
//
///////////////Created By Apx900////////////
////////Free For All Fagex Members//////////
//////Free For All SRL Forms Members////////
/////You Are Not to sell this Script////////
////////////////////////////////////////////
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//Dont Edit Any of this Script or you will fuck it up//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
//----------------------------------------------------------------------------//
program New;
{.include srl/srl.scar}
{.include srl/srl/skill/WoodCutting.scar}
{.Include SRL\SRL\Misc\PlayerForm.scar}
{.Include SRL/SRL/Extended/xMapWalk.Scar}
var
ModulationY:integer;
trips: integer;
/// -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ ///
procedure Findrandoms;
begin
Findnormalrandoms;
LeaveScreenEvery(1);
if (FindFight) then
begin
Writeln('Shit were in a freaking fight');
RunAwayDirection('E');
wait(6000 + random(99));
RunBack;
Writeln('That was freaking close! Better be glad im watching you!');
end;
end;
Procedure SetModulationy;
begin
ModulationY:=0
ModulationY:=random(2)+1;
end;
procedure Report;
begin
Trips := Trips + 1
wait(500 + random(345))
end;
procedure ProgressReport;
begin
writeln(' ');
writeln('<=================Progress Report================ > ');
writeln('Modulated And Clicked ' + inttostr(Trips) + ' times.');
writeln(' ');
writeln('<=================Randoms Report================ > ');
writeln(' This Script Dosent Have AntiRandoms ');
writeln(' If You Would Like To Help Me Make AntiRandoms ');
writeln(' Please Contact Apx900 On Fagex.net ');
writeln(' ');
writeln('<================================================ > ');
end;
Procedure Clicking;
begin
SetModulationy;
Clickmouse(590,190 + Random(2),true)
Report;
ProgressReport;
Wait(30000 + Random(10000));
SetModulationy;
Clickmouse(652,183 + Random(1),true)
Report;
ProgressReport;
Wait(40000 + Random(10000));
SetModulationy;
Clickmouse(576,178 + Random(2),true)
Report;
ProgressReport;
Wait(60000 + Random(20000));
SetModulationy;
Clickmouse(715,182 + Random(3),true)
Report;
ProgressReport;
Wait(30000 + Random(20000));
SetModulationy;
Clickmouse(554,192 + Random(3),true)
Report;
ProgressReport;
Wait(30000 + Random(20000));
SetModulationy;
Clickmouse(715,182 + Random(3),true)
Report;
ProgressReport;
Wait(15000 + Random(10000));
end;
Procedure actualwork;
begin
SetModulationy;
Clicking;
SetModulationy;
Clicking;
repeat
until(false)
end;
Begin
SetupSRL;
Findrandoms;
actualwork;
end.