Simba Code:
program afkguthan;
//START OF USER SETUP
const
waitTimeMinimum = 800; //in seconds
waitTimeMax = 1000; //in seconds
howLongToRunFor = 360; //in minutes
whereToClickX1 = 112; //X1 coordinate of where to click
whereToClickY1 = 449; //Y1 coordinate of where to click
whereToClickX2 = 448; //X2 coordinate of where to click
whereToClickY2 = 540; //Y2 coordinate of where to click
{
Those last 4 constants are for making a TBox. If you've never heard that
word before, check out this image for a quick explanation: http://i.imgur.com/KozcHi2.png
Image is from this [wonderful] thread: https://villavu.com/forum/showthread.php?t=107757
}
//END OF USER SETUP
procedure fastClick(button: integer); //by Flight, taken from srl6
var
x, y: integer;
begin
getMousePos(x, y);
holdMouse(x, y, button);
wait(randomRange(60, 150));
getMousePos(x, y);
releaseMouse(x, y, button);
end;
procedure rightClickSomewhere();
begin
repeat
MoveMouse(randomrange(whereToClickX1, whereToClickX2), randomrange(whereToClickY1, whereToClickY2));
fastClick(mouse_right);
wait(RandomRange(waitTimeMinimum * 1000, waitTimeMax * 1000));
until (GetTimeRunning > (howLongToRunFor * 60000));
end;
begin
end.