Namedontcare
2013-02-19 18:45:10
Okay, so I'm trying to get a script to run that will thiev money from this stall on a private server, but when I try to get it to run, it says that it has executed successfully, and then does nothing!
Here is the code:
If anyone could help, it would be greatly appreciated, thanks.
Here is the code:
Program DeskThiever;
{$i srl/srl.simba}
Procedure ClickDesk;
var
X,Y: Integer;
begin
if FindColorTolerance(X, Y, 1356303, 363, 121, 363, 121, 5) then
begin
mmouse(x, y, 1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
end;
end;
begin
SetupSRL;
ClickDesk;
end.
If anyone could help, it would be greatly appreciated, thanks.