joelster134
2008-10-06 05:58:57
:fiery: GOBLIN STEALTHZ V1 AND CHICKEN RAPER V3 RELEASED!:fiery:
:sasmokin: Features: Anti-Ban,fast effective killing procedures, will run for long period!:sasmokin:
PLEASE POST BUGS/PROGGIES (just how long it ran)
IF USING CHICKEN RAPER RUN IN ANY CHICKEN LOCATION! LIKEWISE WITH GOBLIN STEALTHZ THE CHICKEN RAPER IS MORE RELIABLE THOUGH.:rolleyes:
[LEFT]:sasmokin: HERE IS THE CHICKEN RAPER:f:
[/LEFT]
{ [-----------------------] o o o o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [-----------------------] o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e L L SSSSSSSSSSS ')
writeln(' [ ] o o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SS')
writeln(' [------------] o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SSSSSSSSSSS SCRIPTS (c) (jOELSTER134)')}
{ [------------]') }
{Start in LUMBRIDGE NORTH CHICKEN COUPE Select window hit run! /\
/\ /\
/\ Version number:3 /\
/\ /\
/\ Created: Joelster134 /\
/\ /\
/\ /\
/\ Features: Anti-randoms+Anti-Ban! /\
/\ /\
/\ Run:Setup lines 39-56 select window hit run! /\
/\ /\
/\ Disadvantage: New scripter...Made need to grease it up a bit/\
/\ /\
/\ NUMBER ONE RULE TO THIS SCRIPT! : ENJOY IT! /\
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
program ChICkEn_RaPeR;
{.include SRL/SRL.scar}
{.include SRL/SRL/skill/Fighting.scar}
const
ChickenColor1 = 857704; // change if you need to
ChickenColor2 = 3430256; //change if you need to
CHickenColor3 = 4897230;//change if you need to
procedure DeclarePlayers;
begin
HowManyPlayers := 1; //how many players
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0; //current player
Players[0].Name := 'Username'; //username!
Players[0].Pass := 'password'; //password
Players[0].Nick := ''; //Nick (3-4 letters of ur name
Players[0].Active := True; //is the player active?
Mousespeed := 10; //SPeed of mouse change if you want (20 maybe)
end;
procedure PreparePlayer;
begin
if not LoggedIn then LoginPlayer;
SetRun(true);
end;
procedure AntiRandoms;
begin
if not LoggedIn then Exit;
FindNormalRandoms;
if FindFight then
RunAway('S',True,1,7000);
end;
procedure AntiBan;
begin
case random(1) of //put in a random number..this way it wont always do the antiban procedure
0: RandomRClick;
1: BoredHuman;
2:HoverSkill('Woodcutting', False);
end;
end;
Procedure KillChicken;
var X, Y,Mark :Integer;
begin
FindObjCustom(x, y, ['tta', 'ack', 'hick', 'ken'], [2572628,6916764,9155272,3627895,5928325], 3);
Mouse(x, y, 2, 2, False);
Wait(25 + Random(100));
if not ChooseOption('ttack') then Exit;
Flag;
MarkTime(Mark);
Wait(2 * 5000 + Random(1000));
if HPPercent < 25 then RunTo('N', true);
Wait(300);
end;
procedure MainLoop;
var Mark : Integer;
begin
repeat
repeat
MarkTime(Mark);
if not LoggedIn then Exit;
KillChicken;
until((TimeFromMark(Mark) / 10000 * 60) >= 50); //60 minutes
until(false);
end;
begin
DeclarePlayers;
PreparePlayer;
MainLoop;
end.
writeln('THE DAWN OF AUTOING IS UPON US ALL! PLEASE READ TUTORIALS AND BEGING MAKING SCRIPTS!')
WRITELN(' KEEP AUTOS ALIVE ALONG WITH SRL! LONG LIVE SRL, LONG LIVE AUTOING!')
[LEFT]:f: AND HERE IS THE GOBBY ONE ENJOY!:f: [/LEFT]
{ [-----------------------] o o o o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [-----------------------] o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e L L SSSSSSSSSSS ')
writeln(' [ ] o o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SS')
writeln(' [------------] o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SSSSSSSSSSS SCRIPTS (c) (jOELSTER134)')}
{ [------------]') }
{ /Start in LUMBRIDGE NORTH GOBBY BUILDING Select window hit run!/\
/\ /\
/\ Version number:1 /\
/\ /\
/\ Created: Joelster134 /\
/\ /\
/\ /\
/\ Features: Anti-randoms+Anti-Ban! /\
/\ /\
/\ Run:Setup lines 39-56 select window hit run! /\
/\ /\
/\ Disadvantage: New scripter...Made need to grease it up a bit/\
/\ /\
/\ NUMBER ONE RULE TO THIS SCRIPT! : ENJOY IT! /\
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/}
program Goblin_Stealthz_K1ll5;
{.include SRL/SRL.scar}
{.include SRL/SRL/skill/Fighting.scar}
procedure Signature;
begin
ClearDeBug;
writeln(' [-----------------------] o o o o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [-----------------------] o o o e eeeeeeeeeeeeee L L SSSSSSSSSSSS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e eeeeeeeeeeeeee L L SS ')
writeln(' [ ] o o o e L L SSSSSSSSSSS ')
writeln(' [ ] o o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SS')
writeln(' [------------] o o o o o e eeeeeeeeeeeeee LLLLLLLLLLLL SSSSSSSSSSS SCRIPTS (c) (jOELSTER134)')
writeln(' [------------]')
wait(4000)
ClearDeBug;
end;
const
GoblinColor1 = 803939;
GoblinColor2 = 7505296;
GoblinColor3 = 6400895;
procedure DeclarePlayers;
begin
HowManyPlayers := 1; //how many players your using
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:= 0; //current player being used
Players[0].Name := 'username'; //username!
Players[0].Pass := 'password'; //password
Players[0].Nick := 'uga'; //Nick (3-4 letters of ur name
Players[0].Active := True; //is the player active?
Mousespeed := 15;
end;
procedure PreparePlayer;
begin
if not LoggedIn then LoginPlayer;
SetRun(true);
end;
procedure AntiBan;
begin
case random(10) of //put in a random number..around 10ish
0: RandomRClick;
1: BoredHuman;
2:HoverSkill('Fishing', False);
end;
end;
procedure StealthzCows;
var x,y,Mark: Integer;
begin
FindObjCustom(x, y,['tta', 'ack', 'obl', 'gob','lin','goblin'],[2572628,6916764,9155272,3627895,5928325], 3);
Mouse(x, y, 2, 2, False);
Wait(25 + Random(100));
if not ChooseOption('ttack') then Exit;
Flag;
MarkTime(Mark);
Wait(2 * 5000 + Random(1000));
if HPPercent < 25 then RunTo('N', true);
Wait(300);
end;
procedure MainLoop;
var Mark : Integer;
begin
repeat
repeat
MarkTime(Mark);
if not LoggedIn then Exit;
StealthzCows;
until((TimeFromMark(Mark) / 10000 * 60) >= 50); //60 minutes
until(false);
end;
begin
DeclarePlayers;
PreparePlayer;
MainLoop;
end.
:f: DONT FORGET TO RATE THREAD/REP ME!:f: