Simba Code:
function IsMining: Boolean;
begin
Result := (PixelShift(IntToBox(MSCX - 15, MSCY - 15, MSCX + 15, MSCY + 15), 1500) > 500);
end;
That is my mining check in my scripts. It relies on PixelShift, as you can see and it is very accurate as I have found.
I also created this to help grab the animations and find out the information I required for my mining check:
Simba Code:
procedure AnimationGrabber;
var
I: Integer;
begin
WriteLn('Animations for the character:');
for I := 0 to 20 do
begin
WriteLn('I - ' + ToStr(I) + ': ' + ToStr(PixelShift(IntToBox(MSCX - 15, MSCY - 15, MSCX + 15, MSCY + 15), 1000)));
end;
WriteLn('Done grabbing animations, please check the debug.');
end;