SRL Archive - First Scripts

Having some probems need help with script


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.

Neodymium

2013-02-26 08:36:19

It would probably help if you posted the actual error as well.

mcbrozu

2013-02-28 00:23:14


Wait(100);
if P07_IsUpTextMultiCustom(['Steal'])then
begin
ClickMouse2(Mouse_left);

Try this, I find it works better

Saint//+

2013-02-28 02:06:13

try putting these [] brackets inside of the parenthesis around 'steal'
like this (['Steal'])