Sokil59
2013-02-26 07:38:30
Hey I'm trying to make a script for the first time this is what I came up with so far(this is rs 07 btw:
program Silkthiever;
{$I SRL\SRL.Simba}
{$I P07Include.Simba}
procedure SilkTheiver;
var
x, y: integer;
begin
repeat
if FindColorTolerance(x, y, 5410684, 4, 4, 515, 337, 4) then
begin
MMouse(x, y, 2, 2);
Wait(100)
if P07_ContainsText('Steal') then <---- Getting error [Error] (18:34) here what am I doing wrong?
begin
ClickMouse2(Mouse_left);
Wait(2000)
end;
end;
until(P07_InvFull)
end;
begin
Setup07Include;
SilkTheiver;
end.