SRL Archive - SRL Archives

MonsterBusy - The missing ingredient of AutoFighters


n3ss3s

2007-04-29 04:11:35

Sorry for making another thread but I made huge updates so…
Now, here it iz :

function MonsterBusy(MonsterName: string; MonsterColor,
x1, y1, x2, y2, tol: integer): boolean;
{ Auth: n3ss3s}
{ Description : Checks is the monster busy and chats a bit.}
begin
if (FindMonsterTol(x, y, MonsterName, MonsterColor, x1, y1, x2, y2, tol)) then
begin
MouseSpeed := 8;
MMouse(x, y, 0, 0);
if (FindColor(x, y, 65280, x - 70, y - 70, x + 70, y + 70))
or (FindColor(x, y, 255, x - 70, y - 70, x + 70, y + 70)) then
begin
result := true;
end;
end;
if (CountColor(16711422, MMX1, MMY1, MMX2, MMY2) > 3) then
begin
if (random(8) < random(5)) then
begin
case random(2) of
1: begin
GhostSpeak('fighting');
end;
2: begin
case random(3) of
1: begin
HoverSkill('attack', false);
end;
2: begin
HoverSkill('strenght', false);
end;
3: begin
HoverSkill('defence', false);
end;
end;
end;
end;
end;
end;
end;
I think that the Pascal formatter i used crapped the indenting but whatever.
Say ur opinion?

Bobarkinator

2007-04-29 14:52:37

Woot. Now I like it even better with the update.

Doofy

2007-05-01 22:17:28

btw, you spelt "strength" wrong in hover skill, you might want to fix it or it probably wont work


pretty ncie otherwise though

gj:D

solemn wishes

2007-05-02 14:01:36

nad bad work, but id get rid of all the HoverSkill('strenght', false);
stuff if you want people to achurly use it, be hounest u put them in just to make it longer :)

n3ss3s

2007-05-02 14:34:55

No, I actually didnt :) I was about to make an option for it (AntiBan:boolean).
But, wanted to release fast and forgot it :) going to update it tomorrow.