Originally Posted by
Corbyz
Can you explain how to put the color in? i have the color of the npc but idk if it is suppose to be Hex? or RGB or what please explain.
Simply click the little eye dropper icon on Simba (left of the target), then click/get the colour that you want and then little window should then come up. The window that comes up should have a highlighted number.
That is the number you should use.
__________________________________________________ __________________________________________________ ____________________________
Awesome script! I hope one day Ill be able to make one like that!
I edited your code a lil with my extremely limited knowlage to make it look a little more human like:
Code:
program PRS06_PickPocketer;
{$i srl/srl.simba} // added this for mmouse
var
pickpocket,
X, Y: Integer;
procedure ClickColor;
begin
if (FindColor(X, Y, COLOUR GOES HERE, 0, 0, 760, 500)) then
begin
MouseSpeed:= 15
Status('Looking for color...');
mmouse(X, Y, 1, 1); // replaced from below
// MoveMouse(X, Y);
GetMousePos(X, Y);
Wait(749 + Random(1025));
ClickMouse(X, Y, mouse_right);
end;
end;
procedure Steal;
begin
pickpocket := BitmapFromString(71, 14, 'meJzdk0EOwCAIBP2dH+i1/3+GvR' + 'nCugWlJFrDAYmuDEK97vpHa2ItXMxLKa5QSpmV6heToJzKw7SlwhT' + 'XVlDqMEI5AY+A6k4/IH0cPda3bEj98SllM4gU6pW+2EW5ZQp5yip5' + 'FXxpS6zGUG3BjyubDex/usG/fwWFysibAcWaIQ7ladQI1Ps4ywFk9' + 'TSH11RGcfxEmb+aJhbHKqHP6skU/Mp4cpgbUsSN/fvRtgPUA8ABJPo=');
if (FindBitmap(pickpocket, X, Y)) then
begin
Status('Stealing..');
mmouse(X, Y, 1, 1); //replaced the below
// MoveMouse(X, Y);
GetMousePos(X, Y);
ClickMouse(X, Y, mouse_left);
end;
FreeBitmap(pickpocket);
end;
begin
ActivateClient;
ClearDebug;
repeat
ClickColor;
Wait(489);
Steal;
until(isKeyDown(113));
end.