spin3x
03-19-2013, 05:26 PM
Just a simple feather buy with or without world switching (World switching would make it 10x faster)
I've got this VERY basic feather buy I tried making (I'm a real novice at this)
program Theiving;
var
time: integer;
{$define srl5}
{$i srl/srl.simba}
Procedure StartTheiving;
var
x, y:Integer;
begin
if FindColorSpiralTolerance(x, y, 12237764, 116, 65, 160, 100, 179) then
MoveMouse(x, y); //Don't use Move Mouse (see below)
Mouse(x, y, 1, 1, Mouse_Right);
Wait(164);
begin
if FindColorSpiralTolerance(x, y, 2070783, 96, 144, 186, 152, 179) then
MoveMouse(x, y); //Don't use Move Mouse (see below)
wait(173);
ClickMouse(631, 402, 1)
wait(2000);
end;
end;
begin
StartTheiving
repeat
StartTheiving;
until(false);
end.program new;
begin
end.
Or could someone maybe edit it and make it less botlike?
Thanks
I've got this VERY basic feather buy I tried making (I'm a real novice at this)
program Theiving;
var
time: integer;
{$define srl5}
{$i srl/srl.simba}
Procedure StartTheiving;
var
x, y:Integer;
begin
if FindColorSpiralTolerance(x, y, 12237764, 116, 65, 160, 100, 179) then
MoveMouse(x, y); //Don't use Move Mouse (see below)
Mouse(x, y, 1, 1, Mouse_Right);
Wait(164);
begin
if FindColorSpiralTolerance(x, y, 2070783, 96, 144, 186, 152, 179) then
MoveMouse(x, y); //Don't use Move Mouse (see below)
wait(173);
ClickMouse(631, 402, 1)
wait(2000);
end;
end;
begin
StartTheiving
repeat
StartTheiving;
until(false);
end.program new;
begin
end.
Or could someone maybe edit it and make it less botlike?
Thanks