SRL Archive - Discussions and Debates

Not that important and bankScreen fix

Mr. Freeweed

2007-05-20 05:29:36

This

{*******************************************************************************
function FindMSColor(var x, y: Integer; color: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on MainScreen.
*******************************************************************************}

function FindMSColor(var x, y: Integer; color: Integer): Boolean;
begin
  Result := FindColor(x, y, color, MMX1, MMY1, MMX2, MMY2);
end;

{*******************************************************************************
function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on Main Screen with tolerance.
*******************************************************************************}

function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
begin
  Result := FindColorTolerance(x, y, color, MMX1, MMY1, MMX2, MMY2, tol);
end;

Should be this

{*******************************************************************************
function FindMSColor(var x, y: Integer; color: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on MainScreen.
*******************************************************************************}

function FindMSColor(var x, y: Integer; color: Integer): Boolean;
begin
  Result := FindColor(x, y, color, MSX1, MSY1, MSX2, MSY2);
end;

{*******************************************************************************
function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on Main Screen with tolerance.
*******************************************************************************}

function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
begin
  Result := FindColorTolerance(x, y, color, MSX1, MSY1, MSX2, MSY2, tol);
end;

function BankScreen: Boolean;
begin
Result := (GetColor(114, 297) = 2070783);
end;

Ashur2Good

2007-05-20 05:49:29

From: Mr. Freeweed
This

{*******************************************************************************
function FindMSColor(var x, y: Integer; color: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on MainScreen.
*******************************************************************************}

function FindMSColor(var x, y: Integer; color: Integer): Boolean;
begin
  Result := FindColor(x, y, color, MMX1, MMY1, MMX2, MMY2);
end;

{*******************************************************************************
function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on Main Screen with tolerance.
*******************************************************************************}

function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
begin
  Result := FindColorTolerance(x, y, color, MMX1, MMY1, MMX2, MMY2, tol);
end;

Should be this

{*******************************************************************************
function FindMSColor(var x, y: Integer; color: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on MainScreen.
*******************************************************************************}

function FindMSColor(var x, y: Integer; color: Integer): Boolean;
begin
  Result := FindColor(x, y, color, MSX1, MSY1, MSX2, MSY2);
end;

{*******************************************************************************
function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
By: Stupid3ooo
Description: Finds color on Main Screen with tolerance.
*******************************************************************************}

function FindMSColorTol(var x, y: Integer; color, tol: Integer): Boolean;
begin
  Result := FindColorTolerance(x, y, color, MSX1, MSY1, MSX2, MSY2, tol);
end;

function BankScreen: Boolean;
begin
Result := (GetColor(114, 297) = 2070783);
end;

Ohh, you're right i think. Nice :spot: spoting that out! ( Hehe get it? Ah dw :P)

P.S: My 200th post XD

-Ashur:stirthepot:

Wizzup?

2007-05-20 11:48:36

Thanks for pointing that out…Fixed. (in SvN, so is in next SRL)

bullzeye95

2007-05-20 17:37:23

Yeah, I figured that out when I couldn't get FindObj to work :). I thought I posted that already, but I guess not.