Fishh
2013-02-28 19:39:15
Hey, I have a 95% working fishing guild script now. Just working on more AntiBan features and it can get stuck every now and then.
One of the main problems I have with it is that it will move the mouse between different fishing spots that aren't the correct one's until it finds the correct one, and then clicks it, this is a super bot like movement. Seeing as fishing spots are the same colour as each other, I can't change the colours so that it will just find the correct one.
I don't mind it searching through all of the fishing spots, but is there anyway to prevent it from moving the mouse until it has found the right one? I can't think of one seeing as the search is based off UpText and it has to move the cursor over the spots to display the UpText. If there isn't a method, is there one to reduce the bot like movement of zipping between spots with perfect accuracy? Apart from lowering the mouse speed.
My Fishing spot procedure:
Cheers!
One of the main problems I have with it is that it will move the mouse between different fishing spots that aren't the correct one's until it finds the correct one, and then clicks it, this is a super bot like movement. Seeing as fishing spots are the same colour as each other, I can't change the colours so that it will just find the correct one.
I don't mind it searching through all of the fishing spots, but is there anyway to prevent it from moving the mouse until it has found the right one? I can't think of one seeing as the search is based off UpText and it has to move the cursor over the spots to display the UpText. If there isn't a method, is there one to reduce the bot like movement of zipping between spots with perfect accuracy? Apart from lowering the mouse speed.
My Fishing spot procedure:
procedure FishingSpotClick;
var
x, y: integer;
begin
x := MSCX;
y := MSCY;
if (P07_InvFull) then
begin
WalkToBank;
end
else
if not (FishingAnimation) then
begin
WriteLn('Looking for fishing spot.');
If P07_FindObjCustom(x, y, ['Cag', 'age', 'ge F', 'C'], [14597535, 14597268, 15123625, 14398100, 15058085], 5) then
begin
GetMousePos(x, y);
WaitHumanClick;
Mouse(RandomRange(x + 3, x + 4), RandomRange(y - 2, y - 3), random(3), random(3), false);
WaitHumanClick
P07_ChooseOptionMulti(['Cage']);
WaitHumanClick;
end;
end;
end;Cheers!