SRL Archive - First Scripts

:sasmokin:CHICKEN RAPER V10 RELEASED!:sasmokin:

Version Details:
Version1: Crap no anti randoms-ban
Version 2:Ran short time anti-ban
Version 3: Ran ok shorttime anti-ban-randoms
Version4:Has anti randoms-ban! works great!
Version 5: Has better Anti randoms+ anti ban! Can run for hours! Version 6: Pickups feathers has anti randoms+ anti ban!
Version 7: Now has proggy!!! plz post em!!
Version 8: Faster Chicken finding + fixed feather count!
Version 9: Less anti-ban faster kills + some minor bugs fixed
Version 10: fixed feather pickup ,and some minor bugs

PLEASE POST BUGS/SUGGESTIONS AND RATE THREAD+REP ME!!

[LEFT]Credits: Me(script+randoms+antiBan),TheVoiceInYourHead(fixing errors/feather procedure!),In2it(Idea for feather pickups!)
Jagex:making Runescape
SRl:Tutorials!
AND D1S3L[/LEFT]



SRL RANDOMS REPORT!: (RANDOMS DEFINATLEY WORK!)/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 25 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talks : 3 |
| Old Men : 1 |
| Capn Hands : 2 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


RESERVED FOR TOP PROGGYS!!!
1.

From: killerking 9
================================================== =
|| Chickenz Killed: 56 ||
|| Featherz Gathered: 680 ||
|| Ran For: 5 Minutes and 34 Seconds ||
================================================== =

2.

From: in2it
===================================================
===================================================
|| Chickenz Killed: 4 ||
PROBLEM: inv interface not open
|| Featherz Gathered: 25 ||
|| Ran For: 5 Minutes and 32 Seconds ||
===================================================

3.

From: megaheat


===================================================
|| Chickenz Killed: 227 ||
|| Feathurs: -330 ||
|| Ran For: 1 Hours, 12 Minutes and 15 Seconds ||
===================================================

4.================================================== =
|| Chickenz Killed: 439 ||
|| Feathurs: -1855 ||
|| Ran For: 3 Hours, 59 Minutes and 56 Seconds ||
================================================== =
5.

Good to see you didnt left you password in this time :duh:

hahaha thanks, i thought and checked it b4 posting this time :)

From: gl3nni
Good to see you didnt left you password in this time :duh:

haha lol :P
Me and Joelster are creating script together, and when he sended me the finsihed part of his script it also contained his password :duh: but dont wory i wont hack you ;) just change if you want…

nice script btw, good that you used FindObjCustom and ChooseOption :)

oh, and if you read this…. i finished our script! :D

sweet,thanks,and yeah im a bit dumb :p:duh:

ill try out =)

Thanks, please tell me how it ran/bugs! or just PM either way..

Thats good script. It works fine and its easy to use :)

Thank you..please post on here how many lvls it gained…it wont be in a proggy but just remember wat u started/finished at please :) thanks for feedback though im glad its easy to use :p

BTW if your interested in your first script being an auto fighter add me on msn or PM me [email]Joelster134@hotmail.com[/email]

Dont forget to rep if you can! (blue tick box under my Posts:)

oo…cool…this gonna be first script ima ever try on SCAR…for my pure

From: akha618
oo…cool…this gonna be first script ima ever try on SCAR…for my pure

Sweet please post bugs/suggestions!

New Version RELEASED! V5 Has improved Anti-ban + Better Anti-Randioms

Don't care bout proggys and ain't gunna add one…I WILL update the script more often if i get MORE feedback! such as bugs etc…


Sorry for Double post…New version and no1 had posted before hand so yeah..

ok, looks good :) havent tested it. but it should work OK :D

Thanks, please post how it runs and any bugs.

just stops when it right clicks a chicken…
it gives me this error:
[Runtime Error] : Exception: Access violation at address 006D5360 in module 'scar.exe'. Read of address 00000034 in line 24 in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/AntiRandoms/Box.scar
can somebody help me?

Thank you. i got same error. ill try fix it, just download the previous version instead :)


and iced….what's "nice" mean?

Didn't work for me
somehow none of my scripts are clicking
and I don't have silent mouse option
dam =(

Download SRL 4 + get latest Rev…also try reinstalling SCAR, as for not working. download V4 as V5 isnt working atm.

sweet script man looking forward to using

V5 UPDATED SHOULD NOW RUN! HAS ANTI RANDOMS+ ANTI-BAN! PLEASE POST HOW IT RAN/ANY BUGS!!

Download V5 (from top of page) or Copy and paste in the script to EMPTY SCAR page.

I'm fixing the standards, and I'll try to add a Feather Picker Upper.

         {             [-----------------------]        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:5                                            /\
        /\                                                             /\
        /\ Credits: Joelster134,                                       /\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban!                            /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       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!
  Players[0].Pass   := ''; //password
  Players[0].Nick   := 'uga'; //Nick (3-4 letters of ur name
  Players[0].Active := True; //is the player active?

  {Players[1].Name   := 'Username'; //username!
  Players[1].Pass   := 'password'; //password
  Players[1].Nick   := ''; //Nick (3-4 letters of ur name
  Players[1].Active := True; //is the player active?

  Players[2].Name   := 'Username'; //username!
  Players[2].Pass   := 'password'; //password
  Players[2].Nick   := ''; //Nick (3-4 letters of ur name
  Players[2].Active := True; //is the player active? }

end;

procedure PreparePlayer;
begin
  if not LoggedIn then LoginPlayer;
  SetRun(True);
end;

//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms thanks//
//to Ocean's 1 willow choppa //
//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
procedure AntiRandoms;
begin
  if not LoggedIn then Exit;
  FindNormalRandoms;
end;


procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  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));
  AntiBan;
  AntiRandoms;
  if HPPercent < 25 then RunTo('N', true);
  Wait(300);
  if HPPercent <100 then FindNormalRandoms;
end;


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    begin
      Flag;
      Result := True;
    end;
  end;
end;

procedure MainLoop;
var
  Mark : Integer;
begin
  repeat
    MarkTime(Mark);
    repeat
      if not LoggedIn then Exit;
      KillChicken;
      PickupFeathers;
    until((TimeFromMark(Mark) / 10000 * 60) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  DeclarePlayers;
  PreparePlayer;
  MainLoop;
end.

Added a feather picker upper, fixed standards, removed unnecessary things, added things that needed implemented, added SetupSRL;.

You made the AntiRandoms; procedure, but never called it =]

PROGGIE
Time worked for: 1 hr 23 mins
Killed: 245 chickens
XP Gained: 10.5k
Randoms: Heaps:f:




:fiery: :fiery: :sasmokin: :eek: :garfield: :bart: :) :(h): :p :f:

Version six is now out has Feather pickups (made by TheVoiceInYourHead) REP TO YOU!

LOOKING FORWARD TO V6 then i can sell all my feathers for $$$$ good job mate :f:

hey it worked but does it run away wen its getting killed because my died.. not sure y though wasnt lookin =p

Which Version were you using, it depends.

lastest 1

Did it pick up the feathers? do you have reflection??

yeah it picked up feathers and i do have reflection

nvm bro its because the gate was closed anyway i saw it do a bunch of randoms thx :D

Hmmm. You could've just edited your post. But, meh.

And, Joelster, your welcome on the feather procedure xD

can u post how to type the stff in im new (minus the username and pass) i whana see where to put stff in and how

goodhope, read a tutorial or two on how to setup players.

i agree with The but just for you :p


in

Players[0].User:='Username';//type your name in between the ' ' eg : 'fred';

same with pass nick etc…nick (short for nickname is 3-4 letters of around ur middle part of ur username eg : retardsrus ('dsru')


that's all ..:D

Also i think it dosn't run for me because i don't have reflection :p The did ur feather procedure require reflection?

WEll after i got Reflection it ran fine :) Gunna add in a proggy report soon so you guys can post errors etc! :D

guys if you wanna use feather picker get Reflection :)

Program New;
 
Var
  Download: TStringArray;
  Downloaded: Array[0..10] Of String;
  IHI, Files: Integer;
  currentver, currentversion: string;
 
const
  thisversion    = 97;
 
 
 
Procedure DownloadFiles;
Begin
  For IHI := 0 To High(Download) Do
  Begin
    Downloaded[ihi] := GetPage('http://scarreflection.googlecode.com/svn/trunk/' + Download[ihi]);
    WriteLn(download[ihi]);
  End;
End;
 
Procedure Install;
Begin
  For Ihi := 0 To High(Download) Do
  Begin
    Files := RewriteFile(AppPath + '\Includes\SRL\SRL\Reflection\' + Download[ihi], False);
    WriteFileString(Files, Downloaded[ihi]);
    CloseFile(Files);
  End;
End;
 
Procedure AutoUpdate;
 
begin
  Download := ['Changelog.txt', 'Characters.Scar', 'Core.scar',
  'Depreciated.scar', 'Hooks.Scar', 'Objects.Scar', 'README.txt',
  'Reflection.Scar', 'Walking.Scar', 'Items.scar'];
  currentver     := GetPage('http://scarreflection.googlecode.com/svn/trunk/');
  currentversion := Between('<title>Revision ', ': /trunk', currentver);
  WriteLn('Our current version is: '+inttostr(thisversion)+' and the latest version is: '+currentversion);
  If (thisversion = strtoint(currentversion)) then
  begin
    WriteLn('We got the latest Reflection !');
    exit;
  end else
  begin
    DownloadFiles;
    Install;
  end;
end;
 
Begin
  AutoUpdate;
End.
 

run that to get reflection then download script! (on page 1 aswell)

No, it uses DTM Finding.

Can someone help me add in a proggy..this is what ive got so far…WILL ADD TO CREDS + REP YOU!

         {             [-----------------------]        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:6                                            /\
        /\                                                             /\
        /\ Credits: Joelster134, TheVoiceInYourHead,in2it(feather idea)/\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban! + feather pickup!          /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       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   := 'uga'; //Nick (3-4 letters of ur name
  Players[0].Active := True; //is the player active?
  players[0].Integers[0]:=1000; //Amount of chickens you wanna kill

  {Players[1].Name   := 'Username'; //username!
  Players[1].Pass   := 'password'; //password
  Players[1].Nick   := ''; //Nick (3-4 letters of ur name
  Players[1].Active := True; //is the player active?

  Players[2].Name   := 'Username'; //username!
  Players[2].Pass   := 'password'; //password
  Players[2].Nick   := ''; //Nick (3-4 letters of ur name
  Players[2].Active := True; //is the player active? }

end;

procedure PreparePlayer;
begin
  if not LoggedIn then LoginPlayer;
  SetRun(True);
end;

//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms       //

procedure AntiRandoms;
begin
  if not LoggedIn then Exit;
  FindNormalRandoms;
end;


procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    5: HoverSkill('Smithing', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  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));
  AntiBan;
  AntiRandoms;
  if HPPercent < 25 then RunTo('N', true);
  Wait(300);
  if HPPercent <100 then FindNormalRandoms;
end;

//---------->>FEATHER PICKUP MADE BY TheVoiceInYourHead<<-------------------\\


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    begin
      Flag;
      Result := True;
    end;
  end;
end;
procedure ProgressReport;
begin
  writeLn('${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}$');
  writeLn('                     ChickenRaper V6 Feather Pickup');
  writeLn('                 Ran for: ' + TimeRunning);
  Writeln('                 ToTalChickensRaped: ' + IntToStr(ChickenCount) + ' out of ' + IntToStr(Players[CurrentPlayer].Integers[0]) + ' Chicken.');
  writeLn('${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}${}$');


procedure MainLoop;
var
  Mark : Integer;
begin
  repeat
    MarkTime(Mark);
    repeat
      if not LoggedIn then Exit;
      KillChicken;
      PickupFeathers;
      ProgressReport;
    until((TimeFromMark(Mark) / 10000 * 60) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  DeclarePlayers;
  PreparePlayer;
  MainLoop;
end.

Nice work Joel, the Speed of the mouse could be faster (which you can change in script tho) my first try it went for 15mins ( i stopped it) xp gained like 2.5k and got a few randoms :f:

Thanks for feedback mate…just increase mouse speed if you want :) adding in a proggy so ppl can post on here soon :)

K Cool PM when proggie is up so i can show how good your script is :)

Will do add me to buddies :)

New Updates: MouseSpeed+ added in more Anti Randoms. :)

Cool its even better now with MORE anti randoms and anti ban

Thanks please post how it runs/if it dies :) i wanna make this as best as i can!

the more feedback the more ill update

Need a good yew /banker for edgville and lumby flax spinner if you can help PM me or send me the Script :f: TY

Bugs: Keeps right clicking on Raw chicken after icking up feathers…FIXED!

put this into SCAR i fixed the chicken colors+ mouse speed is slower (was to fast before)

         {             [-----------------------]        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:6                                            /\
        /\                                                             /\
        /\ Credits: Joelster134, TheVoiceInYourHead,in2it(feather idea)/\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban! + feather pickup!          /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       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!
  Players[0].Pass   := '**************'; //password
  Players[0].Nick   := 'equ'; //Nick (3-4 letters of ur name
  Players[0].Active := True; //is the player active?

  {Players[1].Name   := 'Username'; //username!
  Players[1].Pass   := 'password'; //password
  Players[1].Nick   := ''; //Nick (3-4 letters of ur name
  Players[1].Active := True; //is the player active?

  Players[2].Name   := 'Username'; //username!
  Players[2].Pass   := 'password'; //password
  Players[2].Nick   := ''; //Nick (3-4 letters of ur name
  Players[2].Active := True; //is the player active? }
  
  Mousespeed:= 10;

end;

procedure PreparePlayer;
begin
  if not LoggedIn then LoginPlayer;
  SetRun(True);
end;

//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms       //

procedure AntiRandoms;
begin
  if not LoggedIn then Exit;
  FindNormalRandoms;
end;


procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    5: HoverSkill('Smithing', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  end;
end;


procedure KillChicken;
var
  X, Y, Mark: Integer;
begin
  FindObjCustom(x, y, ['tta', 'ack', 'chi', 'ken'], [4300721, 989558, 9812173, 3627895, 2047829], 3);
  Mouse(x, y, 2, 2, False);
  Wait(25 + Random(100));
  AntiRandoms;
  if not ChooseOption('ttack') then
  Flag;
  MarkTime(Mark);
  Wait(2 * 5000 + Random(1000));
  AntiBan;
  AntiRandoms;
  if HPPercent < 25 then RunTo('N', true);
  Wait(300);
  AntiRandoms;
end;

//---------->>FEATHER PICKUP MADE BY TheVoiceInYourHead<<-------------------\\


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    AntiRandoms;
    begin
      Flag;
      Result := True;
      AntiRandoms;
    end;
  end;
end;

procedure MainLoop;
var
  Mark : Integer;
begin
  repeat
    MarkTime(Mark);
    repeat
      if not LoggedIn then Exit;
      KillChicken;
      PickupFeathers;
      AntiRandoms;
      AntiBan;
    until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  DeclarePlayers;
  PreparePlayer;
  MainLoop;
end.

IT RAN FOR A HOUR NO PROBLEMS :) (was at a school meeting and tested :p)

nice script;)

Wow suspended..waht for if i may ask? also In2it if you want a Yew chopper/bank ask me on msn and i will discuss making one with you.

The way you changed the mouse speed, I believe you made it move slower.

Try moving it to a higher number.

15 is SRL's default, try 20.

It doesn't really matter what mouse speed you use >.<

kk when it was on 20 it seemed really fast so i changed it and it slowed down.

Oh. Well, 15 is SRL's default. So, just completely take MouseSpeed out of your script, if you want to use 15.

KK to add a proggy to this (i wanna see how long it can run) wuld i add in under chicken colors

CHickensToKill = 100;

then like if(chickenKilled +1))
progressreport?

Yes.

Well, you could do something like

if (ChickensKilled >= (ChickensToKill/2)) then
  ProgressReport;

But you would have to run that everytime it clicks a chicken.
And you would also have to make sure that ChickensKilled gets increased by 1 everytime you click a chicken.

Small proggie
ran for: 1 hour :P
got 2800 feathers.
and had bout 3 mysterious box

btw: mouse speed just makes it move faster not really click faster…

willie, he never said it did make it click faster. Lol.

Nice proggie, btw.

But for some reason I highly doubt that in an hour you got 2800 feathers.

I'm going to run this tonight and see how long it can run without something bad happening. I might try it on a solo account, and then multiple. Though if I do multiple I'll have to wait till I get a 24 hour shot at a computer.

problem after it got about 2000 feathers it stopped picking them up any idea??

Might be this

until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes

might wanna make it run longer.. will add in a actual progress report but what you can do so i WILL update is this : Open NotePad type in Xp ATM:= //the exp u have started it at one which skill

Xp After testing/running: how much exp u got (subtract ur current from th total when stopped)

Divide by 12)

Thats amount of chickens killed…

count feathers…

post SRL Randoms Report :)

it can run for a long amount of time :) add me to buddies /pm me for questions/suggestions!

That will confuse you or him to death.

At the beginning of each login, call

StartXP := GetSkillAmount('attack');

or whatever the GetSkillAmount variables are.

and then, before the proggy report, call TotalXP := GetSkillAmount('attack') - StartXP;

Then, do TotalXP := TotalXP / 12;

That will tell you how many chickens you've killed.

Thank voice….i will add in a proggy report after SRL is up and running again….are ALL scripts down? or isi it just SMART, i think its the login procedure personally but im not sure….i wanna know if Non-SMART/non-reflection scripts will work stil..

Login.scar is broken.

Zephyr posted a fix.

Non-SMART and Non-Reflection scripts will work still, as long as they use the client at http://runescape.com/

Theres an error in my Gametab.scar…the new one by Zephfurys dosnt compile?

Only problem i found is that it occasionally clicked off the actual play screen, maybe a problem on my end though, who knows lol

Well if it works be happy :) new rs update ruined it me thinks

Rofl, there was a chicken nugget ad on the top of the web page when I opened this xD - well I'm going to download this and start a new maul pure… :D

This is a very good script for defence pures, i will definatly use if you dont mind, and hopefully i will get 40 deffence soon.

From: th3ko
This is a very good script for defence pures, i will definatly use if you dont mind, and hopefully i will get 40 deffence soon.

Feel free to use it, just post how it ran for you and if there was any bugs/errors…also if you have questions/need help add me on msn [email]joelster134@hotmail.com[/email], or on Runescape: aimf0rhead (the 0 is the number :p)

Hi im new to SCAR, i loaded your script input my use credentials, have silent mouse off, and clicked run and i got this error:

Line 33: [Error] (33:1): Unable to register function function FindGapsTPA(TPA : TPointArray; MinPixels: Integer): T2DPointArray; in script C:\DOCUME~1\Owner\LOCALS~1\Temp\CHICKEN RAPER V6!.scar

I have no idea whats wrong, any help please?

From: thebluefiend
Hi im new to SCAR, i loaded your script input my use credentials, have silent mouse off, and clicked run and i got this error:

Line 28: [Error] (28:1): Unable to register function function FindGapsTPA(TPA : TPointArray; MinPixels: Integer): T2DPointArray; in script C:\DOCUME~1\Owner\LOCALS~1\Temp\Chicken Pwner! Non Smart.scar

I have no idea whats wrong, any help please?

http://www.villavu.com/forum/showthread.php?t=25985 go here that should help

Check wat type of SRL version you have also check what Rev version you have..add me on msn [email]joelster134@hotmail.com[/email] for more help if u need it or just add me to buddies list…

Ah i had an older version of SCAR, thats why. Ok man thanks.

How long does this script run for? I'm thinking of starting a new account for PvP updates- This could start me off quite nicely.


Also is there a setting for.. say… End Script After 2:30

From: Fromaaz
How long does this script run for? I'm thinking of starting a new account for PvP updates- This could start me off quite nicely.


Also is there a setting for.. say… End Script After 2:30

At

Line:160  until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes

edit that it will make it run longer/shorter..

From: thebluefiend
Ah i had an older version of SCAR, thats why. Ok man thanks.

ADD ME TO BUDDIES/MSN IF YOU NEED MORE HELP! [email]Joelster134@hotmail.com[/email] or Add me on RUnescape (Aimf0rhead)

No problem glad to help :D

Nice first script. Few bugs but works :)

It shuouldn't be working? lol,….all SRL scripts are broken atm, + what are the bugs? be more specific in your posts please

FIXED IT UP NOW IT RUNS :p

         {             [-----------------------]        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:6                                            /\
        /\                                                             /\
        /\ Credits: Joelster134, TheVoiceInYourHead,in2it(feather idea)/\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban! + feather pickup!          /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       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




//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms       //

procedure AntiRandoms;
begin

  FindNormalRandoms;
end;


procedure AntiBan;
begin

  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    5: HoverSkill('Smithing', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  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));
  AntiRandoms;
  if not ChooseOption('ttack') then Exit;
  Flag;
  MarkTime(Mark);
  Wait(2 * 5000 + Random(1000));
  AntiBan;
  AntiRandoms;
  Wait(300);
  AntiRandoms;
end;

//---------->>FEATHER PICKUP MADE BY TheVoiceInYourHead<<-------------------\\


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    AntiRandoms;
    begin
      Flag;
      Result := True;
      AntiRandoms;
    end;
  end;
end;

procedure MainLoop;
var
  Mark : Integer;
begin
  repeat
    MarkTime(Mark);
    repeat
      KillChicken;
      PickupFeathers;
      AntiRandoms;
      AntiBan;
    until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  MainLoop;
end.

Joelster, you don't compile any of the SRL includes.

You just compile your scripts.

tried this last night its pretty decent =]

lolkill you nub u didn't even try it…. how u know if its decent.:google:

Voice anti randoms dont work anymore?

also dont download the one above…download from first page in here :)

Imma try this later.

'chicken raper' isnt a real good name..

From: Darando
'chicken raper' isnt a real good name..

Neither is Darando.

From: Darando
Imma try this later.

'chicken raper' isnt a real good name..

Yea what would you prefer? at least you prolly leeched this script and wont post on here again :p so stfu. go make ur own scripts then you can complain bout my names.

You don't want people who spam to get free Jr. Member running your script.

They'll never post proggies.

How's it looking so far, Joelster?

Chicken raper is good name yeah better then Darando
:f: :f:

From: TheVoiceInYourHead
You don't want people who spam to get free Jr. Member running your script.

They'll never post proggies.

How's it looking so far, Joelster?

True but they can post feedback/SRL randoms report…thats if randoms are still up after update:confused:

Randoms still work after the update :]

I think a few of them [box, etc] are having difficulties though.

kk i prolly didnt set my nick right….


VERSION 7 RELEASED NOW YOU GUYS CAN POST PROGGIES!!

Note: it counts feathers in bag…so plz start with none there..

===================================================
|| Chickenz Killed: 2 ||
|| Featherz Gathered: 1270 ||
|| Ran For: 1 Minutes and 54 Seconds ||
===================================================

thats what i mean

You don't have some of your functions set up right.
EDIT: Use this as your KillChicken procedure:

function KillChicken: boolean;
var
  X, Y, Mark, Check: Integer;
begin
  Check := ChickensKilled;
  if FindObjCustom(x, y, ['tta', 'ack', 'hick', 'ken'], [2572628, 6916764, 9155272, 3627895, 5928325], 3) then
  begin
    Mouse(x, y, 2, 2, False);
    Wait(25 + Random(100));
    AntiRandoms;
    if not ChooseOption('ttack') then Exit;
    Flag;
    MarkTime(Mark);
    Wait(2 * 5000 + Random(1000));
    AntiBan;
    AntiRandoms;
    if HPPercent < 25 then RunTo('N', true);
    Wait(300);
    AntiRandoms;
    Inc(ChickensKilled);
    if ChickensKilled>Check then
      Result := True;
  end;
end;

It will result true if it kills a chicken. It will also increase ChickensKilled every time it clicks a chicken. This is because I used your FindObjCustom as a boolean, instead of a procedure as you did.

yea i knowz ill fix up laters helpin in2it atm

Also, the feather counting procedure won't be efficient enough. You need to have it count the feathers at the beginning, then have it count them at the end.

EDIT: Here's the script with a working feather counter, a few standards fixed, and a few other things I thought might help you. If you don't understand something in it, PLEASE ASK!

         {             [-----------------------]        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:6                                            /\
        /\                                                             /\
        /\ Credits: Joelster134, TheVoiceInYourHead,in2it(feather idea)/\
        /\Creds also to d1s3l for Counting/proggy!!!!!!!!!!!!!!!!!!!!1 /\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban! + feather pickup!          /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       NUMBER ONE RULE TO THIS SCRIPT! : ENJOY IT!           /\
        /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/}



program Chicken_Raper;
{.include SRL/SRL.scar}
{.include SRL/SRL/skill/Fighting.scar}

var
  ProggyTimer, ChickensKilled,
    FeathersDTM, FeatherCountStart: Integer;

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!
  Players[0].Pass   := ''; //password
  Players[0].Nick   := 'sdef'; //Nick (3-4 letters of ur name
  Players[0].Active := True; //is the player active?

  {Players[1].Name   := 'Username'; //username!
  Players[1].Pass   := 'password'; //password
  Players[1].Nick   := ''; //Nick (3-4 letters of ur name
  Players[1].Active := True; //is the player active?

  Players[2].Name   := 'Username'; //username!
  Players[2].Pass   := 'password'; //password
  Players[2].Nick   := ''; //Nick (3-4 letters of ur name
  Players[2].Active := True; //is the player active? }
  
  Mousespeed:= 20;

end;

procedure PreparePlayer;
begin
  if not LoggedIn then LoginPlayer;
  FeathersDTM:= DTMFromString('78DA637461626078C28002D62C5CC06003A41' +
       '981F83F1030FA02D55C6740038C482490F600AA794E408D0D50CD' +
       '5B026AEC806A1EE257030001080C01');
  SetRun(True);
  FeatherCountStart := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
  FreeDTM(FeathersDTM);
end;

//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms       //

procedure AntiRandoms;
begin
  if not LoggedIn then Exit;
  FindNormalRandoms;
end;


procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    5: HoverSkill('Smithing', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  end;
end;

procedure Report;
var
  FeathersPicked: Integer;
begin
  FeathersPicked := FeatherCountStart - Players[CurrentPlayer].Integers[1];
  WriteLn('===================================================');
  WriteLn(Padr('|| Chickenz Killed: ' + IntToStr(ChickensKilled), 49) + '||');
  WriteLn(Padr('|| Feathurs: ' + IntToStr(FeathersPicked), 49) + '||');
  WriteLn(Padr('|| Ran For: ' + TimeRunning, 49) + '||');
  WriteLn('===================================================');
end;
  
function InventoryCount: Integer;
var
  i: Integer;
begin
  GameTab(4);
  Result := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
  FreeDTM(FeathersDTM);
  for i := 1 to 28 do
    if (ExistsItem(i)) then
      Result := Result + 1;
end;


function KillChicken: boolean;
var
  X, Y, Mark, Check: Integer;
begin
  Check := ChickensKilled;
  if FindObjCustom(x, y, ['tta', 'ack', 'hick', 'ken'], [2572628, 6916764, 9155272, 3627895, 5928325], 3) then
  begin
    Mouse(x, y, 2, 2, False);
    Wait(25 + Random(100));
    AntiRandoms;
    if not ChooseOption('ttack') then Exit;
    Flag;
    MarkTime(Mark);
    Wait(2 * 5000 + Random(1000));
    AntiBan;
    AntiRandoms;
    if HPPercent < 25 then RunTo('N', true);
    Wait(300);
    AntiRandoms;
    Inc(ChickensKilled);
    if ChickensKilled>Check then
      Result := True;
  end;
  Players[CurrentPlayer].Integers[1] := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
  FreeDTM(FeathersDTM);
end;

//---------->>FEATHER PICKUP MADE BY TheVoiceInYourHead<<-------------------\\


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    AntiRandoms;
    begin
      Flag;
      Result := True;
      AntiRandoms;
    end;
  end;
end;

procedure MainLoop;
var
  Mark : Integer;
begin
  repeat
    MarkTime(Mark);
    repeat
      if not LoggedIn then Exit;
      KillChicken;
      PickupFeathers;
      AntiRandoms;
      AntiBan;
      Report;
    until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  DeclarePlayers;
  PreparePlayer;
  MainLoop;
  SendSRLReport;
  if (GetSystemTime >= ProggyTimer) then
    begin
      Report;
      ProggyTimer := GetSystemTime + 300000; // 300000 ms = 5 minutes
    end;
end.

Pretty good script thx when I have proggie will post

Ok thanks TheVoice and bob im looking forward to your proggy :D

will update V7 now

================================================== =
|| Chickenz Killed: 56 ||
|| Featherz Gathered: 680 ||
|| Ran For: 5 Minutes and 34 Seconds ||
================================================== =

yippe, good for non members to get money. =] besides clay i mean

Wow. Good to see that the feather counter works!

GREAT to see that this script is actully working! thanks for proggy will look back later

**off topic** My coms net has crashed using dads/deleting his history so he dosnt find this site (im not sposed to be playing RUnescape or anything to do with it because i play WoW :D so ill try and get my net back up ASAP thanks again for proggy!**End of off topic**

===================================================
===================================================
|| Chickenz Killed: 4 ||
PROBLEM: inv interface not open
|| Featherz Gathered: 25 ||
|| Ran For: 5 Minutes and 32 Seconds ||
===================================================

Didn't run very well.. It hovered over the chicken but never clicken "Attack"

in2it, get the newest version.

Thevoice i get this error:
ROBLEM: inv interface not open
[Runtime Error] : Exception: Access violation at address 006D66D1 in module 'scar.exe'. Read of address 0000001C in line 163 in script C:\Documents and Settings\Lisa\Desktop\Scripts\Chicken Raper V7.scar

Mkai. Here it is fixed. I accidentally had it freeing the DTM everytime it used it, instead of at the end of the script. Here's the fixed script:

         {             [-----------------------]        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:7                                            /\
        /\                                                             /\
        /\ Credits: Joelster134, TheVoiceInYourHead,in2it(feather idea)/\
        /\Creds also to d1s3l for Counting/proggy!!!!!!!!!!!!!!!!!!!!1 /\
        /\                                                             /\
        /\                                                             /\
        /\ Features: Anti-randoms+Anti-Ban! + feather pickup!          /\
        /\                                                             /\
        /\ Run:Setup lines 39-56     select window hit run!            /\
        /\                                                             /\
        /\                                                             /\
        /\                                                             /\
        /\       NUMBER ONE RULE TO THIS SCRIPT! : ENJOY IT!           /\
        /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/}



program Chicken_Raper;
{.include SRL/SRL.scar}
{.include SRL/SRL/skill/Fighting.scar}

var
  ProggyTimer, ChickensKilled,
    FeathersDTM, FeatherCountStart: Integer;

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!
  Players[0].Pass   := ''; //password
  Players[0].Nick   := 'sdef'; //Nick (3-4 letters of ur name
  Players[0].Active := True; //is the player active?

  {Players[1].Name   := 'Username'; //username!
  Players[1].Pass   := 'password'; //password
  Players[1].Nick   := ''; //Nick (3-4 letters of ur name
  Players[1].Active := True; //is the player active?

  Players[2].Name   := 'Username'; //username!
  Players[2].Pass   := 'password'; //password
  Players[2].Nick   := ''; //Nick (3-4 letters of ur name
  Players[2].Active := True; //is the player active? }

  Mousespeed:= 20;

end;

procedure PreparePlayer;
begin
  if not LoggedIn then LoginPlayer;
  SetRun(True);
  FeatherCountStart := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
end;

//~~~~~~~~~~~~~~~~~~~~~~~~~~~//
//Anti-ban and randoms       //

procedure AntiRandoms;
begin
  if not LoggedIn then Exit;
  FindNormalRandoms;
end;


procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case (Random(30)) of
    1: RandomRClick;
    5: HoverSkill('Woodcutting', False);
    5: HoverSkill('Smithing', False);
    11: RandomMovement;
    15: BoredHuman;
    21: DoEmote(400 +Random(90));
    24: PickUpMouse;
    27: begin
         Gametab(1 + Random(12));
         Wait(3000 + Random(2000));
         Gametab(4);
        end;
    30: SleepAndMoveMouse(3600);
  end;
end;

procedure Report;
var
  FeathersPicked: Integer;
begin
  FeathersPicked := FeatherCountStart - Players[CurrentPlayer].Integers[1];
  WriteLn('===================================================');
  WriteLn(Padr('|| Chickenz Killed: ' + IntToStr(ChickensKilled), 49) + '||');
  WriteLn(Padr('|| Feathurs: ' + IntToStr(FeathersPicked), 49) + '||');
  WriteLn(Padr('|| Ran For: ' + TimeRunning, 49) + '||');
  WriteLn('===================================================');
end;

function InventoryCount: Integer;
var
  i: Integer;
begin
  GameTab(4);
  Result := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
  for i := 1 to 28 do
    if (ExistsItem(i)) then
      Result := Result + 1;
end;


function KillChicken: boolean;
var
  X, Y, Mark, Check: Integer;
begin
  Check := ChickensKilled;
  if FindObjCustom(x, y, ['tta', 'ack', 'hick', 'ken'], [2572628, 6916764, 9155272, 3627895, 5928325], 3) then
  begin
    Mouse(x, y, 2, 2, False);
    Wait(25 + Random(100));
    AntiRandoms;
    if not ChooseOption('ttack') then Exit;
    Flag;
    MarkTime(Mark);
    Wait(2 * 5000 + Random(1000));
    AntiBan;
    AntiRandoms;
    if HPPercent < 25 then RunTo('N', true);
    Wait(300);
    AntiRandoms;
    Inc(ChickensKilled);
    if ChickensKilled>Check then
      Result := True;
  end;
  Players[CurrentPlayer].Integers[1] := ItemAmount('inv', 'dtm', FeathersDTM, [0]);
end;

//---------->>FEATHER PICKUP MADE BY TheVoiceInYourHead<<-------------------\\


function PickupFeathers: boolean;
var
  x, y, FeatherDTM: integer;
begin
  FeatherDTM:= DTMFromString('78DA63DCC7C8C0A001C44860EBAA550C5C401' +
       'A24FA1F08180F01599AA86A18D418E06A408011648E16AA9A433B' +
       '77A0A80100CAC20B42');
  if FindDTM(FeatherDTM, x, y, MSX1, MSY1, MSX2, MSY2) then
  begin
    Mouse(x, y, 0, 0, False);
    Wait(250 + Random(150));
    if ChooseOption('eather') then
    AntiRandoms;
    begin
      Flag;
      Result := True;
      AntiRandoms;
    end;
  end;
end;

procedure ScriptTerminate;
begin
  FreeDTM(FeathersDTM);
end;

procedure MainLoop;
var
  Mark : Integer;
begin
  FeathersDTM:= DTMFromString('78DA637461626078C28002D62C5CC06003A41' +
       '981F83F1030FA02D55C6740038C482490F600AA794E408D0D50CD' +
       '5B026AEC806A1EE257030001080C01');
  repeat
    MarkTime(Mark);
    repeat
      if not LoggedIn then Exit;
      KillChicken;
      PickupFeathers;
      AntiRandoms;
      AntiBan;
      Report;
    until((TimeFromMark(Mark) / 10000 * 600) >= 50); //60 minutes
  until(False);
end;

begin
  SetupSRL;
  DeclarePlayers;
  PreparePlayer;
  MainLoop;
  SendSRLReport;
  if (GetSystemTime >= ProggyTimer) then
    begin
      Report;
      ProggyTimer := GetSystemTime + 300000; // 300000 ms = 5 minutes
    end;
end.

Thanks man… Add me to bud list.

Do you have or know of any good working Fletchers and Stringers if you do Post here OR msn or Email me
Ty man

script fixed download V7 (page 1) PLEASE PSOT PROGGIES!

finally with a proggy ill post 1 asap

Thanks :D

i get this error :(
[Runtime Error] : Exception: Access violation at address 006D72AA in module 'scar.exe'. Read of address 00000000 in line 294 in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/Amount.scar

try reading through SRl public test centre they have fixes there..im stumped on that 1

aw ok =[

Please don't spam, guys.
It fills up the thread with unneeded posts.

Joelster, how's the script going?

Yea good im working on it atm

I could help you if you would get TeamViewer :]

No installation required!

Proggies ^^

===================================================
|| Chickenz Killed: 227 ||
|| Feathurs: -330 ||
|| Ran For: 1 Hours, 12 Minutes and 15 Seconds ||
===================================================

Woops. I put the vars in backwords on the feather counter =P

Holysht :P
thanks man!!!
gonna try this tonight! :D

hey dude it worked wen i took of the line you told me 2 take out but it doesnt find the feathers it picked up but it doesnt matter :D it works xD btw it kept clicking on the same raw chicken like 50 times can u fix that thx :D

anyway heres a proggy:

============================
|| Chickenz Killed: 168 ||
|| Feathers: 705 ||
|| Ran For: 59 Minutes and 8 Seconds ||
============================

ok thanks for proggies :D will update soon

Don't take the line out, Joelster.

In the Proggy function, I had it subtract 2 numbers.
Just switch those numbers around.

ok thanks will try now

this is a first script? nice

actully my first ever script (when i first joined) was even worse…this was my second attempt as i thought my first script shouldn't even be counted as a script :) ty for feedback and post proggies if you use it :p


Version 8 Released!!

Well it does what it says on the tin, but somehow im not satisfied with it.

Oxxyde, it'd be helpful if you explained why you're not satisfied instead of making a general roundabout statement.

thank you.. been looking for one of these.. looking forward to using it :)

ill let you know of anything that goes wrong :P

From: 1nsan1ty
thank you.. been looking for one of these.. looking forward to using it :)

ill let you know of anything that goes wrong :P

Thanks 1nsan1ty looking forward to your proggy/feedback

From: Oxxyde
Well it does what it says on the tin, but somehow im not satisfied with it.

lets take alook at your first script then eh? andplease be specific


OH WAIT YOU DONT HAVE A FIRST SCRIPT?! guess that means stop winging and make your own see what its like :D

ok well i did test but.. i dont pick any feathers up..
everything else works like a dream, just doesnt pick up feathers..

EDIT: and, i put it on and watched it.. it says it has killed 30 chickens, and i know its only killed 2, because after it clicks attack chicken, it counts as a kill, even if you cant attack that chicken because some one else is attacking it, and still doesnt pick up feathers…

Yeah that happened to me, umm just keep trying it—try in a non crowded world since there will be more chickens for you to kill, and it wont click the chicken then Say thats a kill :P

Hey i was able to go over my friends house 2day :D so here it is:
===================================================
|| Chickenz Killed: 439 ||
|| Feathurs: -1855 ||
|| Ran For: 3 Hours, 59 Minutes and 56 Seconds ||
===================================================

Mkai. For all of you who are getting these very nice proggies:

If the "Feathurs" count returns a negative number, the real amount of feathers it picked up is the positive number of that.

Ex:

================================================== =
|| Chickenz Killed: 439 ||
|| Feathurs: -1855 ||
|| Ran For: 3 Hours, 59 Minutes and 56 Seconds ||
================================================== =

In this case, it really picked up 1855 feathers.

VERY NICE PROGGIES!!! please remember to rate thread + rep me :)

Haha, I left my password in my first declareplayers script too lol.
Looks really great man! Btw, I am currently writing an autofighter similar to yours I might add you on msn if you don't mind =)

cool add me i dont mind :) [email]joelster134@hotmail.com[/email], ill help you make it if you have any problems or get stuck :) ill update once i reach 5 proggies

Lol, ok. That one procedure that waits until the flag is gone in your willow cutter looks very interesting. I also have some questions about color clicking and stuff.
Thanks! I'll add you

ps: does your dad care if you go on msn?

nah thats why ill be on msn whilst doing school work, at school atm :) so dad cant find me even tho he teachers here :p


anyways add me if you want ill be glad to answer your questions/if yo uwant help…well cya my class is up got Man Arts now :)

Thank you for a great script! My only suggestion is picking up feathers. It seems to pick up feathers but not all, which is fine with me, but it might be something to add if you update the script.

===================================================
|| Chickenz Killed: 218 ||
|| Feathurs: -255 ||
|| Ran For: 56 Minutes and 18 Seconds ||
===================================================
This is good, I would of let run longer but I had to to turn it off. This is a great script for leveling up low levels or pures.

From: unhappy egg
Thank you for a great script! My only suggestion is picking up feathers. It seems to pick up feathers but not all, which is fine with me, but it might be something to add if you update the script.

===================================================
|| Chickenz Killed: 218 ||
|| Feathurs: -255 ||
|| Ran For: 56 Minutes and 18 Seconds ||
===================================================
This is good, I would of let run longer but I had to to turn it off. This is a great script for leveling up low levels or pures.

Thanks for proggy will update ASAP im glad it works for you :)

PS: will be inactive now and then (read my siggy)

also please rate thread + rep me

Cya joel hope you are back soon :P

thanks :) im gunna miss you guys whilei am gone :(

K cool, im gonna go on sometime today
cya

is this the best chicken killer for registered members at the moment? where should i run this

start in any area with chickens…and i think it is best…might wanna check out other fighters in Free Scripts first though :p

~~joel~~

This one is working like a charm ! Thanks alot.

thank's remember to post proggys/bugs and enjoy it :)


~~Joel~~

V9 IS OUT!

Fixed: some minor bugs/Shortened Anti-ban for faster kills!

LATER UPDATES: adding in DeathWalk later on

nice joel, ima posting prggie to day for u :P it will be best lol :P
Heres my very very short proggie since i g2g
===================================================
|| Chickenz Killed: 34 ||
|| Feathurs: -15 ||
|| Ran For: 9 Minutes and 2 Seconds ||
===================================================

===================================================
|| Chickenz Killed: 10 ||
|| Feathurs: 0 ||
|| Ran For: 2 Minutes and 26 Seconds ||
===================================================

didn't pick up any feathers :(

btw, thanks again for the help on msn joel!

Well this scripts look good =) which raper version do you think i would choose ?

V9 is newest updated version, that works very well :)

very nice xd it works fine:spot:

sounds cool, i'll try it!

thanks, please post bugs/proggies.

joel i have posted better proggie its on page 7 i think update it over my other one you added

Maybe you should do in your antirandoms procedure

if(Damage > 0) then
begin
  RunAway('N', True, 1, 15000);
  Exit;
end;

because chickens only hit 0. Its only a suggestion and i havn't tested lol but it
would stop fighting randoms i think.

but nice script alot of views and downloads:)

when i start the script, how come my mouse isnt moving?

===================================================
|| Chickenz Killed: 47 ||
|| Feathurs: -165 ||
|| Ran For: 12 Minutes and 50 Seconds ||
===================================================


I dont know why it says negative but just take away the sign and its 165 feathers.

Also i have a feeling it will get me banned so im not going to use it anymore because it checks out every color that matches and all in about 5 seconds then clicks a chicken finally. It also switched the attack style i was using for some reason. It was also fairly laggy compared to some other scripts.

Anyway thanks for the script.

alge, the script is fine.

It's supposed to check the colors.

As long as it checks the colors, it's not bannable.

loved this script but the picking up feathers part doesnt work for me :S .. i ledt on for 1 hour and it only got me 65 feathers :S

Worked really well although it didnt pick up the feathers very well.

ill change the DTM for the feather finder and some other thing;s in the script…

just keep postig bugs/proggys!

~~Joel~~

Joel, make a DTM for the feathers when they're on the ground, not in the inv.

yeah ill fix it tonight :) at school atm

wooot

From: i st33zy i
wooot

dont make sh*t posts..

ah, only if i could merchant still, this would be a perfect way to get feathers =/

looking forward to trying this out, will edit with results when i get back

EDIT:
===================================================
|| Chickenz Killed: 291 ||
|| Feathurs: -1475 ||
|| Ran For: 49 Minutes and 30 Seconds ||
===================================================
very impressed with my results, and i came back to watch it handle a evil chicken random was interesting

===================================================
|| Chickenz Killed: 138 ||
|| Feathurs: 0 ||
|| Ran For: 2 Hours, 10 Minutes and 49 Seconds ||
===================================================


===================================================
|| Chickenz Killed: 211 ||
|| Feathurs: -1 ||
|| Ran For: 1 Hours, 17 Minutes and 39 Seconds ||
===================================================


there is 2 more proggys i left it overnight and when i went to school.

1 Suggestion, i alway die of stupid randoms.. If you could make it run away it would be a very good script.

nice proggie dude :) ima make one today or tomoz :D

Another awesome script - now no need to spend Hrs killing chicks :spot:

From: alge
===================================================
|| Chickenz Killed: 138 ||
|| Feathurs: 0 ||
|| Ran For: 2 Hours, 10 Minutes and 49 Seconds ||
===================================================


===================================================
|| Chickenz Killed: 211 ||
|| Feathurs: -1 ||
|| Ran For: 1 Hours, 17 Minutes and 39 Seconds ||
===================================================


there is 2 more proggys i left it overnight and when i went to school.

1 Suggestion, i alway die of stupid randoms.. If you could make it run away it would be a very good script.

set ur nickname right it does do randoms.

these r mine

===================================================
|| Chickenz Killed: 154                          ||
|| Feathurs: 2395                                ||
|| Ran For: 1 Hours, 2 Minutes and 16 Seconds    ||
===================================================

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|     SRL 28 Randoms Report    |
|      [url]www.srl-forums.com[/url]      |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talks            :         1 |
| Ricks            :         1 |
| Boxes Solved     :         1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

and

===================================================
|| Chickenz Killed: 316                          ||
|| Feathurs: 1425                                   ||
|| Ran For: 2 Hours, 3 Minutes and 45 Seconds   ||
===================================================


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|     SRL 28 Randoms Report    |
|      [url]www.srl-forums.com[/url]      |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talks            :         2 |
| Dwarfs           :         1 |
| Lamps Solved     :         1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Ok, thanks i will try it and post back later, pretty sure i did set my nick rich but oh well, worth a shot. Thanks. And i mean i know it does do the simple randoms, like the boxes, but it doesn't run from the combat randoms. Not sure though.

it does all randoms i have been using this on 2 accs for the past few days and it does all the randoms including dwarf frog boxes etc..also does drill demon. either you havn't set the nick right or you have screwed around wit the script at school wewt :)

Joel, in the AntiRandoms; procedure, do you have something along the lines of?:

if FindFight then
  RunAway();

no because if it was still fighting a chicken/check randoms it would run away.

It always says "Line 34 [error]"
for version v8.
I was wondering if anyone could help me out here. I selected the window and updated all the colors, it just won't run. Any help would be greatly appereciated.

Kemdo, what is the entire error?

Here is the full message:

Line 34: [Error] (34:1): Unable to register function function FindGapsTPA(TPA : TPointArray; MinPixels: Integer): T2DPointArray; in script C:\Users\Kemdo\AppData\Local\Temp\Chicken Raper V8.scar

Thanks for helping.

Hmmmmm…Let me see what's going on.

EDIT: Download the latest version (v10).

Ill download v10, then ill give you an update :)
Thanks

Still no luck :(
Here's the error.

Line 34: [Error] (34:1): Unable to register function function FindGapsTPA(TPA : TPointArray; MinPixels: Integer): T2DPointArray; in script C:\Program Files\SCAR 3.12\Scripts\Chicken Raper V10.scar

Thanks.

Download the latest version of the SRL Revision using the SVN.

I would like to thank TheVoiceInYourHead for all his help.
Thank you!

good work joel so many new versions coming out hard to keep up :D making proggie son :P

===================================================
|| Chickenz Killed: 9 ||
|| Feathurs: 0 ||
|| Ran For: 3 Minutes and 30 Seconds ||
===================================================

** Warning in ItemCoordinates: Invalid ItemType: 'inv'**

It doesn't pick up feathers. Any help?
Thanks. :)

ill change the DTM, what's your brightness and Contrast? they both need to be 100.

On the rs screen they are both set to the max.
Thanks

Edit: Post when you are done editing the DTM
:)

Edit: I ran it while i was away for 4 hours:

===================================================
|| Chickenz Killed: 61 ||
|| Feathurs: 0 ||
|| Ran For: 1 Hours, 11 Minutes and 28 Seconds ||
===================================================

Dang i got randomed, i logged in at the wizard tower lol.

Edit: i have to keep editing cause i don't wanna doubble post.
anyway, version 9 seems to pickup the feathers, version 10 does not(for me).

Really Good Script! I am currently using it :)
Thank you.


\±/EliteHacker\±/

Yeah its really good im making another proggie as i type lol..

CHicken Raper Updated! feather pickup should work fine…just download V10 from page 1 :)

ok will do and ill post some more proggies when make my new army of pures and wcer's

Nice work again.. I also have used some of ur other scripts which were also good :)

well maybe you could post a proggy /bug instead of crap?

From: joelster134
well maybe you could post a proggy /bug instead of crap?

ooo that was pretty harsh man lol. He was just trying to compliment lol. Sometimes in2it posts just :f: or just 'Np'. Ive seen it. That is crap, but a compliment is nice, even though it isnt THAT helpful.. Its still nicer than "np" lol. By the way, I wanted to say nice job on ur script and that i think u could be really good at making a universal autofighter.

wow, i guess a lot of effort went into making this, good job.

Where can i get the includes for the file (all i need is the fighting include)

From: cycrosism
Where can i get the includes for the file (all i need is the fighting include)

it comes with the Rev 28 i think…you don't need to download separatley…lmfao

Haha, nice script & name

===================================================
|| Chickenz Killed: 146 ||
|| Feathurs: 1045 ||
|| Ran For: 46 Minutes and 49 Seconds ||
===================================================

It works Great Thanks 4 it!

Nice script but I'm having a small problem with it not picking up feathers. I think its to do with me not one-hitting them?

Great job! But my character doesnt seem to pick up the features like Boblet. And 1 question, Where is North of lumbridge chicken-coop? The 1 with eggs, or not?

-Magix:D

Couldn't get feather pickup to work. But detecting and attacking chickens work fine.

What are we supposed to set up in the script? I input username, nick and pass…

Also, not sure how the inventory is supposed to be set up.

Only username , pass and nick (and any other info that might be needed to fill in) is needed ;)
There is no need to "set up" your inventory in any way

~Sir

|| Chickenz Killed: 6 ||
|| Feathurs: 0 ||
|| Ran For: 1 Minutes and 38 Seconds ||
===================================================

Still no luck. And it actually only killed one chicken. Maybe I'm at the wrong farm (I'm just north of lumbridge, across from the field of cows)…or it's too crowded?

Probably too crowded, i would try a less crowded world, im sure it will work better then ;)

~Sir

ty was looking for this;)

Doesn't work for me, just randomly clicks around?

From: Poif3ct
Doesn't work for me, just randomly clicks around?

Same here

This won't work for me :S

a progress report:
chickens killed:75
feathers:95
ran for approx 21 minutes

another progress report:
chickens killed:184
feathers: 0 (i don't know why im not getting feathers anymore).
ran for approx: 48mins 30 secs

i think when it clicks a chicken it counts as killing it, so if it clicks one while someone else is killing or hit first it counts as your kill.

hamgoof, you just scored 1337 points and won the game.

is there anyway to do it so it picks up the chicken counts that it picked it up as chickens killed then drop it?

nice

Unreal, noice spam. Excellent work.

this script still need better combat finding procedure…

I've tested it for a few minutes, but it won't pickup any feathers and it takes pretty long to attack a chicken. but after that nice script ;)

my progress :P:
|| Chickenz Killed: 9 ||
|| Feathurs: 0 ||
|| Ran For: 2 Minutes and 38 Seconds ||

Hey Joels, the script isn't picking up the feathers. (This is v10 I'm using)

I noticed in you're script you had 'eathers' instead of 'Feathers', even though I fixed it it still doesn't work, it does kill the chickens but it isn't picking up the feathers.

From: teejay
Same here

it doesn't work because you havn't speified the broswer you do this by using the crosshair you drag it into the browser window

Edit: same it also isn't picking up feathers very nice script though

great scripts, i love the name :p

Hey great auto first off, but i would say it would help that if you need to know the player's password and name, you should make it auto-loggin. Also, a bug i found was that every time it tried to kill a chicken, it would go and try and attack another when the chicken hit 1 hp left. So this would work for high levels, not low.

EDIt: to make a player login you can do this:

LoginPlayer;

It does use auto-login.

It didn't seem to login for me.

Works great, takes a little to actually find the chicken but its good..

Only thing is that it won't pick up feathers…. any way to fix this?

Trying this on a Defense Pure/Woodcutter

Thanks for making this.

most of the time it only searches for the haystack….

From: joelster134
i agree with The but just for you :p


in ScarScript:By Drunkenoldma [LEFT]Players[0].User:='Username';//type your name in between the ' ' eg : 'fred'; [/LEFT]

same with pass nick etc…nick (short for nickname is 3-4 letters of around ur middle part of ur username eg : retardsrus ('dsru')


that's all ..:D

Anyone that has made their own script or knows how to analyze a script knows this. Most of the time, it's probably leechers that don't know how to do this.

Good script! I made a new account (building up my army) and I have been looking for a good chicken fighter because they are easy and provide feathers. This one seems to work very well for a First Script. I hope you release some more for it if you can think of any improvements. I haven't had any problems yet so nice work! Thanks!

It wont pick up my feathers, and it takes a while to attack the chickens.

working flawlessly

v8 work for me but it is kind of slow so i got v10 I started it and nothing happens

it works wow nice…

I have only ran script for a few minutes, but it will not pickup any feathers and it takes pretty long to attack a chicken. but still a nice script

works like a dream thank you.

you shold make it so it picks up and buryies bones

ROTFLMAO!! omg,… i love the name..

<<overall good script>> ima use it on meh pure i get back to yer.

==================================
| | Chickens Killed: 16 | |
| | Feathers: 0 :bart: | |
| | Ran For: 6 minutes and 20 seconds | |
==================================

Ewwww, all the noobs are cashing on your script. EWWW ur using DTMs to find feathers on the floor!!

AAAHH he's using Find Object Custom to kill chickens, this is defienetly not a good script but nice first one anyways. USE TPAs!!>_>

I pwn you oviously!!<3

FindObjTPA is alright too!

From: Smarter Child
Ewwww, all the noobs are cashing on your script. EWWW ur using DTMs to find feathers on the floor!!

AAAHH he's using Find Object Custom to kill chickens, this is defienetly not a good script but nice first one anyways. USE TPAs!!>_>

I pwn you oviously!!<3

FindObjTPA is alright too!

umm… have you ever looked in forefeathers, it uses dtms to find feather too… pwnt

This works perfect for me, its great… first fighting auto i used ;)

program Chiken_killa_fetha_collector;

{.include SRL/SRL.scar}
{.include SRL/SRL/Skill/Fighting.scar}

const chicken_color = post color here;//color of chicken
const feather_color = post color here;//make sure diff color than chicken
const food_color = post color here;// food color

Procedure Setup_SRL;
begin
setupsrl;
end;

Procedure Kill_chicken;
clickmscolor(chicken_color,true);
wait(4000)
endfight;
end;

Procedure pickup_feathers;
begin
clickmscolor(feather_color,true)
wait(3000)
end;

Procedure Find_Randoms;
begin
findnormalrandoms;
end;

begin
setup_SRL;
repeat
Kill_chicken;
pickup_feathers;
Find_Randoms;
until(false)
end;
end.



thts mi script for chicken killing :)

lol nice script

I can now verify that my script owns yours, lol :)

Here's a proggy of someone with my script xD, it was the first and only release.

//------------------------------------------\\
|| ChickenPlucker ||
||------------------------------------------||
|| Time Running: 2 Hours, 52 Minutes and 29 Seconds||
|| Chickens Killed: 507 ||
|| Feathers Picked: 4275 ||
||------------------------------------------||
|| Kills: 507, Feathers: 1445 ||
||------------------------------------------||
\\------------------------------------------// 

I tested it and it went pretty well. The only problem was that it didn't pick up any of the feathers. I'm still going to keep it running over night because it's a good auto fighter.

tested wprks very good now use it every day for my pure

Time worked for: 2 hr 23 mins
Killed: 492 chickens
XP Gained: 20.5k

This script does not work!!! None of them do!!!1

From: phantom1
This script does not work!!! None of them do!!!1

Cause its old you should tell us the error maybe…

Exception in Script: Unable to find file 'SRL/SRL.scar' used from '' Dont work for me.. ;/

Hahah, funny script, brings back memories ;)

Dont gravedig.