rikioh
2006-09-10 16:38:30
i keep getting random access violations in scar/includes/srl/srl/core/text.srl lines 420 - 429 it seems to be different line everytime dunno tho
2006-09-10 16:38:30
2006-09-10 17:19:53
2006-09-10 17:50:02
2006-10-19 19:41:18
2006-10-20 02:02:50
function ClickOption(s: String; i: Integer): Boolean;
var
x, y, tmpMask: Integer;
begin
tmpMask := CreateBitmapMaskFromText(s, UpChars);
case i of
1:
begin
if (FindBitmapMaskTolerance(tmpMask, x, y, 0, 0, 520, 340, 10, 50)) then
begin
Wait(25 + Random(50));
Mouse(x + (Length(s) * 6 div 2), y + 5, 3, 3, True);
Result := True;
end;
end;
2:
begin
if (FindBitmapMaskTolerance(tmpMask, x, y, 550, 200, 750, 470, 10, 50)) then
begin
Wait(25 + Random(50));
Mouse(x + (Length(s) * 6 div 2), y + 5, 3, 3, True);
Result := True;
end;
end;
3:
begin
if (FindBitmapMaskTolerance(tmpMask, x, y, 0, 340, 500, 460, 10, 50)) then
begin
Wait(25 + Random(50));
Mouse(x + (Length(s) * 6 div 2), y + 5, 3, 3, True);
Result := True;
end;
end;
end;
FreeBitmap(tmpMask);
end;
2006-10-22 16:43:24