SRL Archive - RS3 Outdated / Broken Scripts

Chicken Crusher

SORRY EVERYONE I WAS BUSY, this is a pretty quick but good update!

Version 0.83 is out!
Date made:21/10/07
Programs Used:Scar Divi 3.12 and SRL 4
-Can now save information appart from passwords.
-New Sstandards!
-New fighting system added with the great even skills, works
very well, before it changes your fighting style it checks
if it can be done else it goes to the best option one possible,
works very well, one of the best things about Chicken
Crusher.
-Fixed more erros and bugs.
-Will now actually fill up inventory with bones even if you
are not collecting feathers and not burrying bones.

Heres the Form:

History : (Version, views)
0.77, 76
0.79, 828

Don't forget to fill in your SRL ID and password!

Well, although I'm not a fan of forms, that was a nice form. I tested the script and it was working very well, and then I decided to go outside. When I came back, however, I was logged out, and on my taskbar was the scar icon but it said "iTunes". It's like scar got closed or messed up of something. So… I don't have a proggy.

Besides that though, it was attacking chickens efficiently, finding feathers and picking up bones well, wasn't getting lost.

Character Status:
My first character got randomed and was in the wizard's tower.
My second character was still in the coop and had faught chickens.

Line 83: [Error] (18813:1): Duplicate identifier 'b'

I'll giv it a try, btw, very nice form,one of the most best i'v seen so far:D

man this is really 1337 haxor! no wait
its better its really a good script i didnt try the bury function but i believe that works okay to because this is amazing really good antiban because srl and just good not lagging functions i give a 10++++

grtz hermpie

i got a proggy and i got a tip put a run direction in form because u cant use food if evil chicken comes or zombie u will die so but nice work and the form is very very very good and the proggy doesnt tell the right info

/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : secret ore,T,66 mins,117 CK,118 OHK,0 BB,Chickens
| 1 Hours, 7 Minutes and 18 Seconds
| Chickens Killed : 117
| One Hit Kills : 118
| Bones Buried : 0
\========================================================/

Thanks for all the replies and for everyone who said they like the script or form, much appreciated!!! ;)

From: Fizzi
Well, although I'm not a fan of forms, that was a nice form. I tested the script and it was working very well, and then I decided to go outside. When I came back, however, I was logged out, and on my taskbar was the scar icon but it said "iTunes". It's like scar got closed or messed up of something. So… I don't have a proggy.

Besides that though, it was attacking chickens efficiently, finding feathers and picking up bones well, wasn't getting lost.

Character Status:
My first character got randomed and was in the wizard's tower.
My second character was still in the coop and had faught chickens.

It will say "iTunes" when it disguises Scar a 1 out of 7 chance:

{DisguiseIt - Discguise Scar, so it looks like another program}
procedure DisguiseIt;
begin
 case Random(7) of
  0:DisguiseScar('iTunes');
  1:DisguiseScar('Google - Microsoft Internet Explorer');
  2:DisguiseScar('Document1 - Microsoft Word');
  3:DisguiseScar('Google - Microsoft Internet Explorer');
  4:DisguiseScar('Mozilla Firefox Start Page - Mozilla Firefox');
  5:DisguiseScar('New Folder');
  6:DisguiseScar('Untitled - Notepad');
  end;
end;

From: Gone Fishing
Line 83: [Error] (18813:1): Duplicate identifier 'b'

Make sure your using Scar Divi 3.11 and SRL 3.81.

From: hermpie
i got a proggy and i got a tip put a run direction in form because u cant use food if evil chicken comes or zombie u will die so but nice work and the form is very very very good and the proggy doesnt tell the right info

/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : secret ore,T,66 mins,117 CK,118 OHK,0 BB,Chickens
| 1 Hours, 7 Minutes and 18 Seconds
| Chickens Killed : 117
| One Hit Kills : 118
| Bones Buried : 0
\========================================================/

If I put a rundirection in and the function "FindFight" in, wouldn't it just end up running away from the Chickens you are already killing, also the proggy is alright, it tells you how much Chickens you've killed/one hit killed and how much bones you've buried, tell me anything that could be added if you want, thanks for the proggy.

bit slow with monster finding but works great

/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : <lalalalla>,T,5 mins,12 CK,2 OHK,0 BB,Chickens
| 8 Minutes and 53 Seconds
| Chickens Killed : 12
| One Hit Kills : 2
| Bones Buried : 0
\========================================================/

does it have ati randoms i leaved the room for like 25 min and i was killed and logged out also i have notied that it kills farmers (possible cause of dead:( could you fix that?) im training my noob acc lvl4
to be a str pure..

does it haves death walk ?

From: O M G owns
does it have ati randoms i leaved the room for like 25 min and i was killed and logged out also i have notied that it kills farmers (possible cause of dead:( could you fix that?) im training my noob acc lvl4
to be a str pure..

Yes, it has anti-randoms, I don't think it can attack farmers because it looks for these words on the top left before attacking the Chicken:

IsUpTextMulti('ick','cke','ken')

Try the script again and tell me if it works or not, thanks!
Everyone, tell me of any bugs/errors, thanks!

Very nice,
Only once did it attack the farmer. Only problem for me is that it tries to attack a new chicken before killing the one its on. Also it seems to leave a lot of feathers and hasn't buried any bones yet. I have the bury bones and pick feathers both checked.

From: Dumbdollie
Very nice,
Only once did it attack the farmer. Only problem for me is that it tries to attack a new chicken before killing the one its on. Also it seems to leave a lot of feathers and hasn't buried any bones yet. I have the bury bones and pick feathers both checked.

I don't know how it attacks another Chicken before killing the one you are already fighting because it check for the green and red bit of the healthbar and checks for the blue bit of the thing when it says you've missed, it should work fine.
The colour of the feathers is the black colour(the middle line of the feather), just change it to a white bit of the feather by picking the colour when you're logged in, just remember to log out before you start the script. Also it waits till the inventory is full before burying the bones if the inventory is full tell me, thanks! ;)

very nice script..
just only small problem there..
opening gates and doors and solving some randoms(it cant solve a frogs/security/swarm/dwarf)..maybe i dont set a random (something) good.
but very nice script..u will be member very soon

From: ShapeShifter
Yes, it has anti-randoms, I don't think it can attack farmers because it looks for these words on the top left before attacking the Chicken:

IsUpTextMulti('ick','cke','ken')

Try the script again and tell me if it works or not, thanks!
Everyone, tell me of any bugs/errors, thanks!

actually i was in the room when it started fighting farmers
sorry didnt tell that in first post

It definetly attacks farmers lol. I may have just got a screenshot of it.


Good script. Doesnt run away from the Evil Chicken random though.

http://img96.imageshack.us/img96/4664/untitled1111st5.png - :O

good script i like the use of forms

yeah it attacks farmers ,my guess would either be change your attack function or change the tolerance

Well this script is awesome with crushing chickens but antirandoms are bad..
Well, it does not respond to geninue, evil chicken pwns him, prison pete, there are many more randoms this script is not able to do. Good is that it does mystery boxes or whatever they were..
This means i can't run this script over an hour, here is my record with this script.
/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : xxxxxxx,T,45 mins,107 CK,52 OHK,0 BB,Can'tFindChicken
| 46 Minutes and 29 Seconds
| Chickens Killed : 107
| One Hit Kills : 52
| Bones Buried : 0
\========================================================/

And then he said nextplayer, but he were in middle of chicken garden, there were nobody around. Any ideas?
Im using scar divi 3.11, srl 3.7

Good to see people are using it!
Thanks for telling me about the bug of when it attacks the farmers!

From: siider
Well this script is awesome with crushing chickens but antirandoms are bad..
Well, it does not respond to geninue, evil chicken pwns him, prison pete, there are many more randoms this script is not able to do. Good is that it does mystery boxes or whatever they were..
This means i can't run this script over an hour, here is my record with this script.
/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : xxxxxxx,T,45 mins,107 CK,52 OHK,0 BB,Can'tFindChicken
| 46 Minutes and 29 Seconds
| Chickens Killed : 107
| One Hit Kills : 52
| Bones Buried : 0
\================================================= =======/

And then he said nextplayer, but he were in middle of chicken garden, there were nobody around. Any ideas?
Im using scar divi 3.11, srl 3.7

Siider, use SRL 3.81 or else the script won't function right.

Remember, you can't run away from Evil Chickens or any other fighting randoms:

From: ShapeShifter

If I put a rundirection in and the function "FindFight" in, wouldn't it just end up running away from the Chickens you are already killing, also the proggy is alright, it tells you how much Chickens you've killed/one hit killed and how much bones you've buried, tell me anything that could be added if you want, thanks for the proggy.

Edited:I don't know how it attacks the Farmers because i tested it by changing all the Chiken colours to the Farmer's skin colour and the mouse hovered over the Farmer but never attacked for 2 minutes straight(then the scipt logs out), so I don't know if I'll be able to sort out this bug, I think the Farmer might walk in the way sometimes or if Runescape's lagging it might just have hovered over a Chicken before going over the Farmer so it'll still say on the top left "Attack Chicken" due to Runescape lagging.

Hey man, I have tested your script, IT IS GREAT :D I do like it, but there is only 1 problem…I ticked the "Bury Bones" box, and it just got a full inv. of bones and didn't bury.

Also on line 1079 I have just added (Feel free to use it) :

Passwordchar :='*'

This now means that if you have a friend or somebody else around you when you are setting up the script, The password will come up as ******** instead of Password.

:spot:

Look at the attachment, It is your script with the password hide part on it :D

Thankyou for a nice script (Yes, I am a noob at scripting but I know a bit :P)

Failed when compiling
Line 702: [Error] (16198:6): Unknown identifier 'BitmapFromString2' in script C:\DOCUME~1\OWNER~1.YOU\LOCALS~1\Temp\Chicken Crusher 0.77-2.scar

WTF:confused: :confused:

Version 0.79 is out!
Date made:23/07/07
Programs Used:Scar Divi 3.11 and SRL 3.81
-If script doesn't kill a Chicken for 5 minutes plus random
20 seconds it'll log out.
-Fixed a few minor bugs.
-New bone bitmap, old one weren't working.

From: FBH_PwNeD
Failed when compiling
Line 702: [Error] (16198:6): Unknown identifier 'BitmapFromString2' in script C:\DOCUME~1\OWNER~1.YOU\LOCALS~1\Temp\Chicken Crusher 0.77-2.scar

WTF:confused: :confused:

Use SRL 3.81 and Scar Divi 3.11 m8.

ah thanks m8 thought something was wrong.

I got a solid 2 hour run with over 200 chickens dead, about 2 hours 15 mins on other pc. Will now try 0.79, and let you know how it goes!

| Progress Report |
| 0 : aroused rod,T,15 mins,40 CK,31 OHK,0 BB,Chickens
| 17 Minutes and 45 Seconds
| Chickens Killed : 40
| One Hit Kills : 31
| Bones Buried : 0




Worked well. No faults. Spot on. Will run later for longer period to See.

I have seen the form and its very cool but i want to know how i can download it and where i can download it fro trying to make a pure

From: YDOuCARE
I have seen the form and its very cool but i want to know how i can download it and where i can download it fro trying to make a pure

If you see on the first page.. There is a link to the latest version.


Clue, First page, First post…

From: BritishBunny
Hey man, I have tested your script, IT IS GREAT :D I do like it, but there is only 1 problem…I ticked the "Bury Bones" box, and it just got a full inv. of bones and didn't bury.

Also on line 1079 I have just added (Feel free to use it) :

Passwordchar :='*'

This now means that if you have a friend or somebody else around you when you are setting up the script, The password will come up as ******** instead of Password.

:spot:

Look at the attachment, It is your script with the password hide part on it :D

Thankyou for a nice script (Yes, I am a noob at scripting but I know a bit :P)

Yeah I know about this but thanks anyway, i might use in the future but i like to see what I'm typing incase I type the wrong password in, then my player won't be able to log in, so i might just leave it like this but thank you for pointing it out just incase i didn't know.

From: FBH_PwNeD
ah thanks m8 thought something was wrong.

NP=]

From: lostspyda
If you see on the first page.. There is a link to the latest version.


Clue, First page, First post…

Thanks for helping out YDOuCARE.

Line 716: [Error] (16212:6): Unknown identifier 'BitmapFromString2' in script ????

From: Godlike007
Line 716: [Error] (16212:6): Unknown identifier 'BitmapFromString2' in script ????

Use Scar Divi 3.11 and SRL 3.81 m8

tryed the script works great, but the only problem i have is it wont bury the bones at all, i have a full inventory and everything but just wont do it.
it also still attacks the farmer at times but no big worry there.

From: bobzilla69
tryed the script works great, but the only problem i have is it wont bury the bones at all, i have a full inventory and everything but just wont do it.

Have you downloaded version 0.79?

Personally I haven't tried the bury bones feature, but if anyone needs help testing scripts in the future, don't hesitate to contact me.

yes i am using all the up-to-date stuff and it wont bury any bones at all

From: bobzilla69
yes i am using all the up-to-date stuff and it wont bury any bones at all

I meant the new version:Chicken Crusher 0.79, which can be downloaded at the first post, because burying bones works fine on that due to new bitmaps.

From: Fizzi
Well, although I'm not a fan of forms, that was a nice form. I tested the script and it was working very well, and then I decided to go outside. When I came back, however, I was logged out, and on my taskbar was the scar icon but it said "iTunes". It's like scar got closed or messed up of something. So… I don't have a proggy.

Besides that though, it was attacking chickens efficiently, finding feathers and picking up bones well, wasn't getting lost.

Character Status:
My first character got randomed and was in the wizard's tower.
My second character was still in the coop and had faught chickens.

FIZZI NEVER LEAVE A SCRIPT ALONE OKAY?
(ps the question is maybe already answered but just to remember him

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : srndrurbooty,T,37 mins,88 CK,4 OHK,0 BB,Chickens
| 39 Minutes and 36 Seconds
| Chickens Killed : 88
| One Hit Kills : 4
| Bones Buried : 0
\========================================================/

great script man worked well no bugs.

Mebbe you could put in a death walk in a later version?

It has not attacked farmers in my experience with your script. Ive successfully got my attack and str to 30 with this script. But i need to check it every hour when im afk.
Results are going only better and better.. I say again, excellent script bro =)

possibly the weirdest proggy section i've ever encountered, but here it is.

Chickens Killed : 56
One Hit Kills : 203

lol?

Just a guess, but did it mebbe count the one-hit kills of people near me also?

Anyway great script, one of the best i've ever used.

thanks m8

From: FBH_PwNeD
/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : srndrurbooty,T,37 mins,88 CK,4 OHK,0 BB,Chickens
| 39 Minutes and 36 Seconds
| Chickens Killed : 88
| One Hit Kills : 4
| Bones Buried : 0
\========================================================/

great script man worked well no bugs.

Mebbe you could put in a death walk in a later version?

Thanks, but sorry mate, this script is meant for use everywhere so it would be very hard to add a walking function to this script.

From: siider
It has not attacked farmers in my experience with your script. Ive successfully got my attack and str to 30 with this script. But i need to check it every hour when im afk.
Results are going only better and better.. I say again, excellent script bro =)

Thanks m8!!!

From: FBH_PwNeD
possibly the weirdest proggy section i've ever encountered, but here it is.

Chickens Killed : 56
One Hit Kills : 203

lol?

Just a guess, but did it mebbe count the one-hit kills of people near me also?

Anyway great script, one of the best i've ever used.

thanks m8

Thanks, lol how's it a wierd proggy, and yes it can count other peoples one hit kills so use in a not very crowded area

Oh dear, i had 23 mystery boxes, or whatever they are in my bag :D
Well, with next update, try to fix it :P
PS! Sometimes it does the mystery boxes but with latest update, it doesn't do them :s
Any ideas?

From: siider
Oh dear, i had 23 mystery boxes, or whatever they are in my bag :D
Well, with next update, try to fix it :P
PS! Sometimes it does the mystery boxes but with latest update, it doesn't do them :s
Any ideas?

Mystery Boxes, such as the ones you describe are New and cannot be solved as of yet*. Some will and some won't so you'll just have to sort that one yaself :P

From: lostspyda
Mystery Boxes, such as the ones you describe are New and cannot be solved as of yet*. Some will and some won't so you'll just have to sort that one yaself :P

I see.. Yep, i saw pictures where it made them.. Also on pic i saw that he spoke to Genie.. So, yep.. Sometimes it does them and sometimes it doesn't :rolleyes:

How do u open up the form ? Thx..

Can i use this anywhere to fight chickens? I hope so :3
EDIT: Nevermind :l

Theres 1 thing, i setup all my 10 players, i tested it for a few secs, quitted it, tried again but i had to do the form all over again :l
Hows that?

Great Script
Worked like a breeze… only issue (for me on a personal level) is it clicks my hair a lot trying to get bones…. it is really funny sometimes but besides that (and like I said it is a character flaw) I love it.

I got the same thing

I love this script so i wanted to give something back


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 1 |
| Trade Missed : 1 |
| Talking Random : 1 |
| Dwarf Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/


/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : 1337wcer1337,T,59 mins,135 CK,51 OHK,0 BB,Chickens
| 1 Hours, 0 Minutes and 2 Seconds
| Chickens Killed : 135
| One Hit Kills : 51
| Bones Buried : 0
\========================================================/

works great and finds the randoms in time so u dont get crushed :D

From: Donut420
How do u open up the form ? Thx..

Form opens when you run it.



Unfortunetly, you do have to re-type data for now, Personally I'd like a version with no forms, but makes it harder for noobies :P Might try and remove the form, with my gestimation techniques hehe

From: ShapeShifter
I meant the new version:Chicken Crusher 0.79, which can be downloaded at the first post, because burying bones works fine on that due to new bitmaps.

like i said in the post before that its all up to date, that includes the new script.

got a proggy :)


2 hours, 52 minutes, and 9 seconds
chickens killed: 225
one hit kills: 416.



just wrote in from other pc hehe :)

Thanks for the replies and porggies and the answers to my poll people, sorry Bobzilla thought you meant you have the up to date SRl and Scar.
New version will be made, which will have evening skills and an easier way to set the fighting style by selecting the weapon first then the style, i'll try and fix the issue about burying bones but i checked a few days ago and it worked fine on my computer lol.

Been using your script for a few days now, and have to say it's a work of art.
Finding chickens, lootind them all works perfectly. Only the randomfinding don't works so well. I keep getting teleported by sandwish lady or killed by drunken dwarf.

this script is becoming such a good script lol.

nice one.

haxor

if BuryBones then
 begin
 WriteLn('Bury bones         : True');
 end
else
 begin
 WriteLn('Bury bones         : False');
 end;
if CollectFeathers then
 begin
 WriteLn('Collect feathers   : True');
 end
else
 begin
 WriteLn('Collect feathers   : False');
 end;
WriteLn('Chicken tolerance  : '+IntToStr(ChickenTolerance));
WriteLn('Chicken colour 1   : '+IntToStr(ChickenColour[1]));
WriteLn('Chicken colour 2   : '+IntToStr(ChickenColour[2]));
WriteLn('Chicken colour 3   : '+IntToStr(ChickenColour[3]));
WriteLn('Bone colour        : '+IntToStr(BoneColour));
WriteLn('Feather colour     : '+IntToStr(FeatherColour));
WriteLn('----')
WriteLn('Players             : '+IntToStr(HowManyPlayers));

Sounds like something I had ;)

Also needs some heavy standardising:

{
       _______
      /  ____/        Version 0.79
     /  /      ______
    /  /icken /  ___/          \\
    \  \     /  /rusher      _( o >
     \  \____\  \___        /__=-/
      \_______-_____\         ||
                    By ShapeShifter

My first nice form and fighting script!

Date made:23/07/07
Programs Used:Scar Divi 3.11 and SRL 3.81

-Anti-randoms, also has some anti-ban stuff so you loook more human.
-Can set how much Chickens you want to kill or the time per player.
-Can set your fighting style, recognises if you have equiped a staff
 or if you're unarmed else it sets it the default way.
-Checks for the nearest Chicken which is not in a fight.
-Waits untill you've killed/one hit killed the Chicken before
attacking the next one.
-Can set to pick up feathers or bury bones, if you're not burying
bones it'll fill up the inventory with bones to prevent randoms.
-Script will leave one space for the feathers if your collecting
them and you ain't got them yet.
-Can check if you've got the latest version.
-Easy form you can use, easy to add/delete players and pick colours.
-Clicks on a GameTab to make you stay active if you ain't found
a Chicken yet, after 2 minuts or abit more it'll log you out if
you ain't found a Chicken or if you havn't killed a Chicken for 5
minutes plus random 20 seconds it'll log out.

     Post any errors to the thread!


Instructions:1.Use in arear where chicken are, don't
               use in a too crowded area.
             2.Script can only be used for melee combat.
             3.Use Runescape client low detail and
               set your screen to 32 bit TRUE color.
             4.Read the bit below about setting the
               fight mode, so you know what to do.
             5.Drag the crosshair over the Runescape
               client.
             6.Finally, start logged out, click on the
               green arrow, enjoy!

 Setting the fight mode in the form.
 OPTIONS:'attack','strength1','strength2 and 'defence'.
 If you ain't got nothing wielded or not got a staff thiS
 is how the categories go in gametab(1):
  _________     _________
 | attack  |   |strength1|
  ---------     ---------
  _________     _________
 |strength2|   | defence |
  ---------     ---------
 If you have got a weapon listed above equiped
 'strength1' and 'strength2' is just the strength box.

   Version :
--------------------------------------------------------------
  0.79
 Date made:23/07/07
 Programs Used:Scar Divi 3.11 and SRL 3.81
 -If script doesn't kill a Chicken for 5 minutes plus random
 20 seconds it'll log out.
 -Fixed a few minor bugs.
 -New bone bitmap, old one weren't working.
  0.77
 Date made:21/07/07
 Programs Used:Scar Divi 3.11 and SRL 3.81
 My first nice form and my first fighting script!
 Check if you have killed the chicken by its healthbar or if
 you have one hit killed it, can set if you want it to collect
 feathers or bury bones. If you don't burybones, it will fill
 up the inventory with bones to prevent randoms. The function
 'CheckStrToInt' checks if the string can be changed into an
 integer to prevent erros in the form.

   Credits :
--------------------------------------------------------------
Widget, without him I would have never thought of a form like
this!
[--------------------------------------------------------------]}

program ChickenCrusher;
{.include SRL\SRL.SCAR}
{.include SRL\SRL\Misc\Trade.scar}

var
{-----Form-----}
  ChickenCrusherForm : TForm;
  PressedStart : boolean;
  Background : TImage;
  b, CPlayer : integer;
  GroupBoxScript, GroupBoxMisc, GroupBoxColours,
    GroupBoxPlayers : TGroupBox;
  UrSRLID, UrSRLPassword, FRMs, ABRate, PlayerTime, CTlr,
    CColour1, CColour2, CColour3, BColour, FColour,
    Username, Password, Nickname, IntegerOne : TEdit;
  BBones, PUFeathers : TCheckBox;
  Skill4Lamp, StringOne : TComboBox;
  LabelTitle, LabelABRate, LabelPlayerTime, LabelCTlr,
    LabelCColours, LabelBColour, LabelFColour, LabelRandoms : TLabel;
  VersionIsLatest, ButtonC1, ButtonC2, ButtonC3, ButtonBC, ButtonFC,
    BackP, AddP, DeleteP, NextP, Start, Cancel : TButton;
{-----/Form-----}

{-----SetUp-----}
  FindRandomMS, AntiBanRate, TimePerPlayer, ChickenTolerance,
    BoneColour, FeatherColour : integer;
  BuryBones, CollectFeathers : boolean;
  ChickenColour : array[1..3] of integer;
{-----/SetUp-----}

  TotalChickensKilled, TotalBonesBuried, TotalOneHitKills,
    FRTime, LastKill, ChickenTimer, BMPBone, BMPFeather, BMP1HitKill,
    BMPDead : integer;
  GotFeathers : boolean;

  HasBeenOn : array of boolean;
  ChickensKilled : array of integer;
  OneHitKills : array of integer;
  BonesBuried : array of integer;

const
  Version = '0.79';

{DragForm - Drags the form}

procedure DragForm(Sender : TObject; Button : TMouseButton; Shift : TShiftState; X, Y : Integer);
var Newx, Newy, Oldx, Oldy : integer;
begin
  GetMousePos(Oldx, Oldy);
  repeat
    GetMousePos(Newx, Newy);
    ChickenCrusherForm.Top := ChickenCrusherForm.Top - (Oldy - Newy);
    ChickenCrusherForm.Left := ChickenCrusherForm.Left - (Oldx - Newx);
    sleep(1);
    Oldx := Newx;
    Oldy := Newy;
  until (not IsMouseButtonDown(True));
end;

{LatestVersion - Checks for the latest version}

procedure LatestVersion(Sender : TObject);
var LatestVersionOut : string;
begin
  LatestVersionOut := GetPage('http://shapeshifterscripts.freehostia.com/Chicken%20Crusher/Latest%20Version');
  if LatestVersionOut <> Version then
  begin
    WriteLn('     You do not have the latest version!');
    WriteLn('     Your version is ' + Version + ', latest version is ' + LatestVersionOut);
    WriteLn('     Download the latest version from these link[s]:');
    WriteLn(GetPage('http://shapeshifterscripts.freehostia.com/Chicken%20Crusher/Download%20Link'));
  end
  else
  begin
    WriteLn('     You have got the latest version!');
    WriteLn('     Post all your progress reports at these site[s]:');
    WriteLn(GetPage('http://shapeshifterscripts.freehostia.com/Chicken%20Crusher/Progress%20Report'));
  end;
end;

{CheckStrToInt - Check if the string can be changed into an
integer, nearly always works(used for the form)}

function CheckStrToInt(SS : string) : Boolean;
var t : integer;
begin
  for t := 1 to Length(SS) do
  begin
    if t = 1 then
    begin
      if Length(SS) = 1 then
      begin
        if SS[t] = '+' then
        begin
          exit;
        end;
      end;
      if not ((SS[t] = '+') or (SS[t] = '0') or
        (SS[t] = '1') or (SS[t] = '2') or
        (SS[t] = '3') or (SS[t] = '4') or
        (SS[t] = '5') or (SS[t] = '6') or
        (SS[t] = '7') or (SS[t] = '8') or
        (SS[t] = '9')) then
      begin
        exit;
      end;
    end
    else
    begin
      if not ((SS[t] = '0') or (SS[t] = '1') or
        (SS[t] = '2') or (SS[t] = '3') or
        (SS[t] = '4') or (SS[t] = '5') or
        (SS[t] = '6') or (SS[t] = '7') or
        (SS[t] = '8') or (SS[t] = '9')) then
      begin
        exit;
      end;
    end;
    if t = Length(SS) then
    begin
      if SS[1] = '+' then
      begin
        if Length(ss) <= 10 then
        begin
          Result := True;
        end
        else
        begin
          exit;
        end;
      end
      else
      begin
        if Length(ss) <= 9 then
        begin
          Result := True;
        end
        else
        begin
          exit;
        end;
      end;
      Result := True;
      exit;
    end;
  end;
end;

{SortOutPlayer - Used to sort out the player stuff}

procedure SortOutPlayer;
begin
  Players[CPlayer].Name := Username.Text;
  Players[CPlayer].Pass := Password.Text;
  Players[CPlayer].Nick := LowerCase(Nickname.Text);
  if not CheckStrToInt(IntegerOne.Text) then
  begin
    IntegerOne.Text := '0';
  end;
  Players[CPlayer].integer1 := StrToInt(IntegerOne.Text);
  if not ((LowerCase(StringOne.Text) = 'attack') or
    (LowerCase(StringOne.Text) = 'strength1') or
    (LowerCase(StringOne.Text) = 'strength2') or
    (LowerCase(StringOne.Text) = 'defence')) then
  begin
    StringOne.Text := 'attack';
  end;
  Players[CPlayer].string1 := LowerCase(StringOne.Text);
end;

{SetVars - Sets the variables after you press fight so
no faults occurs}

procedure SetVars(Sender : TObject);
var p : integer;
begin
  SortOutPlayer;
  SRLID := UrSRLID.Text;
  SRLPassword := UrSRLPassword.Text;
  if not CheckStrToInt(FRMs.Text) then
  begin
    FRMs.Text := IntToStr(9000 + random(2000));
  end;
  FindRandomMS := StrToInt(FRMs.Text);
  if not CheckStrToInt(ABRate.Text) then
  begin
    ABRate.Text := IntToStr(26 + random(10));
  end;
  AntiBanRate := StrToInt(ABRate.Text);
  if not ((LowerCase(Skill4Lamp.Text) = 'agility') or
    (LowerCase(Skill4Lamp.Text) = 'attack') or
    (LowerCase(Skill4Lamp.Text) = 'construction') or
    (LowerCase(Skill4Lamp.Text) = 'cooking') or
    (LowerCase(Skill4Lamp.Text) = 'crafting') or
    (LowerCase(Skill4Lamp.Text) = 'defence') or
    (LowerCase(Skill4Lamp.Text) = 'farming') or
    (LowerCase(Skill4Lamp.Text) = 'firemaking') or
    (LowerCase(Skill4Lamp.Text) = 'fishing') or
    (LowerCase(Skill4Lamp.Text) = 'fletching') or
    (LowerCase(Skill4Lamp.Text) = 'herblore') or
    (LowerCase(Skill4Lamp.Text) = 'hitpoints') or
    (LowerCase(Skill4Lamp.Text) = 'hunting') or
    (LowerCase(Skill4Lamp.Text) = 'magic') or
    (LowerCase(Skill4Lamp.Text) = 'mining') or
    (LowerCase(Skill4Lamp.Text) = 'prayer') or
    (LowerCase(Skill4Lamp.Text) = 'ranged') or
    (LowerCase(Skill4Lamp.Text) = 'runecrafting') or
    (LowerCase(Skill4Lamp.Text) = 'slayer') or
    (LowerCase(Skill4Lamp.Text) = 'smithing') or
    (LowerCase(Skill4Lamp.Text) = 'strength') or
    (LowerCase(Skill4Lamp.Text) = 'thieving') or
    (LowerCase(Skill4Lamp.Text) = 'woodcutting')) then
  begin
    Skill4Lamp.Text := 'attack';
  end;
  LampSkill := LowerCase(Skill4Lamp.Text);
  if not CheckStrToInt(PlayerTime.Text) then
  begin
    PlayerTime.Text := '0';
  end;
  TimePerPlayer := StrToInt(PlayerTime.Text);
  BuryBones := BBones.Checked;
  CollectFeathers := PUFeathers.Checked;
  if not CheckStrToInt(CTlr.Text) then
  begin
    CTlr.Text := '5';
  end;
  ChickenTolerance := StrToInt(CTlr.Text);
  if not CheckStrToInt(CColour1.Text) then
  begin
    CColour1.Text := '858490';
  end;
  ChickenColour[1] := StrToInt(CColour1.Text);
  if not CheckStrToInt(CColour2.Text) then
  begin
    CColour2.Text := '4831951';
  end;
  ChickenColour[2] := StrToInt(CColour2.Text);
  if not CheckStrToInt(CColour3.Text) then
  begin
    CColour3.Text := '8828102';
  end;
  ChickenColour[3] := StrToInt(CColour3.Text);
  if not CheckStrToInt(BColour.Text) then
  begin
    BColour.Text := '13685206';
  end;
  BoneColour := StrToInt(BColour.Text);
  if not CheckStrToInt(FColour.Text) then
  begin
    FColour.Text := '9472';
  end;
  HowManyPlayers := GetArrayLength(Players);
  for p := 0 to HowManyPlayers - 1 do
  begin
    Players[p].Active := True;
  end;
  SetArrayLength(HasBeenOn, HowManyPlayers);
  SetArrayLength(ChickensKilled, HowManyPlayers);
  SetArrayLength(OneHitKills, HowManyPlayers);
  SetArrayLength(BonesBuried, HowManyPlayers);
  FeatherColour := StrToInt(FColour.Text);
  ChickenCrusherForm.ModalResult := mrOk;
  PressedStart := True;
  WriteLn('');
  WriteLn('[--------------------Form Info----------------------]');
  WriteLn('SRL Stats ID       : ' + SRLID);
  WriteLn('SRL Stats password : ' + SRLPassword);
  WriteLn('Find Randoms       : ' + IntToStr(FindRandomMS) + ' msecs');
  WriteLn('Anti-ban rate      : ' + IntToStr(AntiBanRate));
  WriteLn('Skill for lamp     : ' + LampSkill);
  WriteLn('Timer per player   : ' + IntToStr(TimePerPlayer));
  if BuryBones then
  begin
    WriteLn('Bury bones         : True');
  end
  else
  begin
    WriteLn('Bury bones         : False');
  end;
  if CollectFeathers then
  begin
    WriteLn('Collect feathers   : True');
  end
  else
  begin
    WriteLn('Collect feathers   : False');
  end;
  WriteLn('Chicken tolerance  : ' + IntToStr(ChickenTolerance));
  WriteLn('Chicken colour 1   : ' + IntToStr(ChickenColour[1]));
  WriteLn('Chicken colour 2   : ' + IntToStr(ChickenColour[2]));
  WriteLn('Chicken colour 3   : ' + IntToStr(ChickenColour[3]));
  WriteLn('Bone colour        : ' + IntToStr(BoneColour));
  WriteLn('Feather colour     : ' + IntToStr(FeatherColour));
  WriteLn('----')
    WriteLn('Players             : ' + IntToStr(HowManyPlayers));
  for p := 0 to HowManyPlayers - 1 do
  begin
    WriteLn('---')
      WriteLn('Players[' + IntToStr(p) + '].Name     :=' + Players[p].Name);
    WriteLn('Players[' + IntToStr(p) + '].Pass     :=' + Players[p].Pass);
    WriteLn('Players[' + IntToStr(p) + '].Nick     :=' + Players[p].Nick);
    WriteLn('Players[' + IntToStr(p) + '].integer1 :=' + IntToStr(Players[p].integer1));
    WriteLn('Players[' + IntToStr(p) + '].string1  :=' + Players[p].string1);
  end;
  WriteLn('[---------------------------------------------------]');
  WriteLn('');
end;

{AddPlayer - Adds a player}

procedure AddPlayer(Sender : TObject);
begin
  SortOutPlayer
    SetArrayLength(Players, GetArrayLength(Players) + 1);
  Players[GetArrayLength(Players) - 1].Name := 'Username';
  Players[GetArrayLength(Players) - 1].Pass := 'Password';
  Players[GetArrayLength(Players) - 1].Nick := 'ser';
  Players[GetArrayLength(Players) - 1].integer1 := 0;
  Players[GetArrayLength(Players) - 1].string1 := 'attack';
  CPlayer := GetArrayLength(Players) - 1;
  GroupBoxPlayers.Caption := 'Player ' + IntToStr(CPlayer + 1) + ' of ' + IntToStr(GetArrayLength(Players));
  Username.Text := Players[CPlayer].Name
    Password.Text := Players[CPlayer].Pass;
  Nickname.Text := Players[CPlayer].Nick;
  IntegerOne.Text := IntToStr(Players[CPlayer].integer1);
  StringOne.Text := Players[CPlayer].string1;
end;

{DeletePlayer - Deletes the player}

procedure DeletePlayer(Sender : TObject);
var p : integer;
  Deleted : boolean;
begin
  if ((CPlayer = 0) and (GetArrayLength(Players) = 1)) then
  begin
    Players[GetArrayLength(Players) - 1].Name := 'Username';
    Players[GetArrayLength(Players) - 1].Pass := 'Password';
    Players[GetArrayLength(Players) - 1].Nick := 'ser';
    Players[GetArrayLength(Players) - 1].integer1 := 0;
    Players[GetArrayLength(Players) - 1].string1 := 'attack';
    Deleted := True;
  end
  else
  begin
    if CPlayer < GetArrayLength(Players) - 1 then
    begin
      for p := CPlayer + 1 to GetArrayLength(Players) - 1 do
      begin
        Players[p - 1].Name := Players[p].Name;
        Players[p - 1].Pass := Players[p].Pass;
        Players[p - 1].Nick := Players[p].Nick;
        Players[p - 1].integer1 := Players[p].integer1;
        Players[p - 1].string1 := Players[p].string1;
      end;
      SetArrayLength(Players, GetArrayLength(Players) - 1);
    end
    else
    begin
      if CPlayer = GetArrayLength(Players) - 1 then
      begin
        CPlayer := CPlayer - 1;
        SetArrayLength(Players, GetArrayLength(Players) - 1);
      end;
    end;
  end;
  Username.Text := Players[CPlayer].Name
    Password.Text := Players[CPlayer].Pass;
  Nickname.Text := Players[CPlayer].Nick;
  IntegerOne.Text := IntToStr(Players[CPlayer].integer1);
  StringOne.Text := Players[CPlayer].string1;
  GroupBoxPlayers.Caption := 'Player ' + IntToStr(CPlayer + 1) + ' of ' + IntToStr(GetArrayLength(Players));
end;

{ForwardPlayer - See the stats of the player plus one}

procedure ForwardPlayer(Sender : TObject);
begin
  SortOutPlayer
    if CPlayer + 1 = GetArrayLength(Players) then
  begin
    CPlayer := 0;
  end
  else
  begin
    CPlayer := CPlayer + 1;
  end;
  GroupBoxPlayers.Caption := 'Player ' + IntToStr(CPlayer + 1) + ' of ' + IntToStr(GetArrayLength(Players));
  Username.Text := Players[CPlayer].Name
    Password.Text := Players[CPlayer].Pass;
  Nickname.Text := Players[CPlayer].Nick;
  IntegerOne.Text := IntToStr(Players[CPlayer].integer1);
  StringOne.Text := Players[CPlayer].string1;
end;

{BackPlayer - See the stats of the player minus one}

procedure BackPlayer(Sender : TObject);
begin
  SortOutPlayer
    if CPlayer = 0 then
  begin
    CPlayer := GetArrayLength(Players) - 1;
  end
  else
  begin
    CPlayer := CPlayer - 1;
  end;
  GroupBoxPlayers.Caption := 'Player ' + IntToStr(CPlayer + 1) + ' of ' + IntToStr(GetArrayLength(Players));
  Username.Text := Players[CPlayer].Name
    Password.Text := Players[CPlayer].Pass;
  Nickname.Text := Players[CPlayer].Nick;
  IntegerOne.Text := IntToStr(Players[CPlayer].integer1);
  StringOne.Text := Players[CPlayer].string1;
end;

{SetColourKeyUp - Sets the colour of the box when you
 have just released the key}

procedure SetColour1KeyUp(Sender : TObject; var Key : Word; Shift : TShiftState);
begin
  if not CheckStrToInt(CColour1.Text) then
  begin
    CColour1.Text := '858490';
  end;
  CColour1.Color := StrToInt(CColour1.Text);
  if CColour1.Color < 12053224 then
  begin
    CColour1.Font.Color := ClWhite;
  end
  else
  begin
    CColour1.Font.Color := ClBlack;
  end;
end;

procedure SetColour2KeyUp(Sender : TObject; var Key : Word; Shift : TShiftState);
begin
  if not CheckStrToInt(CColour2.Text) then
  begin
    CColour2.Text := '4831951';
  end;
  CColour2.Color := StrToInt(CColour2.Text);
  if CColour2.Color < 12053224 then
  begin
    CColour2.Font.Color := ClWhite;
  end
  else
  begin
    CColour2.Font.Color := ClBlack;
  end;
end;

procedure SetColour3KeyUp(Sender : TObject; var Key : Word; Shift : TShiftState);
begin
  if not CheckStrToInt(CColour3.Text) then
  begin
    CColour3.Text := '8828102';
  end;
  CColour3.Color := StrToInt(CColour2.Text);
  if CColour3.Color < 12053224 then
  begin
    CColour3.Font.Color := ClWhite;
  end
  else
  begin
    CColour3.Font.Color := ClBlack;
  end;
end;

procedure SetBColourKeyUp(Sender : TObject; var Key : Word; Shift : TShiftState);
begin
  if not CheckStrToInt(BColour.Text) then
  begin
    BColour.Text := '13685206';
  end;
  BColour.Color := StrToInt(BColour.Text);
  if BColour.Color < 12053224 then
  begin
    BColour.Font.Color := ClWhite;
  end
  else
  begin
    BColour.Font.Color := ClBlack;
  end;
end;

procedure SetFColourKeyUp(Sender : TObject; var Key : Word; Shift : TShiftState);
begin
  if not CheckStrToInt(FColour.Text) then
  begin
    FColour.Text := '9472';
  end;
  FColour.Color := StrToInt(FColour.Text);
  if FColour.Color < 12053224 then
  begin
    FColour.Font.Color := ClWhite;
  end
  else
  begin
    FColour.Font.Color := ClBlack;
  end;
end;

{SetColour - Sets the colour of the box}

procedure SetColour1;
begin
  CColour1.Color := StrToInt(CColour1.Text);
  if CColour1.Color < 12053224 then
  begin
    CColour1.Font.Color := ClWhite;
  end
  else
  begin
    CColour1.Font.Color := ClBlack;
  end;
end;

procedure SetColour2;
begin
  CColour2.Color := StrToInt(CColour2.Text);
  if CColour2.Color < 12053224 then
  begin
    CColour2.Font.Color := ClWhite;
  end
  else
  begin
    CColour2.Font.Color := ClBlack;
  end;
end;

procedure SetColour3;
begin
  CColour3.Color := StrToInt(CColour3.Text);
  if CColour3.Color < 12053224 then
  begin
    CColour3.Font.Color := ClWhite;
  end
  else
  begin
    CColour3.Font.Color := ClBlack;
  end;
end;

procedure SetBColour;
begin
  BColour.Color := StrToInt(BColour.Text);
  if BColour.Color < 12053224 then
  begin
    BColour.Font.Color := ClWhite;
  end
  else
  begin
    BColour.Font.Color := ClBlack;
  end;
end;

procedure SetFColour;
begin
  FColour.Color := StrToInt(FColour.Text);
  if FColour.Color < 12053224 then
  begin
    FColour.Font.Color := ClWhite;
  end
  else
  begin
    FColour.Font.Color := ClBlack;
  end;
end;

{PickOutColour - You get to pick the colour by pressing
the button next to it}

procedure PickOutColour1(Sender : TObject);
var Cc, Px, Py : integer;
begin
  PickColor(Cc, Px, Py);
  CColour1.Text := IntToStr(Cc);
  SetColour1;
end;

procedure PickOutColour2(Sender : TObject);
var Cc, Px, Py : integer;
begin
  PickColor(Cc, Px, Py);
  CColour2.Text := IntToStr(Cc);
  SetColour2;
end;

procedure PickOutColour3(Sender : TObject);
var Cc, Px, Py : integer;
begin
  PickColor(Cc, Px, Py);
  CColour3.Text := IntToStr(Cc);
  SetColour3;
end;

procedure PickOutBoneColour(Sender : TObject);
var Cc, Px, Py : integer;
begin
  PickColor(Cc, Px, Py);
  BColour.Text := IntToStr(Cc);
  SetBColour;
end;

procedure PickOutFeatherColour(Sender : TObject);
var Cc, Px, Py : integer;
begin
  PickColor(Cc, Px, Py);
  FColour.Text := IntToStr(Cc);
  SetFColour;
end;

{NewForm - The form}

procedure NewForm;
begin
  ChickenCrusherForm := CreateForm;
  with ChickenCrusherForm do
  begin
    Caption := 'Blaster Miner Start Up';
    Position := poScreenCenter;
    Width := 697;
    Height := 499;
    Color := ClBlack;
    Font.Name := 'Arial';
    Font.Size := 9;
    Font.Color := ClBlack;
    BorderStyle := bsNone;
    OnMouseDown := @DragForm;
  end;
  Background := TImage.Create(ChickenCrusherForm);
  with Background do
  begin
    Parent := ChickenCrusherForm;
    SetBounds(0, 0, 697, 499);
    OnMouseDown := @DragForm;
  end;
  b := BitmapFromString2(False, 'aBA85978DA75965976ED380800B7' +
    'A479F8D4B8FF25758164B79393978F0A17A10104C8C6185BB6E1C' +
    'F66E0EB80C127A1C044EF5E7D0C4B989A702A9B8C262FA3C9AA9C' +
    '645A3241467381AEC92C575413759DAD36626E52D17F3E1A930B6' +
    'BA6B2DD783995C375985DBBCCA5A2CF65B909372CB09B5C0D2C8C' +
    'A6CB0A3372466E25B8605ADECE9BAE1CB93BAB3430D96D66CE686' +
    '64E705D7ABBADC9CE19EBD276D6FAD40FD1076463137A6799EA02' +
    'F4B0F1235F76D64FCA7C293B163B2FC5E6E1A34F76A1393C36F1C' +
    'A43D73F9C305E0ECE8046393855B00B320B8D57C6CBF9918FE5FF' +
    'F4FF644BB80749075B92C4A4C46DD79533F2B6297634BF39FEA15' +
    'F36C27E196043DED8C7B8D024565E36A7A4CCBA57965DE0405EAA' +
    '3F67E8CAFDB2726B53E2AFB2B0E7C6DC9117E71F8554B5135A34F' +
    'BC83A2A7367165FD6B15179AACD62AE7BB9CFA8AE668ECD599F15' +
    'CE3A1D79CA8D5F8ABEAB7E1F99B967B46589929C931870CEF5435' +
    '33E3CA3326BBF5CE7E4D797879269F65D2DBF240E6AD3F162E28B' +
    'D798F84783D7C4BB44B2719744BE3DB4425616AE8F0C9D61B41F6' +
    '269AE5C55AECE60536F3ECF0FA92CA90BCDCFAE39D653E30C954C' +
    'B390EA7BB2EBE4DB27EBB2E60947237A57AFB2584ECD13FCD50AE' +
    'D5AA12D9D9BF5520BEC1E2EB756D62626525FD40BA75D2EE999C9' +
    '77F1FA0F5AFC2A2EB0257543AC84D635186044BF6084A29F97093' +
    'DAB96E2995DA62742657BEF5A352F6BB5B0D7E0A39B247176A316' +
    'B8EAF4050EE5F6F561338FEC4D0BBE53A8D10F585EBA96FD84C32' +
    'FEFDB843F478F7E29B7DF3E7403630FC1C2A4143921BB5793DFD1' +
    '2CC7BD9A049D6AD26B937FD953E8C1B08BF0EC7BCE70CE499AEAD' +
    '9F0C26DBC6B6ED7F5FABBAFEF8B38CC5A89CC13A5E4B98D1A895B' +
    '2792E147540B74445EA2CD4BC1E891536157289A435E10D611B97' +
    '083131B618285953DA4C7179A0B7266D415DE47C90A3487A618EE' +
    '97FC81362FE890EDE5576373F7740EB26E494D79A39D7F6B1E4A4' +
    '5E31BD58A6FFA8E680F51BD5876E5F88B4E2ABD39E97BDD496FD9' +
    '6A2F1C2578673B27B452E370E38583155F3CBE530D5C26D5493C8' +
    '900D92872402E681AF109C4BF282B912F44B8A2EF9A99436FEAB0' +
    '93B74519D53228A912656505A3B760E14496B77E5F4DE4D5DE126' +
    '7ADA3A275942F27914F6E6825D2E1A8D3712995DB359E228BEF52' +
    'DD5DABFEF49F71399512E1A6B1EDDA154F843562B0425E1365662' +
    'F64A2672F1F0DB70FF34BA96EB1217390AB0F365D4E1825672E83' +
    'B42D8B2FC89A3950EEC5683E18B971F9F6E07B66D388BA91F7BA9' +
    'A49376B66D021B3E9BCC57CD5C42D5F351F4EE58EF285A3B44634' +
    'D64679F19DCA14219DD6CB0AF29ED2EDB392D7939874F61D37033' +
    '53335AB9D667BD02AE04B0ABFA2564AD6AA29372B241FF85E2307' +
    '961BD42FF16B543DB52CC9B7A86E32B12D96713D86F032404F972' +
    '0A21FFADB5B2672ECFB6518E6B706863F6C8EDEB382D735DD4BE9' +
    '66B66DC87938E7A60B4D37E93CE4117D46BC98BE6BC676CDD876F' +
    'B8364292F64919C976E105DFC3068940EE9F9D8FB225D28E4ADFD' +
    'C4AA3EEB3AD2DB6B917A396CDA799AC673D0CDBAF63732FA32298' +
    '356967639ED5A43DF8B87567B6366B5A9B5B9A8C1763BE4B139B3' +
    'BAB26997E33B593B64D6AACCFA42157DA178217E50ECA3DAC84B3' +
    '84AF90F0F6');
  SafeCopyCanvas(GetBitmapCanvas(b), Background.Canvas, 0, 0, 1, 499, 0, 0, 697, 499);
  b := BitmapFromString2(False, 'a8162378DA3D8CC10DC030080357' +
    '72684D78370AFB8F548CA2F03859676400C855C098050F2BF2437' +
    '3CB3094C3C5A9ECC3AEB778E5A905A67E5CE5D9C1C3E6CEBE1FA3' +
    'E');
  SafeCopyCanvas(GetBitmapCanvas(b), Background.Canvas, 0, 0, 1, 1, 0, 0, 697, 2);
  SafeCopyCanvas(GetBitmapCanvas(b), Background.Canvas, 0, 0, 1, 1, 695, 2, 697, 497);
  SafeCopyCanvas(GetBitmapCanvas(b), Background.Canvas, 0, 0, 1, 1, 0, 497, 697, 499);
  SafeCopyCanvas(GetBitmapCanvas(b), Background.Canvas, 0, 0, 1, 1, 0, 2, 2, 497);
  LabelTitle := TLabel.Create(ChickenCrusherForm);
  with LabelTitle do
  begin
    Parent := ChickenCrusherForm;
    Font.Size := 48;
    Caption := 'Chicken Crusher';
    SetBounds(107, 20, 480, 65);
  end;
  GroupBoxScript := TGroupBox.Create(ChickenCrusherForm);
  with GroupBoxScript do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Script information';
    SetBounds(65, 120, 192, 95);
  end;
  UrSRLID := TEdit.Create(ChickenCrusherForm);
  with UrSRLID do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Your SRL stats ID';
    Hint := 'Your SRL stats ID, leave blank if you don''t' + Chr(13) +
      'have a SRL Stats account';
    ShowHint := True;
    SetBounds(75, 140, 172, 20);
  end;
  UrSRLPassword := TEdit.Create(ChickenCrusherForm);
  with UrSRLPassword do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Your SRL stats password';
    Hint := 'Your SRL stats password, leave blank if you don''t' + Chr(13) +
      ' have a SRL Stats account';
    ShowHint := True;
    SetBounds(75, 165, 172, 20);
  end;
  VersionIsLatest := TButton.Create(ChickenCrusherForm);
  with VersionIsLatest do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Check for latest version';
    Hint := 'Click here to make script check for latest version';
    ShowHint := True;
    SetBounds(75, 190, 172, 20);
    OnClick := @LatestVersion;
  end;
  GroupBoxMisc := TGroupBox.Create(ChickenCrusherForm);
  with GroupBoxMisc do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Miscellaneous information';
    SetBounds(65, 230, 192, 204);
  end;
  FRMs := TEdit.Create(ChickenCrusherForm);
  with FRMs do
  begin
    Parent := ChickenCrusherForm;
    Text := '10000';
    Hint := 'Will do FindNormalRandom every' + Chr(13) +
      '(Amount you type in) milleseconds else it will' + Chr(13) +
      'do FindFastRandoms, recomended around 10000';
    ShowHint := True;
    SetBounds(75, 250, 80, 20);
  end;
  LabelRandoms := TLabel.Create(ChickenCrusherForm);
  with LabelRandoms do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Random(ms)';
    SetBounds(159, 254, 80, 20);
  end;
  ABRate := TEdit.Create(ChickenCrusherForm);
  with ABRate do
  begin
    Parent := ChickenCrusherForm;
    Text := '27';
    Hint := '1 Out of anti-ban rate chance of doing something' + Chr(13) +
      'random, recomended around 30';
    ShowHint := True;
    SetBounds(75, 275, 30, 20);
  end;
  LabelABRate := TLabel.Create(ChickenCrusherForm);
  with LabelABRate do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Anti-ban rate';
    SetBounds(109, 279, 68, 20);
  end;
  Skill4Lamp := TComboBox.Create(ChickenCrusherForm);
  with Skill4Lamp do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Genie skill';
    Items.Add('agility');
    Items.Add('attack');
    Items.Add('construction');
    Items.Add('cooking');
    Items.Add('crafting');
    Items.Add('defence');
    Items.Add('farming');
    Items.Add('firemaking');
    Items.Add('fishing');
    Items.Add('fletching');
    Items.Add('herblore');
    Items.Add('hitpoints');
    Items.Add('hunting');
    Items.Add('magic');
    Items.Add('mining');
    Items.Add('prayer');
    Items.Add('ranged');
    Items.Add('runecrafting');
    Items.Add('slayer');
    Items.Add('smithing');
    Items.Add('strength');
    Items.Add('thieving');
    Items.Add('woodcutting');
    Hint := 'Skill to use if you find a lamp';
    ShowHint := True;
    SetBounds(75, 300, 95, 20);
  end;
  PlayerTime := TEdit.Create(ChickenCrusherForm);
  with PlayerTime do
  begin
    Parent := ChickenCrusherForm;
    Text := '90';
    Hint := 'Time in minutes before switching player adds a' + Chr(13) +
      'random of 10% time, set to 0 or below so' + Chr(13) +
      'player will stay on till target Chickens to kill' + Chr(13) +
      'is reached';
    ShowHint := True;
    SetBounds(75, 325, 30, 20);
  end;
  LabelPlayerTime := TLabel.Create(ChickenCrusherForm);
  with LabelPlayerTime do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Timer per player(Minutes)';
    SetBounds(109, 329, 142, 20);
  end;
  BBones := TCheckBox.Create(ChickenCrusherForm);
  with BBones do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Bury bones';
    Hint := 'If you want to bury bones, if you dont''t less' + Chr(13) +
      'randoms will happen becaue your inventory will' + Chr(13) +
      'get full';
    ShowHint := True;
    SetBounds(75, 350, 95, 20);
  end;
  PUFeathers := TCheckBox.Create(ChickenCrusherForm);
  with PUFeathers do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick feathers';
    Hint := 'If you want to pick up feathers';
    Checked := True;
    ShowHint := True;
    SetBounds(75, 375, 95, 20);
  end;
  CTlr := TEdit.Create(ChickenCrusherForm);
  with CTlr do
  begin
    Parent := ChickenCrusherForm;
    Text := '5';
    Hint := 'Tolerance of the Chicken, set to around 4-10';
    ShowHint := True;
    SetBounds(75, 400, 30, 20);
  end;
  LabelCTlr := TLabel.Create(ChickenCrusherForm);
  with LabelCTlr do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Chicken Tolerance';
    SetBounds(109, 404, 105, 20);
  end;
  GroupBoxColours := TGroupBox.Create(ChickenCrusherForm);
  with GroupBoxColours do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Colours - Click buttons to pick';
    SetBounds(277, 309, 355, 125);
  end;
  LabelCColours := TLabel.Create(ChickenCrusherForm);
  with LabelCColours do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Chicken';
    SetBounds(305, 333, 80, 20);
  end;
  CColour1 := TEdit.Create(ChickenCrusherForm);
  with CColour1 do
  begin
    Parent := ChickenCrusherForm;
    Text := '858490';
    SetColour1;
    SetBounds(287, 354, 80, 20);
    OnKeyUp := @SetColour1KeyUp;
  end;
  ButtonC1 := TButton.Create(ChickenCrusherForm);
  with ButtonC1 do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick 1';
    Hint := 'Pick the first colour for the Chicken';
    ShowHint := True;
    SetBounds(372, 354, 70, 20);
    OnClick := @PickOutColour1;
  end;
  CColour2 := TEdit.Create(ChickenCrusherForm);
  with CColour2 do
  begin
    Parent := ChickenCrusherForm;
    Text := '4831951';
    SetColour2;
    SetBounds(287, 379, 80, 20);
    OnKeyUp := @SetColour2KeyUp;
  end;
  ButtonC2 := TButton.Create(ChickenCrusherForm);
  with ButtonC2 do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick 2';
    Hint := 'Pick the second colour for the Chicken';
    ShowHint := True;
    SetBounds(372, 379, 70, 20);
    OnClick := @PickOutColour2;
  end;
  CColour3 := TEdit.Create(ChickenCrusherForm);
  with CColour3 do
  begin
    Parent := ChickenCrusherForm;
    Text := '8828102';
    SetColour3;
    SetBounds(287, 404, 80, 20);
    OnKeyUp := @SetColour3KeyUp;
  end;
  ButtonC3 := TButton.Create(ChickenCrusherForm);
  with ButtonC3 do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick 3';
    Hint := 'Pick the third colour for the Chicken';
    ShowHint := True;
    SetBounds(372, 404, 70, 20);
    OnClick := @PickOutColour3;
  end;
  LabelBColour := TLabel.Create(ChickenCrusherForm);
  with LabelBColour do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Bone';
    SetBounds(487, 333, 80, 20);
  end;
  BColour := TEdit.Create(ChickenCrusherForm);
  with BColour do
  begin
    Parent := ChickenCrusherForm;
    Text := '13685206';
    SetBColour;
    SetBounds(462, 354, 80, 20);
    OnKeyUp := @SetBColourKeyUp;
  end;
  ButtonBC := TButton.Create(ChickenCrusherForm);
  with ButtonBC do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick';
    Hint := 'Pick a colour for the Chicken''s bone';
    ShowHint := True;
    SetBounds(552, 354, 70, 20);
    OnClick := @PickOutBoneColour;
  end;
  LabelFColour := TLabel.Create(ChickenCrusherForm);
  with LabelFColour do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Feather';
    SetBounds(480, 383, 80, 20);
  end;
  FColour := TEdit.Create(ChickenCrusherForm);
  with FColour do
  begin
    Parent := ChickenCrusherForm;
    Text := '9472';
    SetFColour;
    SetBounds(462, 404, 80, 20);
    OnKeyUp := @SetFColourKeyUp;
  end;
  ButtonFC := TButton.Create(ChickenCrusherForm);
  with ButtonFC do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Pick';
    Hint := 'Pick a colour for the Chicken''s feather';
    ShowHint := True;
    SetBounds(552, 404, 70, 20);
    OnClick := @PickOutFeatherColour;
  end;
  GroupBoxPlayers := TGroupBox.Create(ChickenCrusherForm);
  with GroupBoxPlayers do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Player ' + IntToStr(CPlayer + 1) + ' of ' + IntToStr(GetArrayLength(Players));
    SetBounds(277, 120, 300, 150);
  end;
  Username := TEdit.Create(ChickenCrusherForm);
  with Username do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Username';
    Hint := 'Username of player';
    ShowHint := True;
    SetBounds(287, 140, 100, 20);
  end;
  Password := TEdit.Create(ChickenCrusherForm);
  with Password do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Password';
    Hint := 'Password of player';
    ShowHint := True;
    SetBounds(287, 165, 100, 20);
  end;
  Nickname := TEdit.Create(ChickenCrusherForm);
  with Nickname do
  begin
    Parent := ChickenCrusherForm;
    Text := 'ser';
    Hint := 'Nickname of player, 3-4 lowercase letters of username';
    ShowHint := True;
    SetBounds(287, 190, 100, 20);
  end;
  IntegerOne := TEdit.Create(ChickenCrusherForm);
  with IntegerOne do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Chickens to kill';
    Hint := 'Number of Chickens to kill, set to 0 or lower if' + Chr(13) +
      'you want to set target to infinity or if you set' + Chr(13) +
      'to above 0 it will kill the target before' + Chr(13) +
      'logging out';
    ShowHint := True;
    SetBounds(287, 215, 100, 20);
  end;
  StringOne := TComboBox.Create(ChickenCrusherForm);
  with StringOne do
  begin
    Parent := ChickenCrusherForm;
    Text := 'Fighting style';
    Items.Add('attack');
    Items.Add('strength1');
    Items.Add('strength2');
    Items.Add('defence');
    Hint := 'The way you attack, there is normally 4 options in GameTab(1).' + Chr(13) +
      'If you don''t know how to use reed ''Known issues'' at the top of script';
    ShowHint := True;
    SetBounds(287, 240, 100, 20);
  end;
  BackP := TButton.Create(ChickenCrusherForm);
  with BackP do
  begin
    Parent := ChickenCrusherForm;
    Caption := '<';
    SetBounds(397, 190, 40, 20);
    OnClick := @BackPlayer;
  end;
  AddP := TButton.Create(ChickenCrusherForm);
  with AddP do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Add player';
    SetBounds(447, 165, 70, 20);
    OnClick := @AddPlayer;
  end;
  DeleteP := TButton.Create(ChickenCrusherForm);
  with DeleteP do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Delete';
    SetBounds(447, 215, 70, 20);
    OnClick := @DeletePlayer;
  end;
  NextP := TButton.Create(ChickenCrusherForm);
  with NextP do
  begin
    Parent := ChickenCrusherForm;
    Caption := '>';
    SetBounds(527, 190, 40, 20);
    OnClick := @ForwardPlayer;
  end;
  Start := TButton.Create(ChickenCrusherForm);
  with Start do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Start';
    SetBounds(487, 280, 80, 20);
    OnClick := @SetVars;
  end;
  Cancel := TButton.Create(ChickenCrusherForm);
  with Cancel do
  begin
    Parent := ChickenCrusherForm;
    Caption := 'Cancel';
    SetBounds(287, 280, 80, 20);
    ModalResult := mrOk;
  end;
end;

procedure SafeShowForm;
var BMF : TVariantArray;
begin
  SetArrayLength(BMF, 0);
  ThreadSafeCall('NewForm', BMF);
end;

procedure ShowFormModal;
begin
  ChickenCrusherForm.ShowModal;
end;

procedure SafeShowFormModal;
var BMF : TVariantArray;
begin
  SetArrayLength(BMF, 0);
  ThreadSafeCall('ShowFormModal', BMF);
end;

{ProgressReport - Show information on what the players has done so far}

procedure ProgressReport;
var PR : integer;
  PRActive : string;
begin
  SRLRandomsReport;
  PlayerCurTime := (GetSystemTime / 1000);
  Players[CurrentPlayer].Worked := ((PlayerCurTime - PlayerStartTime) / 60);
  WriteLn('');
  WriteLn('/==========Chicken Crusher ' + Version + ' by ShapeShifter==========\');
  WriteLn('|      Progress Report                                   |');
  for PR := 0 to HowManyPlayers - 1 do
  begin
    if HasBeenOn[PR] then
    begin
      if Players[PR].Active then
      begin PRActive := 'T' end
      else
      begin PRActive := 'F' end;
      WriteLn('|   ' + IntToStr(PR) + ' : ' +
        Players[PR].Name + ',' +
        PRActive + ',' + IntToStr(Players[PR].Worked)
        + ' mins,' + IntToStr(ChickensKilled[PR]) +
        ' CK,' + IntToStr(OneHitKills[PR]) + ' OHK,' +
        IntToStr(BonesBuried[PR]) + ' BB,' + Players[CurrentPlayer].loc);
    end;
  end;
  WriteLn('| ' + TimeRunning);
  WriteLn('| Chickens Killed : ' + IntToStr(TotalChickensKilled));
  WriteLn('| One Hit Kills   : ' + IntToStr(TotalOneHitKills));
  WriteLn('| Bones Buried    : ' + IntToStr(TotalBonesBuried));
  WriteLn('\========================================================/');
end;

{LoadBMP - Loads the bitmaps}

procedure LoadBMP;
begin
  BMPBone := BitmapFromString2(False, 'a0CF5378DAA55359AEE430' +
    '08BC125ED83E59ECFB1FE9E1B8A5A7F9E89E19354895082AE0542' +
    '500008B0BC05AC1D0289C830E1E7855A8F583300B514EA3CB738F' +
    'A78BFB54E850EAA973C1964FF7B7C2B80FCE75987E1ADDCFC66E0' +
    '64FA42526C60EA99C1E956ABB7259B356C52EFDC5CC949422CC18' +
    '2E9616365594AB386404387B6D30337D6AA1535444B6A020BC893' +
    '5575B4D84372FDAC495808ACAC1A3D2B871837F88D5EA7451A71E' +
    '36DE7172A5A6DE737EE6783736FABC313DA9F26A42BE7CDDED9E3' +
    'E7C4404C6BC1CEA58B27C9EF687FE8FB61ADAB4D5DCD2B476F4EC' +
    '574F5E8C8C57F3CB31D7ADFBBAF69AD65C5D1C6C96434B878EABB' +
    '0005794DFB50F0D274E225CB85818685FCEF5CE50CBC6BF28D0EB' +
    '2DE36E87AFC3C9DCFCFB39D7DFCF5FDDDB37A2AC1F28DB312132A' +
    '852A347FBDF393FD1E');
  BMPFeather := BitmapFromString(12, 9, 'z78DAA5CF510EC3200C0' +
    '3D02BA530A07CDAA9B8FF91462193602BDAB41AC97F3C39226734' +
    'F0E0515BA9EA09C2DA3173678282D60140B67E2063EF2D4326A70' +
    '9222E8A5C3883408784A88985A5EF69D8D69D49586CE882398B5B' +
    '2E9C85305DD4FE6AFDC7D485579F0B7F684BBD2D328CC2B861F56' +
    'B91ED53B0FD82505F8187FF86BCDDF277EE0A4F5ACE89F8');
  BMP1HitKill := BitmapFromString(9, 11, 'z78DAAD50410A003008' +
    'FA925DF68009FBFF93C6E81248D2611D2444B3225EB1E02955F9B' +
    '5110836FAEC218CF742E640341C6CA82E9FA81B729C0B9BA293FF' +
    'DED521ACBEFB86C774755EE593B9E9C37BF8');
  BMPDead := BitmapFromString2(False, 'a0417078DAD58DC115C020' +
    '0843578A22608FDACAFE2395D0297AF981045E00E07802AB25E4B' +
    'A93438C24207B267572D17148A7D3E7E0ACBCD7606A1DF545D1F6' +
    '545A4E5DDAE662CE165BE5C8577022A8FFE20B59D');
end;

{FreeBMP - Free the bitmaps}

procedure FreeBMP;
begin
  FreeBitmap(BMPBone);
  FreeBitmap(BMPFeather);
  FreeBitmap(BMP1HitKill);
  FreeBitmap(BMPDead);
end;

{FindFastRandoms - Finds all the quick randoms, by WT-Fakawi}

function FindFastRandoms : Boolean;
var I : integer;
begin
  for I := 1 to 10 do
  begin
    case I of
      1 : if FindDead then
        begin
          Players[CurrentPlayer].loc := 'Dead';
          Result := True;
        end;
      2 : if FindMod then
        begin
          Players[CurrentPlayer].loc := 'Mod';
          Result := True;
        end;
      3 : if FindMime then
        begin
          Players[CurrentPlayer].Loc := 'Mime';
          Result := True;
        end;
      4 : if FindMaze then
        begin
          Players[CurrentPlayer].Loc := 'Maze';
          Result := True;
        end;
      5 : if FindQuiz then
          Result := True;
      6 : if FindDemon then
          Result := True;
      7 : if NoGameTab then
        begin
          Result := True;
          Players[CurrentPlayer].loc := 'NoGameTab';
          Logout;
          exit;
        end;
      8 : if RC then
          Result := True;
      9 : if FindTalk then
          Result := True;
      10 : if HandleTrade then
          Result := True;
    end;
    wait(1);
  end;
end;

{FindRandoms - FindNomralRandoms when the time from mark is
over something else it FindFastRandoms}

function FindRandoms(RTime : integer) : Boolean;
begin
  if TimeFromMark(FRTime) < RTime then
  begin
    if FindFastRandoms then
    begin
      Result := True;
    end;
  end
  else
  begin
    if FindNormalRandoms then
    begin
      Result := True;
    end;
    MarkTime(FRTime);
  end;
end;

{RestartVars - All the report vars reset to zero}

procedure RestartVars;
var RV : integer;
begin
  for RV := 0 to 19 do
  begin
    ReportVars[RV] := 0;
  end;
end;

{DisguiseIt - Discguise Scar, so it looks like another program}

procedure DisguiseIt;
begin
  case Random(7) of
    0 : DisguiseScar('iTunes');
    1 : DisguiseScar('Google - Microsoft Internet Explorer');
    2 : DisguiseScar('Document1 - Microsoft Word');
    3 : DisguiseScar('Google - Microsoft Internet Explorer');
    4 : DisguiseScar('Mozilla Firefox Start Page - Mozilla Firefox');
    5 : DisguiseScar('New Folder');
    6 : DisguiseScar('Untitled - Notepad');
  end;
end;

{SetChckenCrusher - Sets up Chicken Crusher}

procedure SetChickenCrusher;
begin
  ClearDebug;
  ClearReport;
  WriteLn('         _______');
  WriteLn('        /  ____/        Version ' + Version);
  WriteLn('       /  /      ______');
  WriteLn('      /  /icken /  ___/          \\');
  WriteLn('      \  \     /  /rusher      _( o >');
  WriteLn('       \  \____\  \___        /__=-/');
  WriteLn('        \_______-_____\         ||');
  WriteLn('                          By ShapeShifter');
  SetUpSRL;
  ScriptID := '212';
  GetSelf.Visible := False;
  SetArrayLength(Players, 1);
  SafeShowForm;
  SafeShowFormModal;
  GetSelf.Visible := True;
  if not PressedStart then
  begin
    TerminateScript;
  end;
  MouseSpeed := 7 + random(2);
  RestartVars;
  CheckUserNicks;
  DisguiseIt;
  ActivateClient;
  MarkTime(FRTime);
  wait(1000);
end;

{HighestBrightness - Sets the brightness to level 4}

procedure HighestBrightness;
begin
  GameTab(11);
  wait(50 + random(10));
  if FindColorSpiralTolerance(x, y, 4478048, 710, 226, 710, 226, 10) then
  begin
    Mouse(713, 229, 2, 2, True);
  end;
end;

{RetaliateTrue - Sets auto retaliate to true}

procedure RetaliateTrue;
begin
  GameTab(1);
  wait(50 + random(10));
  if not FindColorSpiralTolerance(x, y, 1711220, 610, 367, 620, 393, 10) then
  begin
    Mouse(613, 370, 88, 21, True)
  end;
end;

{SetFightingStyle - Sets fighting style}

procedure SetFightingStyle;
begin
  WriteLn('Fighting mode:' + Players[CurrentPlayer].string1);
  GameTab(1);
  wait(200 + random(10));
  if not ((Players[CurrentPlayer].string1 = 'attack') or
    (Players[CurrentPlayer].string1 = 'strength1') or
    (Players[CurrentPlayer].string1 = 'strength2') or
    (Players[CurrentPlayer].string1 = 'defence')) then
  begin
    WriteLn('This player''s string1 does not fit into any category');
    WriteLn('String1 will be set to ''attack''');
    Players[CurrentPlayer].string1 := 'attack';
  end;
  if FindText(x, y, 'Punch', StatChars, 589, 276, 627, 293) then
  begin
    WriteLn('Unarmed');
    case LowerCase(Players[CurrentPlayer].string1) of
      'attack' : Mouse(577, 254, 61, 37, true);
      'strength1' : Mouse(661, 254, 61, 37, true);
      'strength2' : Mouse(661, 254, 61, 37, true);
      'defence' : Mouse(577, 307, 61, 37, true);
    end;
    exit;
  end;
  if FindText(x, y, 'Bash', StatChars, 587, 264, 623, 283) and
    FindText(x, y, 'ocus', StatChars, 593, 338, 624, 353) then
  begin
    WriteLn('Staff wielded');
    case LowerCase(Players[CurrentPlayer].string1) of
      'attack' : Mouse(578, 255, 61, 25, true);
      'strength1' : Mouse(578, 290, 61, 25, true);
      'strength2' : Mouse(578, 290, 61, 25, true);
      'defence' : Mouse(578, 325, 61, 25, true);
    end;
    exit;
  end;
  WriteLn('Setting fight mode the default way');
  case LowerCase(Players[CurrentPlayer].string1) of
    'attack' : Mouse(577, 254, 61, 37, true);
    'strength1' : Mouse(661, 254, 61, 37, true);
    'strength2' : Mouse(577, 307, 61, 37, true);
    'defence' : Mouse(661, 307, 61, 37, true);
  end;
end;

{FeathersInInv - Checks if fether is in inventory}

procedure FeathersInInv;
begin
  if ((CollectFeathers) and (not GotFeathers)) then
  begin
    LoadBMP;
    if FindBitmapToleranceIn(BMPFeather, x, y, MIx1, MIy1, MIx2, MIy2, 20) then
    begin
      GotFeathers := True;
      writeln('Got feathers');
    end;
    FreeBMP;
  end;
end;

{SetUpPlayer - Sets up the player stuff}

procedure SetUpPlayer;
begin
  WriteLn(' ' + IntToStr(CurrentPlayer) + ':' + Players[CurrentPlayer].Name);
  HasBeenOn[CurrentPlayer] := True;
  Players[CurrentPlayer].loc := 'Chickens';
  GotFeathers := False;
  wait(200 + random(50));
  if LoggedIn then
  begin
    RetaliateTrue;
    wait(140 + random(10));
    SetFightingStyle;
    wait(120 + random(50));
    SetRun(True);
    wait(100 + random(10));
    HighestBrightness;
    wait(140 + random(10));
    SetChat('off', 1);
    wait(70 + random(20));
    SetChat('off', 2);
    wait(60 + random(20));
    SetChat('on', 3);
    wait(50 + random(10));
    HighestAngle;
    wait(100 + random(50));
    GameTab(4);
    wait(100 + random(5));
    FeathersInInv;
    MarkTime(LastKill);
  end;
end;

{FindChicken - My find colour spiral with "IsUpTextMulti('ick','cke','ken')"}

function FindChicken(var Cx, Cy : integer; X1, Y1, X2, Y2, CTol : integer) : Boolean;
var ACx, ACy, C : integer;
begin
  for C := 1 to 3 do
  begin
    if FindColorSpiralTolerance(ACx, ACy, ChickenColour[C], X1, Y1, X2, Y2, CTol) then
    begin
      if ((not FindColorSpiral(x, y, 65280, ACx - 10, ACy - 35, ACx + 10, ACy + 10)) and
        (not FindColorSpiral(x, y, 255, ACx - 10, ACy - 35, ACx + 10, ACy + 10)) and
        (not FindColorSpiral(x, y, 16728128, ACx - 10, ACy - 35, ACx + 10, ACy + 10))) then
      begin
        MMouse(ACx, ACy, 0, 0);
        wait(80 + random(10));
        if IsUpTextMulti('ick', 'cke', 'ken') then
        begin
          Cx := ACx;
          Cy := ACy;
          Result := True;
          exit;
        end;
      end
      else
      begin
        WriteLn('Mouse hovered over a thing that was already in a fight');
      end;
    end;
    wait(50 + random(10));
    FindRandoms(FindRandomMS);
  end;
end;

{KillChicken - Find and kills chicken}

function KillChicken : Boolean;
var x1, y1, DsTimer : integer;
begin
  MarkTime(ChickenTimer);
  MarkTime(DsTimer);
  repeat
    if TimeFromMark(ChickenTimer) > 120000 + random(20000) then
    begin
      WriteLn('Hasn''t found a Chicken for ' + FloatToStr(TimeFromMark(ChickenTimer) / 1000) + ' seconds');
      Players[CurrentPlayer].loc := 'Can''tFindChickenFor' + FloatToStr(TimeFromMark(ChickenTimer) / 1000);
      LogOut;
    end;
    if TimeFromMark(LastKill) > 300000 + random(20000) then
    begin
      WriteLn('Hasn''t killed a Chicken for ' + FloatToStr(TimeFromMark(LastKill) / 1000) + ' seconds');
      Players[CurrentPlayer].loc := 'Hasn''tKillChickenFor' + FloatToStr(TimeFromMark(LastKill) / 1000);
      LogOut;
    end;
    if TimeFromMark(DsTimer) > 20000 + random(5000) then
    begin
      KeyDown(vk_right);
      wait(800 + random(400));
      KeyUp(vk_right);
      MarkTime(DsTimer);
    end;
    FindRandoms(FindRandomMS);
    wait(100);
    if FindChicken(x1, y1, MSx1, MSy1, MSx2, MSy2, ChickenTolerance) then
    begin
      Mouse(x1, y1, 0, 0, false);
      MarkTime(DsTimer);
      if ChooseOption(x1, y1, 'ttack') then
      begin
        Flag;
        MarkTime(ChickenTimer);
        break;
      end;
    end
    else
    begin
      if random(3) = 1 then
      begin
        MarkTime(DsTimer);
        if random(5) = 1 then
        begin
          KeyDown(vk_left);
          wait(800 + random(400));
          KeyUp(vk_left);
        end
        else
        begin
          KeyDown(vk_right);
          wait(800 + random(400));
          KeyUp(vk_right);
        end;
      end;
    end;
  until (not LoggedIn);
  LoadBMP;
  repeat
    FindRandoms(FindRandomMS);
    wait(100);
    if FindBitmapSpiralTolerance(BMP1HitKill, x, y, MSCx - 70, MSCy - 70, MSCx + 70, MSCy + 70, 20) then
    begin
      ReportVars[1] := ReportVars[1] + 1;
      OneHitKills[CurrentPlayer] := OneHitKills[CurrentPlayer] + 1;
      TotalOneHitKills := TotalOneHitKills + 1;
      MarkTime(LastKill);
      Result := True;
      break;
    end;
    if FindBitmapSpiralTolerance(BMPDead, x, y, MSCx - 70, MSCy - 70, MSCx + 70, MSCy + 70, 20) then
    begin
      ReportVars[0] := ReportVars[0] + 1;
      ChickensKilled[CurrentPlayer] := ChickensKilled[CurrentPlayer] + 1;
      TotalChickensKilled := TotalChickensKilled + 1;
      MarkTime(LastKill);
      Result := True;
      break;
    end;
    if (FindColorSpiral(x, y, 65280, MSCx - 70, MSCy - 70, MSCx + 70, MSCy + 70)) or
      (FindColorSpiral(x, y, 255, MSCx - 70, MSCy - 70, MSCx + 70, MSCy + 70)) or
      (FindColorSpiral(x, y, 16728128, MSCx - 70, MSCy - 70, MSCx + 70, MSCy + 70)) then
    begin
      MarkTime(ChickenTimer);
    end;
  until ((TimeFromMark(ChickenTimer) > 3000) or (not LoggedIn))
    FreeBMP;
end;

{BuryAllBones - Buries all bones}

procedure BuryAllBones;
var BoneTimer, Bones, Bx, By : integer;
begin
  LoadBMP;
  if FindBitmapToleranceIn(BMPBone, Bx, By, MIx1, MIy1, MIx2, MIy2, 20) then
  begin
    Bones := CountItemBMPTol(BMPBone, 20);
    ReportVars[2] := ReportVars[2] + Bones;
    BonesBuried[CurrentPlayer] := BonesBuried[CurrentPlayer] + Bones;
    TotalBonesBuried := TotalBonesBuried + Bones;
    repeat
      if FindBitmapToleranceIn(BMPBone, Bx, By, MIx1, MIy1, MIx2, MIy2, 20) then
      begin
        Mouse(Bx, By, 6, 6, True);
        MarkTime(BoneTimer);
        repeat
          wait(100 + random(50));
          if FindRandoms(FindRandomMS) then
          begin
            break;
          end;
        until ((not LoggedIn) or (TimeFromMark(BoneTimer) > 1300));
      end;
    until ((not FindBitmapToleranceIn(BMPBone, Bx, By, MIx1, MIy1, MIx2, MIy2, 20)) or (not LoggedIn));
  end;
  FreeBMP;
end;

{PickUpItems - picks up the itmes}

procedure PickUpItems;
begin
  MarkTime(ChickenTimer);
  GameTab(4);
  wait(50 + random(10));
  while ((TimeFromMark(ChickenTimer) < 4000) and (LoggedIn)) do
  begin
    wait(150 + random(50));
    if FindRandoms(FindRandomMS) then
    begin
      exit;
    end;
    if FindColorSpiralTolerance(x, y, FeatherColour, MSCx - 50, MSCy - 50, MSCx + 50, MSCy + 50, ChickenTolerance) or
      FindColorSpiralTolerance(x, y, BoneColour, MSCx - 50, MSCy - 50, MSCx + 50, MSCy + 50, ChickenTolerance) then
    begin
      if CollectFeathers then
      begin
        if (GotFeathers) or ((not GotFeathers) and (InvCount < 28)) then
        begin
          if FindColorSpiralTolerance(x, y, FeatherColour, MSCx - 50, MSCy - 50, MSCx + 50, MSCy + 50, ChickenTolerance) then
          begin
            Mouse(x, y, 0, 0, false);
            if ChooseOption(x, y, 'eather') then
            begin
              Flag;
              wait(300 + random(30));
              FeathersInInv;
            end;
          end;
        end;
      end;
      if FindRandoms(FindRandomMS) then
      begin
        exit;
      end;
      if ((CollectFeathers) and (GotFeathers) and (InvCount < 28)) or
        ((CollectFeathers) and (not GotFeathers) and (InvCount < 27)) or
        ((not CollectFeathers) and (InvCount < 28)) then
      begin
        if FindColorSpiralTolerance(x, y, BoneColour, MSCx - 50, MSCy - 50, MSCx + 50, MSCy + 50, ChickenTolerance) then
        begin
          Mouse(x, y, 0, 0, False);
          if ChooseOption(x, y, 'one') then
          begin
            Flag;
            wait(300 + random(30));
          end;
        end;
      end;
      if BuryBones then
      begin
        if (InvFull) or ((CollectFeathers) and (not GotFeathers) and (InvCount > 26)) then
        begin
          BuryAllBones;
        end;
      end;
      exit;
    end;
  end;
end;

{SSAntiBan - look more human, less chance of getting banned}

procedure SSAntiBan;
begin
  if random(AntiBanRate) <= 0 then
  begin
    if LoggedIn then
    begin
      case random(5) of
        0 : begin GameTab(2); wait(50 + random(50)); HoverSkill('attack', false); end;
        1 : begin GameTab(2); wait(50 + random(50)); PickUpMouse; HoverSkill('strength', false);
            if random(2) = 1 then
            begin wait(50 + random(50)); HoverSkill('prayer', false); end; end;
        2 : begin GameTab(2); wait(100 + random(50)); HoverSkill('defence', false); end;
        3 : begin PickUpMouse; GameTab(2); wait(50 + random(50)); HoverSkill('hitpoints', false); end;
        4 : begin GameTab(2); SetRun(True); end;
      end;
      wait(100 + random(100));
      GameTab(4);
      FindRandoms(FindRandomMS);
    end;
  end;
end;

{Da Stuff}
begin
  SetChickenCrusher;
  LogInPlayer;
  SRL_Logs := SRL_logs + 1;
  repeat
    SetUpPlayer;
    repeat
      if KillChicken then
      begin
        if BuryBones or CollectFeathers then
        begin
          PickUpItems;
        end;
        ProgressReport;
      end;
      SSAntiBan;
      if ((TimePerPlayer > 0) and (Players[CurrentPlayer].Worked > TimePerPlayer + random(TimePerPlayer / 10))) then
      begin
        Players[CurrentPlayer].loc := 'TimeReached';
        WriteLn('Time reached');
        break;
      end;
      if ((Players[CurrentPlayer].integer1 > 0) and (ChickensKilled[CurrentPlayer] >= Players[CurrentPlayer].integer1)) then
      begin
        LogOut;
        Players[CurrentPlayer].Active := False;
        Players[CurrentPlayer].loc := 'TargetReached';
        WriteLn('Target reached');
      end;
    until (not LoggedIn);
    ProgressReport;
    NextPlayer(LoggedIn);
  until (false);
end.

During this time I built an end table for my room.
cut the wood and all. (It's a small table… 27x24)

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : SftCell,F,104 mins,100 CK,27 OHK,0 BB,TimeReached
| 1 : Aha,F,178 mins,232 CK,22 OHK,0 BB,TimeReached
| 2 : Tommy2tone,F,98 mins,146 CK,3 OHK,0 BB,TimeReached
| 3 : Rico S,T,0 mins,139 CK,245 OHK,0 BB,TimeReached
| 4 Hours, 48 Minutes and 19 Seconds
| Chickens Killed : 617
| One Hit Kills : 297
| Bones Buried : 0
\========================================================/

*Names changed to protect the guilty

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 5 |
| Trade Missed : 2 |
| Talking Random : 5 |
| Dwarf Solved : 1 |
| OldMen Solved : 1 |
| Capn Hand Solved : 1 |
| Certer Missed : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Hello! Great script!!! GRAT! :)

Nice report dlindberg :sasmokin:

ok umm like i cant use it !!!!!!!!!!!!!!!1 i do not understand it keeps saying failed compile omg plz help me i dont get how to use scripts i just started today plz help

Maybe you could stop begging and use proper spelling?

Looks VERY good. Will edit in Proggy.


PROGGY!!!
/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : 1,F,2 mins,1 CK,0 OHK,0 BB,Can'tFindChickenFor129.947
| 1 : 2,F,30 mins,19 CK,0 OHK,0 BB,Can'tFindChickenFor129.947
| 2 : 3,F,46 mins,20 CK,7 OHK,0 BB,Can'tFindChickenFor129.947
| 3 : 4,T,11 mins,8 CK,3 OHK,0 BB,Can'tFindChickenFor129.947
| 1 Hours, 3 Minutes and 21 Seconds
| Chickens Killed : 48
| One Hit Kills : 10
| Bones Buried : 0
\========================================================/

LoL

The script works fine. I recommend:

1. Looking at the error (does it have a line #) and seeing where it might be affecting something.

2. Taking that information and searching through the Manual aka (R.T.F.M.) and/or searching the forums themselves with the little search tool up at the top of the page (waits while you scroll up).

If you then can not figure it out post a reply that:

a.) Makes sense
b.) Can be read be the average person…or even a 3yr old chimp.
c.) Give a more detailed description of your issue.

You might just post back here saying "BuT u Gyz 1 d1D rdz its" or however you would type it. If you did read it you would be able to prove it I would assume… but then again assuming makes an ASS out of U and ME.

I know I am new here and I am quiet and if I get crap for posting something this long well…. Sorry? (hides in the corner getting ready for the Dunce Cap)

| Progress Report |
| 0 : dark filled,T,26 mins,37 CK,0 OHK,0 BB,Can'tFindChickenFor131
| 27 Minutes and 12 Seconds
| Chickens Killed : 37
| One Hit Kills : 0
| Bones Buried : 0
\=========================

Not bad

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ———–r,T,101 mins,208 CK,269 OHK,0 BB,Can'tFindChickenFor131,921
| 1 Hours, 42 Minutes and 7 Seconds
| Chickens Killed : 208
| One Hit Kills : 269
| Bones Buried : 0
\========================================================/

Getting only better and better :P

* Got 1 idea..
Could you make new script, called ''cow crusher''
That would be cool :P

@siider There is already a really geat Cow script.

Cows! by WT-Fakawi rawks the cat's paw like you wouldn't believe

So not sure what happened here with the report but it looks different then the last one (and I do not mean the figures but the set up)

I ran it while sleeping so i did not get to match it up visually.

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 5 |
| Trade Missed : 2 |
| Talking Random : 5 |
| Dwarf Solved : 1 |
| OldMen Solved : 1 |
| Capn Hand Solved : 1 |
| Certer Missed : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : Tom,F,42 mins,63 CK,2 OHK,0 BB,Chickens
| 1 : Dick,F,28 mins,29 CK,11 OHK,0 BB,Chickens
| 2 : Harry,F,48 mins,41 CK,26 OHK,0 BB,Chickens
| 3 : JDoe,T,49 mins,69 CK,116 OHK,0 BB,Chickens
| 1 Hours, 53 Minutes and 8 Seconds
| Chickens Killed : 202
| One Hit Kills : 155
| Bones Buried : 0
\========================================================/
*names changed

still a awesome script.

you should try making a walkback and then apply for srl members

He already said it's for all chickens, everywhere. He could try walkback near lumbridge…not recommended though.

The chickens are already raped by Tara's Chickensweeper in members section…we don't need this too.

wow worked great =)) heres proggie

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| | 1 Hours, 23 Minutes and 11 Seconds
| Chickens Killed : 145
| One Hit Kills : 7
| Bones Buried : 0
\========================================================/

another 1 i did later didnt work full time came back to find myself dead

/==========Chicken Crusher 0.79 by ShapeShifter==========\
|
| 25 Minutes and 22 Seconds
| Chickens Killed : 49
| One Hit Kills : 29
| Bones Buried : 0
\========================================================/

Thanks for the posts, good to know people are using my script!

Sorry about not replying, been working hard on version 0.83 which will have the ability to make your skills(attack, strength and defence) even.

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : c0m3 swap,T,129 mins,259 CK,3 OHK,0 BB,Chickens
| 2 Hours, 10 Minutes and 38 Seconds
| Chickens Killed : 259
| One Hit Kills : 3
| Bones Buried : 0
\========================================================/

great script but work on the randoms didnt do ginie mystery box or evil chickeen, =/

Ya I have been using this script a lot its awesome will post a prog report later but I think the random detection got screwed up in the update or something because I works great never has a problem but after a while when a random shows up it doesn't do anything and the random kills my char. Also sometimes people leave the gate open and the chickens get out and the script runs after them and gets lost I am not sure what could be done about this maybe like some sort of recognition that its leaving the gate and where it is prospective to where the char is and walk back to it and close it but hey I am not sure how to do that so I can only speculate.

Wow… I am sorry I take back what I said about the randoms I think it was my falt I wasn't doing the nickname thing correctly so that may be why so forget what I said before I am gonna give it another try and post a prog report later

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ******,F,152 mins,152 CK,81 OHK,0 BB,Can'tFindChickenFor120.344
| 1 : ******,F,46 mins,37 CK,6 OHK,0 BB,Can'tFindChickenFor120.344
| 2 : ******,T,25 mins,225 CK,232 OHK,0 BB,Can'tFindChickenFor120.344
| 3 Hours, 42 Minutes and 6 Seconds
| Chickens Killed : 414
| One Hit Kills : 319
| Bones Buried : 0
\========================================================/

Heres the prog I promised.

Couldnt get the proggy to copy but it worked for 23 mins or something and killed 47 chickens! Thank you for the script!

press ctrl c in debug box then press paste.

haxor

Great work Zayyan! You are doing way good, when you came round yesterday and downloaded everything, i was using your Chicken Crusher all night :P Only died once i think.

I think it works better when you use 2-3 accounts at once aswell, if you set it to around 10 mins per person, because this doesn't give RS enough time to throw a random at you. And if all the characters are yours, you still get more or less the same ammount of feathers (If you are collecting of course) And exp. I've lvled up a lot over night on a couple of characters. Keep it up mate :) And if keep us posted as much as you are now, we are going to have 0 problems :)

Thanks,

Alex :)

PS. Come round my house again some time :P And you can show me the ropes on scripting (Sorry if this is going off subject xD Just can't be bothered to call him T_T)


Edit: Got my first good Proggy that i was bothered to copy + paste :)

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : alexkat99,T,115 mins,145 CK,187 OHK,0 BB,NoGameTab
| 1 Hours, 56 Minutes and 43 Seconds
| Chickens Killed : 145
| One Hit Kills : 187
| Bones Buried : 0
\========================================================/

Sorry about not replying everyone been working on new version, just finished the new ability:even skills, will take the screen turning off so it finds randoms better and will make it do loads of other things to, this will take a while so sorry about this and thanks for the posts and proggies. ;)

runescape update somehtings so srl cant solve some randoms

From: lostspyda
It definetly attacks farmers lol. I may have just got a screenshot of it.


Good script. Doesnt run away from the Evil Chicken random though.

Change the tolerance from 4 to 8 for example.

EDIT: Is it possible to set the players to somewhere once and let them be allways the same, so i dont have to write the form every time?

From: Eicca
EDIT: Is it possible to set the players to somewhere once and let them be allways the same, so i dont have to write the form every time?

I'll try and do that in the next version sorry about this, I know it can get annoyin

Forgot Progress Report but worked great for 20 minutes until a Drunken Dwarf got me.

Fully new to Scar/SRL .. i dont get how the "form" works? how do i fill out the form for this script :S sum1 help plzzzz so keen to start crushing chickens BAHAHA!

cHeerS!

From: n3m3sis
Fully new to Scar/SRL .. i dont get how the "form" works? how do i fill out the form for this script :S sum1 help plzzzz so keen to start crushing chickens BAHAHA!

cHeerS!

When you have downloaded the file, open it. Then click on Run Script (The Green Play Button on the ToolBar) Then the Form should pop up for you to fill in and start crushing Chickens :P

Hope this helps

From: siider
/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ———–r,T,101 mins,208 CK,269 OHK,0 BB,Can'tFindChickenFor131,921
| 1 Hours, 42 Minutes and 7 Seconds
| Chickens Killed : 208
| One Hit Kills : 269
| Bones Buried : 0
\========================================================/

Getting only better and better :P

* Got 1 idea..
Could you make new script, called ''cow crusher''
That would be cool :P

He told me that he was going to make a Goblin or a Cow Crusher over the phone, but after he makes a banker for his Blaster Miner lol, Shouldn't be too long but he is hopefully going to do it.

Just a Short report for you people

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : y,F,54 mins,41 CK,2 OHK,0 BB,Chickens
| 1 : y,T,13 mins,25 CK,3 OHK,0 BB,Chickens
| 42 Minutes and 44 Seconds
| Chickens Killed : 66
| One Hit Kills : 5
| Bones Buried : 0
\========================================================/

Very good script
Easy to use
works excellent!

*Edit* Longer Runtime

hahaha! omg im such a nublet! cheers ALEX!! btw nice name :P mines the same heh

Nice script. I just have a few comments/suggestions

1) It would be nice if you could add an option to use forms or not.
2) Alternatively, if you could make the form save the character info, that would work too.
3) FindFight checks HP before running away, if the character is at full hp, then it won't run away. In other words, you could use FindFight to find fighting randoms. Although, changing from gametab 4 to 2 a lot is kinda botty looking. So you might want to make your own find fight. Chickens cannot do damage to anyone. So you could just have your script check for red, and if it finds it, it runs.

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ********,T,11 mins,192 CK,0 OHK,0 BB,Chickens
| 1 : ********,F,46 mins,57 CK,0 OHK,0 BB,Chickens
| 2 : ********,T,62 mins,167 CK,4 OHK,0 BB,Chickens
| 3 : ********,F,46 mins,51 CK,2 OHK,0 BB,Chickens
| 4 : ********,F,8 mins,80 CK,2 OHK,0 BB,Chickens
| 5 : ********,F,0 mins,0 CK,0 OHK,0 BB,Chickens
| 6 : ********,T,62 mins,166 CK,0 OHK,0 BB,Chickens
| 7 : ********,F,44 mins,56 CK,0 OHK,0 BB,Chickens
| 5 Hours, 23 Minutes and 34 Seconds
| Chickens Killed : 769
| One Hit Kills : 8
| Bones Buried : 0
\========================================================/

im running it on vm right now ill post progie later just a quick ? is it soposto kill the farmer??


EDIT: it just dided trying to kill the farmer dude

It logs in turns chats off then right clicks chickens but doesnt att. y?

this script seems to run perfectly for me..

apart from the fact that ive found my character dead once and getting killed by a dwarf another time, maybe add a feature that auto runs on a certain percentage of life? since chickens cant damage at all… it'd havto be random events doing the killing?!?

or ther already somthin like that im just not doing sumthin properly?


thanks SHAPESHIFTER!!! bye the way.. nice name :P love SS musiX :D

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : aaa,F,56 mins,53 CK,0 OHK,0 BB,Chickens
| 1 : bbb,F,19 mins,13 CK,6 OHK,0 BB,Chickens
| 2 : ccc,F,17 mins,5 CK,2 OHK,0 BB,Chickens
| 3 : ddd,F,49 mins,156 CK,4 OHK,0 BB,Chickens
| 4 : eee,F,51 mins,223 CK,41 OHK,0 BB,Chickens
| 5 : fff,T,1 mins,240 CK,61 OHK,0 BB,Chickens
| 6 : ggg,F,48 mins,214 CK,76 OHK,0 BB,Chickens
| 7 : hhh,T,22 mins,342 CK,145 OHK,0 BB,Chickens
| 9 Hours, 21 Minutes and 6 Seconds
| Chickens Killed : 1246
| One Hit Kills : 335
| Bones Buried : 0
————————————————————

Nice proggies, I will sort out the randoms on the next version, and I'll try and see how I could add a run away from fighting randoms, It'll be hard because if you just got attacked by an evil Chicken and run away next time you get attacked by a normal Chicken your hp will still be abit down so the script is going to think you're under attack again, so i might just add a death walk where you goto the Chicken place north of lumbridge.

Line 716: [Error] (16212:6): Unknown identifier 'BitmapFromString2' in script

What do I need to do?

You need Scar Divi 3.11 and SRL 3.82, I am 90% sure you need Scar Divi 3.11 for that problem m8.

Do I have to re-download? Or si there an option in Scar where I can update to that?

And how can I check which version of SRL I have? I found the Scar version, which is 3.06.

And if I do need to re-download can someone please point me to the version he said above?

EDIT: NVM i found the new scar at Freddy1990.com and the download button inside scar, so ill install and run it again. Fingers crossed :)

I got it to work and its great! Except any random kills it….

My best one so far:

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ahh_hha,T,48 mins,62 CK,119 OHK,0 BB,Chickens
| 50 Minutes and 1 Seconds
| Chickens Killed : 62
| One Hit Kills : 119
| Bones Buried : 0
\========================================================/

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : username,T,28 mins,92 CK,0 OHK,0 BB,Chickens
| 29 Minutes and 11 Seconds
| Chickens Killed : 92
| One Hit Kills : 0
| Bones Buried : 0
\========================================================/

I like alot, except for the feather picker. Its quicker to kill another chicken often times then picking up a feather :(.

all i can say is WOW!
/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : *,T,34 mins,100 CK,4 OHK,0 BB,Chickens
| 34 Minutes and 31 Seconds
| Chickens Killed : 100
| One Hit Kills : 4
| Bones Buried : 0
\========================================================/

Thank you so much, this is awesome!!! Great work, good effort hope you live long take care.

When i'm done I'll post my progg soon.

I just had it going for over 4hrs and I closed the scarscape before saving the progress. :(

But I coudl say it was exactly above 4 hours running over 600 chickens killed with over 5 logins. Awesome awesome machine

I set iy up and went to get food, came back and worked well i guess…

There is a Farmer bug, fiund myself attacking the farmers twice

From: King of Time
I set iy up and went to get food, came back and worked well i guess…

There is a Farmer bug, fiund myself attacking the farmers twice

I finally found a way to prevent it from attacking farmers lol(was very easy).
Will be out in the next version, sorry this might take a while to get the next version out, there's quite alot of stuff to do I'll say it'll take around 2 weeks because I'm also going to fix Blaster Miner and I'm working on a Varrock East Miner + Banker.

wow man it really works good finds chickens great and everything thanks for the upload:spot:

Fabulous .. love it! :D

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : deelizah,T,73 mins,127 CK,80 OHK,0 BB,Chickens
| 1 Hours, 14 Minutes and 40 Seconds
| Chickens Killed : 127
| One Hit Kills : 80
| Bones Buried : 0
\========================================================/

From 21 to 25 attack in that timeframe.

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 1 |
| Talking Random : 2 |
| Capn Hand Solved : 1 |
| Certer Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Now to do 20 to 25 Strength :)

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : T,24 mins,242 CK,0 OHK,0 BB,NoGameTab
| 1 : F,96 mins,89 CK,0 OHK,0 BB,NoGameTab
| 2 : F,46 mins,46 CK,0 OHK,0 BB,NoGameTab
| 3 : F,146 mins,137 CK,1 OHK,0 BB,NoGameTab
| 4 : F,140 mins,111 CK,1 OHK,0 BB,NoGameTab
| 5 : F,22 mins,11 CK,2 OHK,0 BB,NoGameTab
| 6 : F,46 mins,48 CK,1 OHK,0 BB,NoGameTab
| 7 : F,92 mins,97 CK,0 OHK,0 BB,NoGameTab
| 7 Hours, 0 Minutes and 36 Seconds
| Chickens Killed : 781
| One Hit Kills : 5
| Bones Buried : 0
\========================================================/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 9 |
| Trade Missed : 2 |
| Talking Random : 7 |
| Dwarf Solved : 4 |
| Rick Solved : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

really nice script =)

It works, but how do I get it to use it for my mage? I want to use the Magic XP and defence XP (shield and spell). Not sure what to put in the tabs.

Thanks

Yaya! :D Awsome Script, Awsome Programming You've Got My Vote Here's My Progy Report :bart: ;

/==========Chicken Crusher 0.79 by ShapeShifter========\
| Progress Report
| 0 : Exabytes,T,61 mins,82 CK,153 OHK,0 BB,Chickens
| 1 Hours, 3 Minutes and 15 Seconds
| Chickens Killed : 82
| One Hit Kills : 153
| Bones Buried : 0
\==========================================/

i keep getting a message saying error in line 716 unknown identifier bitmap from string2

Try SCAR 3.11.

From: element12343
i keep getting a message saying error in line 716 unknown identifier bitmap from string2

You need Scar Divi 3.11 and SRL 3.81 m8 to use the scrpt. ;)

How do you set it up so that if you use magic, it trains magic and defence at the same time? (shield one).

Also a few problems, i return to the screen to find myself in the wizard tower place with the big red demon monster behind the bars. Also it can't deal with swarms or secuirty guards.

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ,F,268 mins,165 CK,560 OHK,0 BB,Chickens
| 1 : ,F,44 mins,32 CK,65 OHK,0 BB,Chickens
| 2 : ,F,4 mins,0 CK,0 OHK,0 BB,Chickens
| 3 : ,F,70 mins,63 CK,80 OHK,0 BB,Chickens
| 4 : F,42 mins,41 CK,52 OHK,0 BB,Chickens
| 5 : ,T,0 mins,0 CK,0 OHK,0 BB,Chickens
| 3 Hours, 39 Minutes and 45 Seconds
| Chickens Killed : 301
| One Hit Kills : 757
| Bones Buried : 0
\========================================================/
NextPlayer
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 6 |
| Trade Missed : 23 |
| Talking Random : 8 |
| Rick Solved : 1 |
| OldMen Solved : 1 |
| Frog Solved : 1 |
| Capn Hand Solved : 1 |
| Certer Solved : 3 |
| Certer Missed : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

hehe :D

/==========Chicken Crusher 0.79 by ShapeShifter==========\
| Progress Report |
| 0 : ,F,44 mins,23 CK,41 OHK,0 BB,Chickens
| 1 : ,F,256 mins,158 CK,485 OHK,0 BB,Chickens
| 2 : ,F,4 mins,0 CK,0 OHK,0 BB,Chickens
| 3 : ,F,2 mins,0 CK,0 OHK,0 BB,Chickens
| 4 : ,T,38 mins,68 CK,123 OHK,0 BB,Chickens
| 3 Hours, 17 Minutes and 1 Seconds
| Chickens Killed : 249
| One Hit Kills : 649
| Bones Buried : 0
\========================================================/
NextPlayer

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in : 5 |
| Talking Random : 5 |
| Dwarf Solved : 2 |
| OldMen Solved : 1 |
| Capn Hand Solved : 1 |
| Certer Solved : 1 |
| Death : 4 |
| Quiz[es] found : 3 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

hmmm im gettin really good runs using the same char as first 3 players, and 2nd char as the next 3 players :D!!!

i get this error help me plz

Line 97: [Error] (18833:1): Duplicate identifier 'b' in script C:\Documents and Settings\Legault\Desktop\alexstempfolder\chikens\Chicken Crusher 0[1].79.scar

Nice script no lag or nothing XD

/==========Chicken Crusher 0.79 by ShapeShifter==========\
|      Progress Report                                   |
|   0 : Asuyttfg62,F,0 mins,91 CK,0 OHK,0 BB,TimeReached
|   1 : Roths9,F,44 mins,38 CK,4 OHK,0 BB,TimeReached
|   2 : Briav11,F,0 mins,147 CK,34 OHK,0 BB,TimeReached
|   3 : Stetor8871,F,0 mins,97 CK,0 OHK,0 BB,TimeReached
|   4 : Kingkong2321,F,0 mins,0 CK,0 OHK,0 BB,TimeReached
|   5 : Joeiebo3432,T,0 mins,387 CK,151 OHK,0 BB,TimeReached
| 5 Hours, 34 Minutes and 53 Seconds
| Chickens Killed : 760
| One Hit Kills   : 189
| Bones Buried    : 0
\========================================================/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|     SRL Randoms Report       |
|    www.villu-reborn.com      |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Logged in             :  24  |
| Quiz[es] found        :  1   |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Only one random 15 minute intervals

It logged in fine, but my guy only stood there.

Maybe thats 'cause Srl needs to be updated?
(That is in fact the reason.)

Looks like an awesome script, but when It doesnt run properly. I have 32 bit color, Scar Divi 3.11, SRL 3.81, start logged off, and set all the things, Name, Pass, Nick, etc, then hit run. It logs on beautifully, but when it comes to the actual game it does nothing; doesnt click, doesnt move. I also get no errors at all, so I have no idea whats the matter.

Thanks

EDIT: ^^^^^ (Above Post) So does that mean we need to wait for the SRL Library to update or did you mean that person's version was out of date?

i haven't tested script yet but im hoping all i need to do is play n it works i dont understand how to type thingz in lol

With last srl it worked perfectly for me.. got my att, str to 45..
But when i try to run it with new srl i get error like this..

Failed when compiling
Line 243: [Error] (12906:18): Unknown identifier 'INTEGER1' in script C:\Documents and Settings\Cyber\Desktop\Chicken Crusher 0.79.scar

Any ideas :S?

umm he has to update it to go with latest srl.

haxor

it looks really good, but i cant get script to work.. i set it up then mouse just sits there.. could you give me the exact script for killing chickens in between fally and draynor please? if thats not to much of a problem

Look at the post above yours.

From: muhammad ali
it looks really good, but i cant get script to work.. i set it up then mouse just sits there.. could you give me the exact script for killing chickens in between fally and draynor please? if thats not to much of a problem

read my post. he has to update!!! it to go with the new srl. once he has done this the script should work.

haxor

Learn hwo to update it yourself

Ok, I tried running your script, but I thought it would do more than just log me in -.-

That's all it did, log me in. But I think I may be doing something else wrong. It wouldn't be voted 4.67/5 stars if it was bad. Please enlighten me on how to fix this problem.

From: I B X R
Ok, I tried running your script, but I thought it would do more than just log me in -.-

That's all it did, log me in. But I think I may be doing something else wrong. It wouldn't be voted 4.67/5 stars if it was bad. Please enlighten me on how to fix this problem.

Heres a little "enlightenment" Read the post ^up^there^ HE NEEDS TO UPDATE THE SCRIPT TO GO WITH SRL 4!

Ok ok

i need some help im new to this kinda stucc and i just want to no what

yea im new.
whenever i click the attatchment the scar divi screen comes up blank.

help?
jxmmy

hey, will you guys please stop and just read the posts above…it says that it NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4

i know it needs to be updated, but with many scripts i get this error with the new srl and scar
ine 243: [Error] (12906:18): Unknown identifier 'INTEGER1' in script C:\Users….

andone got a solution?

uhhh this script needs to be updated to go with srl 4.

patience

haxor

Sorry everyone I've been busy just got my new laptop, which is the Dell XPS M1710! =] I'll update this script after i get the internet on it, at the moment I'm using my old pc, which is really old and slow so that's why I'm not going to carry on making scripts on this pc I'm just going to wait till I get internet on my laptop, sorry about this.

From: hermpie
i got a proggy and i got a tip put a run direction in form because u cant use food if evil chicken comes or zombie u will die so but nice work and the form is very very very good and the proggy doesnt tell the right info

/==========Chicken Crusher 0.77 by ShapeShifter==========\
| Progress Report |
| 0 : secret ore,T,66 mins,117 CK,118 OHK,0 BB,Chickens
| 1 Hours, 7 Minutes and 18 Seconds
| Chickens Killed : 117 <—–ok…now look at one hit kills
| [One Hit Kills] : 118 <——- wtf?
| Bones Buried : 0
\========================================================/

bit of editing :P lol 117 killed chickens and 118 of them were 1 shots?:sasmokin:

From: ShapeShifter
Sorry everyone I've been busy just got my new laptop, which is the Dell XPS M1710! =] I'll update this script after i get the internet on it, at the moment I'm using my old pc, which is really old and slow so that's why I'm not going to carry on making scripts on this pc I'm just going to wait till I get internet on my laptop, sorry about this.

Wicked, can't wait.

leecher just update it byyourself.. shapeshifter can i get permission to do it if so then pm me…

From: hermpie
leecher just update it byyourself.. shapeshifter can i get permission to do it if so then pm me…

I am sure if he knew how to update it himself, he wouldn't be asking. Nothing is wrong with leeching, you release scripts on here to be downloaded, not everyone can be a scripter, they just don't have the mentality.

Ywev

People don't post scripts to be leeched, they post them so they can be tested and the person is able to post bugs and proggies so the scripts can be improved. No one posts a script that they spent hours upon hours making so it can simply be leeched.

Dont like the form… wont use this

it starts and loggs me in, then wen im standing at the chicken pen it does nothing.

my loggs in but doesnt attak chickens

my loggs in but doesnt attak chickens

help

The script hasn't been updated for SRL 4, guys. When he updates it, he'll either post here or update the front page, so stay tuned for updates. I know he made a post on the last page or two about having Internet issues on his new computer, so just be patient.

Chicken Crusher's on its way!
Just fixed it so its compatble with srl 4, also there's new standards now I'm going to add the save function to the form, sorry for the long wait. Release date hopefully on the 8th, :)

       _______
      /  ____/        Version 0.79
     /  /      ______
    /  /icken /  ___/          \\
    \  \     /  /rusher      _( o >
     \  \____\  \___        /__=-/
      \_______-_____\         ||
                    By ShapeShifter

Is it Cicken Crusher or Chicken Crusher? :P

From: jez

       _______
      /  ____/        Version 0.79
     /  /      ______
    /  /icken /  ___/          \\
    \  \     /  /rusher      _( o >
     \  \____\  \___        /__=-/
      \_______-_____\         ||
                    By ShapeShifter

Is it Cicken Crusher or Chicken Crusher? :P

lol, btw i thin kthis script is outdated too my friend ;)

Lol, I changed it to Chicken Crusher, Alexkat already told me about it thought no one would recgonise =].

From: shadowx46
my loggs in but doesnt attak chickens

From: shadowx46
my loggs in but doesnt attak chickens

From: shadowx46
it starts and loggs me in, then wen im standing at the chicken pen it does nothing.

From: shadowx46
help

WHOA, I think that is a first for me…seeing someone QUAD post that is just simply





DUMB :duh::duh::duh:
(i think this one deserves noob points?)

Damn you HyperSecret you beat me to it ^^^ Holy Sh*t quad post. N00b points for him.:f: :duh:

I see great potential in you, to bad the biggest part of the script is actually the form.
Try using DTMs when you can and cut down the lenght of your BMPs.
However, great work ;)

Line 249: [Error] (1153:11): Unknown identifier 'ScanExactMinimapD' in script C:\Program Files\SCAR 3.11\includes\SRL/SRL/Core/Color.scar

I downloaded scar 3.11 and srl 4 so… i really dont get what im doing wrong. I've spent countless hours trying to make this work :confused: can anyone help me?

OUT OF DATE

From: shadowx46
it starts and loggs me in, then wen im standing at the chicken pen it does nothing.

same… im consistintly having probs with scar… the only script ive gotten to work more than 2 sec are ones i've written

Can anyone help me?? The script works untill my guy logs in, then it just sits there and doesn't move…what did i do wrong?

NEVERMIND….

(hey, will you guys please stop and just read the posts above…it says that it NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4
NEEDS TO BE UPDATED FOR SRL 4)

i know why it doesnt work now…

Failed when compiling
Line 243: [Error] (12906:18): Unknown identifier 'INTEGER1' in script
Line 251: [Error] (12914:18): Unknown identifier 'STRING1' in script
Ummm… I get that error.. help pls?

gunna update it?

Line 243: [Error] (15354:18): Unknown identifier 'INTEGER1' in script C:\Documents and Settings\Krendzel\Local Settings\Temporary Internet Files\Content.IE5\JEW3FD0H\Chicken%20Crusher%200[1].79.scar
Failed when compiling
Line 250: [Error] (15361:18): Unknown identifier 'STRING1' in script C:\Documents and Settings\Krendzel\Local Settings\Temporary Internet Files\Content.IE5\JEW3FD0H\Chicken%20Crusher%200[1].79.scar
Failed when compiling
Line 250: [Error] (15361:18): Unknown identifier 'STRING' in script C:\Documents and Settings\Krendzel\Local Settings\Temporary Internet Files\Content.IE5\JEW3FD0H\Chicken%20Crusher%200[1].79.scar
Noob script.

dritar, don't you think this script is sort of outdated?

Date made:23/07/07
Programs Used:Scar Divi 3.11 and SRL 3.81

and calling it a noob script won't do you any good, so why don't you go make your own?

Ok sorry for this everyone am in progress of changing it will be done soon/should be, I'm working on it right now

sorry everyone

0: ownu | T | 325 feathers | 70 chickens
1: pwnzu | T | 165 feathers | 35 chickens
2: | F | 0 feathers | 0 chickens
/////////////////////////////////////////////
forefeathers
ran for 48 Minutes and 22 Seconds
killed 105 chickens
Picked up 490 feathers
/////////////////////////////////////////////



Works Flawless Good Job!

Yeah, I'll test this for sure once it's updated, but for now, it looks good.

Chicken Crusher 0.83 is out a quick but pretty good update, there may be still bugs please try

I am trying to run this script on 2 computers at my house and it works fine on one of my computers but on this one after about 8-15 minutes of the script working fine it stops suddenly and this comes up:
[Runtime Error] : Exception: Access violation at address 00671FE5 in module 'SCAR.EXE'. Read of address 83A7A484 in line 184 in script C:\PROGRAM FILES\SCAR 3.12\includes\SRL/SRL/Core/Text.scar

heres another one

[Runtime Error] : Exception: Access violation at address 00671FE5 in module 'SCAR.EXE'. Read of address 82E9E484 in line 184 in script C:\PROGRAM FILES\SCAR 3.12\includes\SRL/SRL/Core/Text.scar

(different read of address)

whats the problem?

From: nhstarter10
I am trying to run this script on 2 computers at my house and it works fine on one of my computers but on this one after about 8-15 minutes of the script working fine it stops suddenly and this comes up:
[Runtime Error] : Exception: Access violation at address 00671FE5 in module 'SCAR.EXE'. Read of address 83A7A484 in line 184 in script C:\PROGRAM FILES\SCAR 3.12\includes\SRL/SRL/Core/Text.scar

heres another one

[Runtime Error] : Exception: Access violation at address 00671FE5 in module 'SCAR.EXE'. Read of address 82E9E484 in line 184 in script C:\PROGRAM FILES\SCAR 3.12\includes\SRL/SRL/Core/Text.scar

(different read of address)

whats the problem?

Sorry mate I have no idea maybe one of the experianced coders could help you out.

great script ran her several times only problem i had was it would log after burying 1load of bones even tho it was set for more all well i guess ill just not bury them next time here a bunch of proggies didnt run for very long each time because i only have 2 ppl training right now and it would log after the one load but here they are anyways

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,T,35 mins,42 CK,11 OHK,25 BB,Chickens
| 37 Minutes and 1 Seconds
| Chickens Killed : 42
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,T,35 mins,42 CK,11 OHK,25 BB,Chickens
| 37 Minutes and 1 Seconds
| Chickens Killed : 42
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
NextPlayer
phats4me1
1:phats4me1
Weapon equiped scimitar, setted fighting style to shared
Got feathers
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,0 mins,1 CK,0 OHK,0 BB,Chickens
| 37 Minutes and 36 Seconds
| Chickens Killed : 43
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,0 mins,2 CK,0 OHK,0 BB,Chickens
| 38 Minutes and 0 Seconds
| Chickens Killed : 44
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,0 mins,3 CK,0 OHK,0 BB,Chickens
| 38 Minutes and 10 Seconds
| Chickens Killed : 45
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,1 mins,4 CK,0 OHK,0 BB,Chickens
| 38 Minutes and 47 Seconds
| Chickens Killed : 46
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,1 mins,5 CK,0 OHK,0 BB,Chickens
| 39 Minutes and 20 Seconds
| Chickens Killed : 47
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,3 mins,6 CK,0 OHK,0 BB,Chickens
| 40 Minutes and 40 Seconds
| Chickens Killed : 48
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,3 mins,7 CK,0 OHK,0 BB,Chickens
| 41 Minutes and 11 Seconds
| Chickens Killed : 49
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,3 mins,8 CK,0 OHK,0 BB,Chickens
| 41 Minutes and 20 Seconds
| Chickens Killed : 50
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,4 mins,9 CK,0 OHK,0 BB,Chickens
| 42 Minutes and 9 Seconds
| Chickens Killed : 51
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,5 mins,10 CK,0 OHK,0 BB,Chickens
| 43 Minutes and 7 Seconds
| Chickens Killed : 52
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,6 mins,11 CK,0 OHK,0 BB,Chickens
| 43 Minutes and 41 Seconds
| Chickens Killed : 53
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,6 mins,12 CK,0 OHK,0 BB,Chickens
| 43 Minutes and 55 Seconds
| Chickens Killed : 54
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,6 mins,13 CK,0 OHK,0 BB,Chickens
| 44 Minutes and 21 Seconds
| Chickens Killed : 55
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,7 mins,14 CK,0 OHK,0 BB,Chickens
| 44 Minutes and 35 Seconds
| Chickens Killed : 56
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,7 mins,15 CK,0 OHK,0 BB,Chickens
| 45 Minutes and 1 Seconds
| Chickens Killed : 57
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,8 mins,16 CK,0 OHK,0 BB,Chickens
| 45 Minutes and 45 Seconds
| Chickens Killed : 58
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,8 mins,17 CK,0 OHK,0 BB,Chickens
| 46 Minutes and 5 Seconds
| Chickens Killed : 59
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,8 mins,18 CK,0 OHK,0 BB,Chickens
| 46 Minutes and 20 Seconds
| Chickens Killed : 60
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,9 mins,19 CK,0 OHK,0 BB,Chickens
| 47 Minutes and 16 Seconds
| Chickens Killed : 61
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,10 mins,20 CK,0 OHK,0 BB,Chickens
| 47 Minutes and 33 Seconds
| Chickens Killed : 62
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,10 mins,21 CK,0 OHK,0 BB,Chickens
| 47 Minutes and 59 Seconds
| Chickens Killed : 63
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,11 mins,22 CK,0 OHK,0 BB,Chickens
| 48 Minutes and 23 Seconds
| Chickens Killed : 64
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,11 mins,23 CK,0 OHK,0 BB,Chickens
| 48 Minutes and 49 Seconds
| Chickens Killed : 65
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,12 mins,24 CK,0 OHK,0 BB,Chickens
| 49 Minutes and 39 Seconds
| Chickens Killed : 66
| One Hit Kills : 11
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,12 mins,24 CK,1 OHK,0 BB,Chickens
| 49 Minutes and 46 Seconds
| Chickens Killed : 66
| One Hit Kills : 12
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,12 mins,24 CK,2 OHK,0 BB,Chickens
| 50 Minutes and 10 Seconds
| Chickens Killed : 66
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,12 mins,25 CK,2 OHK,0 BB,Chickens
| 50 Minutes and 17 Seconds
| Chickens Killed : 67
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,13 mins,26 CK,2 OHK,0 BB,Chickens
| 50 Minutes and 37 Seconds
| Chickens Killed : 68
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,13 mins,27 CK,2 OHK,0 BB,Chickens
| 50 Minutes and 51 Seconds
| Chickens Killed : 69
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,13 mins,28 CK,2 OHK,0 BB,Chickens
| 51 Minutes and 4 Seconds
| Chickens Killed : 70
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,14 mins,29 CK,2 OHK,0 BB,Chickens
| 51 Minutes and 25 Seconds
| Chickens Killed : 71
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,14 mins,30 CK,2 OHK,0 BB,Chickens
| 51 Minutes and 41 Seconds
| Chickens Killed : 72
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,14 mins,31 CK,2 OHK,0 BB,Chickens
| 51 Minutes and 56 Seconds
| Chickens Killed : 73
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,14 mins,32 CK,2 OHK,0 BB,Chickens
| 52 Minutes and 13 Seconds
| Chickens Killed : 74
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,15 mins,33 CK,2 OHK,0 BB,Chickens
| 52 Minutes and 45 Seconds
| Chickens Killed : 75
| One Hit Kills : 13
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,15 mins,33 CK,3 OHK,0 BB,Chickens
| 53 Minutes and 1 Seconds
| Chickens Killed : 75
| One Hit Kills : 14
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,15 mins,34 CK,3 OHK,0 BB,Chickens
| 53 Minutes and 6 Seconds
| Chickens Killed : 76
| One Hit Kills : 14
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,15 mins,34 CK,4 OHK,0 BB,Chickens
| 53 Minutes and 15 Seconds
| Chickens Killed : 76
| One Hit Kills : 15
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,16 mins,34 CK,5 OHK,0 BB,Chickens
| 53 Minutes and 55 Seconds
| Chickens Killed : 76
| One Hit Kills : 16
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,16 mins,34 CK,6 OHK,0 BB,Chickens
| 54 Minutes and 7 Seconds
| Chickens Killed : 76
| One Hit Kills : 17
| Bones Buried : 25
\========================================================/
Mouse hovered over a thing that was apparently in a fight
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,17 mins,35 CK,6 OHK,0 BB,Chickens
| 54 Minutes and 26 Seconds
| Chickens Killed : 77
| One Hit Kills : 17
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,17 mins,36 CK,6 OHK,0 BB,Chickens
| 54 Minutes and 45 Seconds
| Chickens Killed : 78
| One Hit Kills : 17
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,18 mins,37 CK,6 OHK,0 BB,Chickens
| 55 Minutes and 26 Seconds
| Chickens Killed : 79
| One Hit Kills : 17
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,18 mins,38 CK,6 OHK,0 BB,Chickens
| 55 Minutes and 30 Seconds
| Chickens Killed : 80
| One Hit Kills : 17
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,18 mins,38 CK,7 OHK,0 BB,Chickens
| 55 Minutes and 37 Seconds
| Chickens Killed : 80
| One Hit Kills : 18
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,18 mins,39 CK,7 OHK,0 BB,Chickens
| 55 Minutes and 53 Seconds
| Chickens Killed : 81
| One Hit Kills : 18
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,18 mins,40 CK,7 OHK,0 BB,Chickens
| 56 Minutes and 14 Seconds
| Chickens Killed : 82
| One Hit Kills : 18
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,19 mins,41 CK,7 OHK,0 BB,Chickens
| 56 Minutes and 37 Seconds
| Chickens Killed : 83
| One Hit Kills : 18
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,19 mins,42 CK,7 OHK,0 BB,Chickens
| 57 Minutes and 18 Seconds
| Chickens Killed : 84
| One Hit Kills : 18
| Bones Buried : 25
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,23 mins,43 CK,7 OHK,25 BB,Chickens
| 1 Hours, 0 Minutes and 58 Seconds
| Chickens Killed : 85
| One Hit Kills : 18
| Bones Buried : 50
\========================================================/
Invalid SRL ID

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : mikedoucette,F,70 mins,42 CK,11 OHK,25 BB,Chickens
| 1 : phats4me1,T,23 mins,43 CK,7 OHK,25 BB,Chickens
| 1 Hours, 0 Minutes and 59 Seconds
| Chickens Killed : 85
| One Hit Kills : 18
| Bones Buried : 50
\========================================================/

and the random report incase u want it

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| SRL Logs : 2 |
| Trades Made : 1 |
| Trades Missed : 295 |
| Talks : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

yo can someone help me im getting this error and i have no clue what is eual to <

[Runtime Error] : Exception: '<' is not a valid integer value in line 2816 in script

only prob i had was swarms..

thanks good people post just letting you know making feather and bone finding better i know i said but i will do that also if you die you walk to the closest farm, also just made a prison pete solver (the one with the balloons) Prion Pete Solver

Tell me one thing: Why the hell aren't you a member yet? Thats a sick script you got! *Jealous on quality of form*

awesome i do, aswell don't like forms,(nothing beats a good player array) but it's good for the super noobies =D
heres my proggy

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : Username,T,38 mins,72 CK,2 OHK,0 BB,NoGameTab
| 38 Minutes and 18 Seconds
| Chickens Killed : 72
| One Hit Kills : 2
| Bones Buried : 0
\========================================================/
better for leveling noobs then gobbies because chickens don't hit ya' =) thanks for the pwnage script!

Doesn't work for me, I uncheck bury bones, and it picks up bones. I check pick up feathers, and it doesn't pick up feathers.

32 true bit color
low detail
SCAR 3.12 C
SRL 4

From: 71runemaker
Doesn't work for me, I uncheck bury bones, and it picks up bones. I check pick up feathers, and it doesn't pick up feathers.

32 true bit color
low detail
SCAR 3.12 C
SRL 4

Hey runemaker, just make the bones a crazy color like bright purple so that it never finds the bones. Also, I have a proggie report, excellent script!

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : *****,F,78 mins,73 CK,13 OHK,0 BB,NoGameTab
| 1 : *****,T,8 mins,13 CK,2 OHK,0 BB,NoGameTab
| 47 Minutes and 40 Seconds
| Chickens Killed : 86
| One Hit Kills : 15
| Bones Buried : 0
\========================================================/

Only one thing, and that's that you should make the players repeat login, instead of letting the script die once it goes through all the players. A world switcher would also be appreciated.

Looked nice and worked nice.

I'll test it for 15 minutes. Give you are report =D

Here it is! It's ok.

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : *******,T,15 mins,38 CK,18 OHK,0 BB,Chickens
| 24 Minutes and 40 Seconds
| Chickens Killed : 38
| One Hit Kills : 18
| Bones Buried : 0
\========================================================/

Dont work very long for me. Runs until like 1 bone drop, then goes to Next Player, and freezes.

Worked perfect..except for one thing which is you need a try except on line 50 because its trying to search off the screen…heres the error [Runtime Error] : Exception: Canvas does not allow drawing in line 1050 in script.. heres a proggy

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| SRL Logs : 6 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| –> ChickenSweeper <– 1.03 –> by Tarajunky <– |
<~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>
Worked for 1 Hours, 7 Minutes and 51 Seconds
Picked up feathers 75 times.
Killed 28 chickens
Picked 359 Chicken/Bones
Cooked and dropped 106 chickens.
Buried 120 bones
<~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>

# : Nick = A. - LVL : ATT STR DEF PRY HP COOK Time Kills Location Cook Bury
0 : a0f = T. - Lvl : 18 2 14 2 17 5. W: 9 min. K: 3. L: Chickens C: 25 B: 4
1 : ldu = T. - Lvl : 21 1 16 2 18 1. W: 8 min. K: 11. L: Chickens C: 0 B: 14
2 : 0lj = T. - Lvl : 22 1 14 1 18 1. W: 12 min. K: 2. L: Chickens C: 27 B: 24
3 : amr = T. - Lvl : 21 1 15 1 18 1. W: 10 min. K: 1. L: Chickens C: 0 B: 18
4 : 37c = T. - Lvl : 20 1 12 1 17 1. W: 13 min. K: 5. L: Chickens C: 27 B: 39
5 : im8 = T. - Lvl : 15 1 11 1 14 1. W: 11 min. K: 6. L: Chickens C: 27 B: 21
6 : en0 = T. - Lvl : 25 3 20 2 21 8. W: 0 min. K: 0. L: Chickens C: 0 B: 0
<~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>

.. Didn't run away from the evil chicken :/

Excellent script! But a lot of players died (5 out of 8) so you might want to add some more anti-randoms. Here's the progress report.

/==========Chicken Crusher 0.83 by ShapeShifter==========\
| Progress Report |
| 0 : akon roks247,T,20 mins,452 CK,38 OHK,0 BB,Chickens
| 1 : Bad B0y3435,F,12 mins,9 CK,0 OHK,0 BB,Chickens
| 2 : Cat Luver547,F,30 mins,31 CK,1 OHK,0 BB,Chickens
| 3 : Daster Man43,F,16 mins,14 CK,2 OHK,0 BB,Chickens
| 4 : Ese Way 0wns,F,16 mins,20 CK,2 OHK,0 BB,Chickens
| 5 : Fat Daddy305,F,46 mins,384 CK,15 OHK,0 BB,Chickens
| 6 : Gene Woe,F,44 mins,49 CK,0 OHK,0 BB,Chickens
| 7 : Helen Sue,F,88 mins,76 CK,3 OHK,0 BB,Chickens
| 5 Hours, 45 Minutes and 18 Seconds
| Chickens Killed : 1035
| One Hit Kills : 61
| Bones Buried : 0
\========================================================/

Here's the Random Report.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| SRL Logs : 11 |
| Trades Made : 2 |
| Trades Missed : 1270 |
| Talks : 9 |
| Dwarfs : 1 |
| Old Men : 3 |
| Capn Hand : 1 |
| Certers Solved : 2 |
| Certers Missed : 1 |
| Boxes Solved : 13 |
| Death : 14 |
| Quiz[es] Found : 1 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

Line 432: [Hint] (10496:1): Variable 'OLDMS' never used in script
Line 1705: [Error] (14404:6): Unknown identifier 'FindMime'

=S Any tips?