I just noticed it wasn't working and decided to make a fix for it quick.
Original function:
SCAR Code:
{*******************************************************************************
function ShopScreen: Boolean;
By: ZephyrsFury
Description: Returns true if a shop interface is opened.
*******************************************************************************}
function ShopScreen: Boolean;
begin
Result := FindTextTpa(2070783, 0, 226, 305, 340, 320, 'Player', StatChars, Nothing);
end;
Fix's:
SCAR Code:
function ShopScreen: Boolean;
begin
Result := (CountColor(2070783, 58, 303, 85, 317) = 63);
end;
or
SCAR Code:
function ShopScreen : Boolean;
begin
Result := FindTextTPA(2070783, 10, 58, 303, 85, 317, 'Right', StatChars, Nothing);
end;
Both fix's search the same area for the same word, just using two different methods.