rj
10-15-2011, 03:42 PM
//auto theiver by thehatered(rjj95)
program Autotheiver;
Var x,y: Integer;
Procedure findtable;
begin;
wait(800)
FindColorTolerance (x,y,5231294,185,134,208,173,12);
wait(500)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(3000)
end;
begin
//find NPC
wait(1000)
FindColorTolerance (x,y,3689566,166,195,194,213,12);
wait(500)
ClickMouse(x, y, Mouse_Left);
wait(1200)
end.
begin
Procedure findcake;
wait(1000)
FindColorTolerance (x,y,207164,607,211,635,240,12);
wait(500)
ClickMouse(x, y, Mouse_Right);
wait(1200)
end;
begin
Procedure sellcake;
wait(1000)
FindColorTolerance (x,y,2070783,550,295,608,311,50);
wait(700)
ClickMouse(x, y, Mouse_Left);
wait(900)
end;
begin
Procedure closeout;
wait(1000)
FindColorTolerance (x,y,3358280,419,24,501,52,50);
wait(700)
end;
begin
Procedure findsquare;
wait(1000)
FindColorTolerance (x,y,942420,288,115,321,151,50);
wait(700)
end.
im using simba to bot to auto a private server( has low xp rates for skills so...yea) and when i run this my mouse doesent do anything. it doesent erven click any colors
program Autotheiver;
Var x,y: Integer;
Procedure findtable;
begin;
wait(800)
FindColorTolerance (x,y,5231294,185,134,208,173,12);
wait(500)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(1700)
ClickMouse(x, y, Mouse_Left)
wait(3000)
end;
begin
//find NPC
wait(1000)
FindColorTolerance (x,y,3689566,166,195,194,213,12);
wait(500)
ClickMouse(x, y, Mouse_Left);
wait(1200)
end.
begin
Procedure findcake;
wait(1000)
FindColorTolerance (x,y,207164,607,211,635,240,12);
wait(500)
ClickMouse(x, y, Mouse_Right);
wait(1200)
end;
begin
Procedure sellcake;
wait(1000)
FindColorTolerance (x,y,2070783,550,295,608,311,50);
wait(700)
ClickMouse(x, y, Mouse_Left);
wait(900)
end;
begin
Procedure closeout;
wait(1000)
FindColorTolerance (x,y,3358280,419,24,501,52,50);
wait(700)
end;
begin
Procedure findsquare;
wait(1000)
FindColorTolerance (x,y,942420,288,115,321,151,50);
wait(700)
end.
im using simba to bot to auto a private server( has low xp rates for skills so...yea) and when i run this my mouse doesent do anything. it doesent erven click any colors