SRL Archive - RS3 Outdated / Broken Scripts

[SRL4] Chookens!


HairyDuncan2

2007-09-15 00:31:46

Overview
This is a basic chicken killer, made to do various things. It is simple yet effective.


Current Features


Version 0.4b

  • Finds and kills chickens
  • Finds feathers
  • Finds and buries bones (DTM's!)
  • Antiban
  • Finds and fixes player position
  • Basic antirandoms
  • Multiplayer
  • Finds position and acts accordingly
  • Checks for gate
  • Closes gate if open
  • Automatically picks lowest skill to work on
  • Checks for HP + next player if not sufficient


Next Version

  • Form
  • Gate Options
  • FailSafes


Start the script with all players inside a chicken pen, with gate closed. Happy autoing!


Please post progress reports, feedback, bugs and suggestions!



Version 0.1 = Downloaded 10 times

Version 0.2 = Downloaded 13 times

Version 0.3a = Downloaded 4 times

Version 0.3b = Downloaded 44 times


HyperSecret

2007-09-15 00:55:56

procedure BonesAndFeathers;
begin
if (CollectBones = True) then
begin
Status('Picking up bones and feathers');
if FindObj(x, y, 'eather', 9984, 0) or
FindObj(x, y, 'icken', 7698324, 5) or
FindObj(x, y, 'ones', 14277085, 5) then
begin
Mouse(x, y, 2, 2, false);
ChooseOption('ones');
Wait(500+random(1000));
Mouse(x, y, 2, 2, false);
ChooseOption('eather');
if InvFull then
begin
LoadBmps;
repeat
if (FindBitmap(BonesInInv, x, y)) then
Mouse(x, y, 2, 2, false);
ChooseOption('ury');
until(InvEmpty)
FreeBitmap(BonesInInv);
Exit;
end else
DropAll;
end;
end;
end;

Do you really want the dropall in there? cuz that will end up dropping your feathers also…

also

procedure GetChooken;
begin
repeat
Status('Destroying the chook in the bloodiest, most horrific, disgusting and most gruesome way known to man kind')
MakeCompass('N');
Wait(600+random(400));
HighestAngle;
repeat
FindObjCustom(x, y, ['Att', 'ack', 'hick', 'cken'], [Chooken1, Chooken2, Chooken3, Chooken4, Chooken5, Chooken6, Chooken7, Chooken8, Chooken9], 5);
until (IsUpTextMulti('tack', 'ack', 'hick'));
if IsUpTextMulti('tack', 'ack', 'tta') then
if (not(IsFightAt(x, y))) then
begin
Mouse(x, y, 0, 0, false);
ChooseOption('ttack');
OutFight;
end else
GetChooken;
if (InFight) then
repeat
Wait(25);
until (not(InFight));
BonesAndFeathers;
Killed:= Killed + 1;
until (Killed >= (Kills))
end;

i would put this part before it starts attacking…

        if (InFight) then
repeat
Wait(25);
until (not(InFight));

like right after the first repeat. but its starting to look better and your getting a better grasp on scar and srl gj

HairyDuncan2

2007-09-15 01:19:21

Thank you very much! =)

the scar noob

2007-09-15 18:15:14

Great script, surely for a beginner!! :)
*Also your bitmap is too big, try learning DTMs and if you can't try learning bitmapmasks and if you can't that, than make mp from small peice from bone ;)
*Don't use infinite loops, use constants and variables to decide when you can stop fighting chickens ;)

if you could change those 2 things, it would be awesome for a beginner!!

HairyDuncan2

2007-09-16 01:03:48

From: the scar noob
Great script, surely for a beginner!! :)
*Also your bitmap is too big, try learning DTMs and if you can't try learning bitmapmasks and if you can't that, than make mp from small peice from bone ;)
*Don't use infinite loops, use constants and variables to decide when you can stop fighting chickens ;)

if you could change those 2 things, it would be awesome for a beginner!!


Yea, I would love to learn DTM's. Thing is, I can only view the begginers forum. If anyone knows when I can view Intermediate, please post.
Thanks for the advice. :D

HairyDuncan2

2007-09-16 01:56:12

Updated please redownload

the scar noob

2007-09-16 05:12:04

From: HairyDuncan2
Yea, I would love to learn DTM's. Thing is, I can only view the begginers forum. If anyone knows when I can view Intermediate, please post.
Thanks for the advice. :D


Did you mannage to view a tut?
Because, the Tutorial Isle is for everyone..

HairyDuncan2

2007-09-16 05:28:09

From: the scar noob
Did you mannage to view a tut?
Because, the Tutorial Isle is for everyone..


All I can see in Tutorial Island is begginners tutorials… Has there been a mistake? Should I inform an Admin?

kor

2007-09-16 06:57:54

why does it say this? ''[Runtime Error] : Exception: Access violation at address 006FD548 in module 'scar.exe'. Read of address 00000030 in line 145 in script C:\Program\SCAR 3.11\Chookens 0.2a.scar''

otis147

2007-09-16 12:13:29

willtest and edit this post w/ proggy

HairyDuncan2

2007-09-16 16:39:04

From: kor
why does it say this? ''[Runtime Error] : Exception: Access violation at address 006FD548 in module 'scar.exe'. Read of address 00000030 in line 145 in script C:\Program\SCAR 3.11\Chookens 0.2a.scar''


EDIT: I'm getting the same problem after the script runs for long periods of time. I'm not sure what the error means or how to fix it. For now i'm sorry I can't help.

BobboHobbo

2007-09-17 03:12:25

Ill fix your ERROS :D

Things that i think you should change:

- The Bitmaps to DTM (for the bones) DTMS lag less.
Ill make a bone DTM if you want.

HairyDuncan2

2007-09-17 03:22:54

From: bobbohobbo
Ill fix your ERROS :D

Things that i think you should change:

- The Bitmaps to DTM (for the bones) DTMS lag less.
Ill make a bone DTM if you want.


Umm, i can only view begginer tuts, and I don't know about DTM's. That should be fixed soon. Not sure. If it's just one function then sure, but if it's complicated don't worry about it. Thank's for looking though. By the way, know anything about this:
[Runtime Error] : Exception: Access violation at address 006FD548 in module 'scar.exe'. Read of address 00000030 in line 145 in script C:\Program\SCAR 3.11\Chookens 0.2a.scar''

Need a bit of help with that. Anyway have fun with your script. It's great. Thankyou very much!

vonl

2007-09-18 02:41:38

Yeah, nice script. it does lag some, but logs in and kills few chickens very nicely. but then that
[Runtime Error] : Exception: Access violation at address 006FD548 in module 'scar.exe'. Read of address 00000030 in line 117 in script C:\DOCUME~1\XXX\LOCALS~1\Temp\Chookens 0.2a.scar
comes :/
but still, nice :)

HairyDuncan2

2007-09-18 02:43:29

From: the scar noob
Great script, surely for a beginner!! :)
*Also your bitmap is too big, try learning DTMs and if you can't try learning bitmapmasks and if you can't that, than make mp from small peice from bone ;)
*Don't use infinite loops, use constants and variables to decide when you can stop fighting chickens ;)

if you could change those 2 things, it would be awesome for a beginner!!


Could you please give me some examples?

HairyDuncan2

2007-09-18 02:44:43

From: vonl
Yeah, nice script. it does lag some, but logs in and kills few chickens very nicely. but then that
[Runtime Error] : Exception: Access violation at address 006FD548 in module 'scar.exe'. Read of address 00000030 in line 117 in script C:\DOCUME~1\XXX\LOCALS~1\Temp\Chookens 0.2a.scar
comes :/
but still, nice :)


Yep, i've fixed that error and am updating now. Please redownload in 5 min.

And post proggy if you feel like it.

:D

HairyDuncan2

2007-09-18 02:53:12

Proggy!

Cmon people, post some up!!



*****************************************
Worked for 7 Hours, 42 Minutes and 59 Seconds
Killed 298 chickens
*****************************************

BobboHobbo

2007-09-18 04:40:04

From: HairyDuncan2
Proggy!

Cmon people, post some up!!


/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| SRL Logs : 280 |
| Boxes Solved : 2 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
*****************************************
Worked for 7 Hours, 33 Minutes and 3 Seconds
Killed 299 chickens
*****************************************


WOw whats with the logging out 280 times. You got to fix that it likes logs like every 10 mins?

But good job on new version.

HairyDuncan2

2007-09-18 05:00:02

Yerp, will fix. Thanks.

the scar noob

2007-09-18 16:31:09

//***********************************\\
//***Special thanks to BobboHobbo,***\\
//*****For helping me with DTM's*****\\

And I don't get a "thank you"? :(

HairyDuncan2

2007-09-18 16:46:24

From: the scar noob
And I don't get a "thank you"? :(


Lol, sorry. Did you help me? Put up what you want me to put in credits and I will. Sorry again.

HairyDuncan2

2007-09-19 01:31:02

Updated.

Version 0.3b

Checks if logged in more.
Fixed NextPlayer bug.
First fully stable version, allowing you to leave it on as long as you want.

Have fun with it!

the scar noob

2007-09-19 06:22:41

From: HairyDuncan2
Updated.

Version 0.3b

Checks if logged in more.
Fixed NextPlayer bug.
First fully stable version, allowing you to leave it on as long as you want.

Have fun with it!


rofl, no not really:p
I just gave comments and told you about using DTMs instead of that large BMP;)
If you want you can add my msn and then I can help you;)

PwNZoRNooB

2007-09-19 12:36:21

Sounds pretty nice. I'll test this later.

HairyDuncan2

2007-09-19 16:57:00

Yerp, added, thanks

bink830

2007-09-24 22:31:37

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
*****************************************
Worked for 1 Hours, 24 Minutes and 20 Seconds
Killed 221 chickens
*****************************************

plan on using tonight while i sleep
looks good so far
thanks!
*post another proggie in morning

bink830

2007-09-25 06:54:50

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
*****************************************
Worked for 6 Hours, 26 Minutes and 31 Seconds
Killed 88 chickens
*****************************************

very nice but i shoulda watched it lol..
when i woke up i had a pinball random

the scar noob

2007-09-25 14:02:13

From: bink830
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
*****************************************
Worked for 6 Hours, 26 Minutes and 31 Seconds
Killed 88 chickens
*****************************************

very nice but i shoulda watched it lol..
when i woke up i had a pinball random


Very nice? It took more than 6 hours to kill 88 chickens:p

bink830

2007-09-25 20:44:46

i died… it works well if i watch it… see first proggie

Belt

2007-09-29 19:55:28

Works well, but I find that I always die to zombies, evil chickens, things like that.
Could you add a run at ___hp?

TLOROX

2007-09-29 20:39:18

Hey it looks good i will try it soon….

HairyDuncan2

2007-10-01 23:38:13

Thank's for posting the proggys. I will add the HP checker now.
Keep posting feedback.
Thanks guys.

HairyDuncan2

2007-10-02 17:16:28

Updated please redownload.

ShowerThoughts

2007-10-02 17:18:12

From: the scar noob
rofl, no not really:p
I just gave comments and told you about using DTMs instead of that large BMP;)
If you want you can add my msn and then I can help you;)



cmon you are always lieing you paid boreas to get in member :p

HairyDuncan2

2007-10-02 20:40:03

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
| SRL 4 Randoms Report |
| www.srl-forums.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| SRL Logs : 4 |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/
*****************************************
Name: esectian162
Current combat level is 9
Worked for 1 Hours, 3 Minutes and 7 Seconds
Killed 105 chickens
*****************************************

gnarlz

2007-10-03 16:16:41

failed every random it came across?

Scotland

2007-10-03 17:05:57

nice script am going to try it tonight maybe.

HairyDuncan2

2007-10-04 02:05:15

From: gnarlz
failed every random it came across?


Yea, randoms are a bit of a worry. It will be fixed. Sorry.

gnarlz

2007-10-04 17:19:12

its fine =) no worry. no blackmarks. and i say im 400 lbs on my appeal and they say ok hes a fatassnerd end of story =P

HairyDuncan2

2007-10-04 17:52:23

Lol

HairyDuncan2

2007-10-04 17:53:46

Discontinued