Timothegreat
2008-02-15 12:31:51
All that really needs to be fixed is tabexists. No need for rev 14
{*******************************************************************************
function TabExists(TabNumber: Integer): Boolean;
By: Flyboy
Description: Returns true if tab exists.
Very useful for tutorial Is. as well as a simple double check to make sure
your fully logged in.
*******************************************************************************}
function TabExists(TabNumber: Integer): Boolean;
begin
case TabNumber of
1: Result := (GetColor(542, 185) = 13816532);
2: Result := (GetColor(576, 188) = 3831858);
3: Result := (GetColor(609, 185) = 14872817);
4: Result := (GetColor(644, 180) = 1854335);
5: Result := (GetColor(675, 183) = 9870237);
6: Result := (GetColor(708, 184) = 13822416);
7: Result := (GetColor(741, 187) = 5598593);
8: Result := (GetColor(575, 483) = 3720957);
9: Result := (GetColor(607, 485) = 993018);
10: Result := (GetColor(639, 490) = 1103866);
11: Result := (GetColor(674, 484) = 5331808);
12: Result := (GetColor(711, 481) = 3105656);
13: Result := (GetColor(742, 482) = 2401713);
14: Result := (GetColor(753, 4) = 3985241) Or (GetColor(753, 6) = 658751);
15: Result := (GetColor(537, 481) = 4938339);
end;
end;