SRL Archive - SRL Suggestions

GameTab.scar


edfromhumanresources

2011-04-13 22:39:41

Friends chat is now a tab option in the lobby. Change the shift distance to 102 in function LobbyTab(Tab: Integer): Boolean; and function GetLobbyTab: Integer;

const
L_PlayerInfo = 1;
L_WorldSelect = 2;
L_FriendsList = 3;
L_FriendsChat = 4;
L_ClanChat = 5;
L_Options = 6;

{*******************************************************************************
function LobbyTab(Tab: Integer): Boolean;
By: Bionicle1800 fixed by NCDS
Description: Goes to the lobby tab specified by the integer 'Tab'.
Valid arguments are 1 through 6, as well as PlayerInfo,
WorldSelect, FriendsList, FriendsChat, ClanChat and Options.
*******************************************************************************}
function LobbyTab(Tab: Integer): Boolean;
begin
Result := false;
if not InRange(Tab, L_PlayerInfo, L_Options) then
begin
Srl_Warn('LobbyTab', 'Tab ' + IntToStr(Tab) + ' is not valid.', warn_AllVersions);
Exit;
end;
result := GetLobbyTab = Tab;
if result then
Exit;
if GetColor(63 + (Tab-1)*102, 32) = 8029324 then
begin
Mouse(63 + (Tab-1)*102, 32, 10, 6, true);
result := true;
end;
end;

{*******************************************************************************
function GetLobbyTab: Integer;
By: Bionicle1800 fixed by NCDS
Description: Gets current lobby tab.
*******************************************************************************}
function GetLobbyTab: Integer;
begin
for result := 1 to 6 do
if GetColor(63 + (result-1)*102, 32) = 11516354 then
Exit;
Result := -1;
end;

edfromhumanresources

2011-04-19 16:16:09

Bump because this is still broken in the latest release and is a quick fix. :kiss:

Coh3n

2011-04-19 16:31:42

Committed, thanks. :)