Files
GlueXML/AccountLogin.lua
T
paste 13d77d77c9 Initial: Turtle WoW Glue XML baseline
Pristine baseline for the four Glue files we'll customize:
- AccountLogin.lua / .xml
- CharacterSelect.lua / .xml

Source: c:/WoW/Octo/BlizzardInterfaceCode/GlueXML (Turtle WoW).
Other files in BlizzardInterfaceCode/GlueXML are not tracked here since we don't override them on top of the MPQ-provided copies.
2026-06-22 23:31:46 -05:00

227 lines
6.1 KiB
Lua

FADE_IN_TIME = 2;
DEFAULT_TOOLTIP_COLOR = {0.8, 0.8, 0.8, 0.09, 0.09, 0.09};
MAX_PIN_LENGTH = 10;
function AccountLogin_OnLoad()
this:SetSequence(0);
this:SetCamera(0);
this:RegisterEvent("SHOW_SERVER_ALERT");
this:RegisterEvent("SHOW_SURVEY_NOTIFICATION");
local versionType, buildType, version, internalVersion, date = GetBuildInfo();
AccountLoginVersion:SetText(format(VERSION_TEMPLATE, versionType, version, internalVersion, buildType, date));
-- Color edit box backdrops
local backdropColor = DEFAULT_TOOLTIP_COLOR;
AccountLoginAccountEdit:SetBackdropBorderColor(backdropColor[1], backdropColor[2], backdropColor[3]);
AccountLoginAccountEdit:SetBackdropColor(backdropColor[4], backdropColor[5], backdropColor[6]);
AccountLoginPasswordEdit:SetBackdropBorderColor(backdropColor[1], backdropColor[2], backdropColor[3]);
AccountLoginPasswordEdit:SetBackdropColor(backdropColor[4], backdropColor[5], backdropColor[6]);
VirtualKeypadText:SetBackdropBorderColor(backdropColor[1], backdropColor[2], backdropColor[3]);
VirtualKeypadText:SetBackdropColor(backdropColor[4], backdropColor[5], backdropColor[6]);
end
function AccountLogin_OnShow()
CurrentGlueMusic = "Sound\\Music\\GlueScreenMusic\\wow_main_theme.mp3";
AcceptTOS();
AcceptEULA();
local serverName = GetServerName();
if(serverName) then
AccountLoginRealmName:SetText(serverName);
else
AccountLoginRealmName:Hide()
end
local accountName = GetSavedAccountName();
AccountLoginAccountEdit:SetText(accountName);
AccountLoginPasswordEdit:SetText("");
if ( accountName == "" ) then
AccountLogin_FocusAccountName();
else
AccountLogin_FocusPassword();
end
end
function AccountLogin_FocusPassword()
AccountLoginPasswordEdit:SetFocus();
end
function AccountLogin_FocusAccountName()
AccountLoginAccountEdit:SetFocus();
end
function AccountLogin_OnChar()
end
function AccountLogin_OnKeyDown()
if ( arg1 == "ESCAPE" ) then
if ( ConnectionHelpFrame:IsVisible() ) then
ConnectionHelpFrame:Hide();
AccountLoginUI:Show();
elseif ( SurveyNotificationFrame:IsVisible() ) then
-- do nothing
else
AccountLogin_Exit();
end
elseif ( arg1 == "ENTER" ) then
if ( not TOSAccepted() ) then
return;
elseif ( TOSFrame:IsVisible() or ConnectionHelpFrame:IsVisible() ) then
return;
elseif ( SurveyNotificationFrame:IsVisible() ) then
AccountLogin_SurveyNotificationDone(1);
end
AccountLogin_Login();
elseif ( arg1 == "PRINTSCREEN" ) then
Screenshot();
end
end
function AccountLogin_OnEvent(event)
if ( event == "SHOW_SERVER_ALERT" ) then
ServerAlertText:SetText(arg1);
ServerAlertScrollFrame:UpdateScrollChildRect();
ServerAlertFrame:Show();
elseif ( event == "SHOW_SURVEY_NOTIFICATION" ) then
AccountLogin_ShowSurveyNotification();
end
end
function AccountLogin_Login()
PlaySound("gsLogin");
DefaultServerLogin(AccountLoginAccountEdit:GetText(), AccountLoginPasswordEdit:GetText());
AccountLoginPasswordEdit:SetText("");
if ( AccountLoginSaveAccountName:GetChecked() ) then
SetSavedAccountName(AccountLoginAccountEdit:GetText());
else
SetSavedAccountName("");
end
end
function AccountLogin_Turtle_Armory_Website()
PlaySound("gsLoginNewAccount");
LaunchURL(TURTLE_ARMORY_WEBSITE);
end
function AccountLogin_Turtle_Website()
PlaySound("gsLoginNewAccount");
LaunchURL(AUTH_TURTLE_WEBSITE);
end
function AccountLogin_Turtle_Knowledge_Database()
PlaySound("gsLoginNewAccount");
LaunchURL(TURTLE_KNOWLEDGE_DATABASE_WEBSITE);
end
function AccountLogin_Turtle_Community_Forum()
PlaySound("gsLoginNewAccount");
LaunchURL(TURTLE_COMMUNITY_FORUM_WEBSITE);
end
function AccountLogin_Turtle_Discord()
PlaySound("gsLoginNewAccount");
LaunchURL(TURTLE_DISCORD_WEBSITE);
end
function AccountLogin_Turtle_Reddit()
PlaySound("gsLoginNewAccount");
LaunchURL(TURTLE_REDDIT_WEBSITE);
end
function AccountLogin_Credits()
if ( not GlueDialog:IsVisible() ) then
PlaySound("gsTitleCredits");
SetGlueScreen("credits");
end
end
function AccountLogin_Cinematics()
if ( not GlueDialog:IsVisible() ) then
PlaySound("gsTitleIntroMovie");
SetGlueScreen("movie");
end
end
function AccountLogin_Options()
PlaySound("gsTitleOptions");
end
function AccountLogin_Exit()
PlaySound("gsTitleQuit");
QuitGame();
end
function AccountLogin_ShowSurveyNotification()
GlueDialog:Hide();
AccountLoginUI:Hide();
SurveyNotificationAccept:Enable();
SurveyNotificationDecline:Enable();
SurveyNotificationFrame:Show();
end
function AccountLogin_SurveyNotificationDone(accepted)
SurveyNotificationFrame:Hide();
SurveyNotificationAccept:Disable();
SurveyNotificationDecline:Disable();
SurveyNotificationDone(accepted);
AccountLoginUI:Show();
end
-- Virtual keypad functions
local buttonText = {}
function VirtualKeypadFrame_OnEvent(event)
if ( event == "PLAYER_ENTER_PIN" ) then
for i=1, 10 do
buttonText[i] = _G["arg"..i]
end
end
-- Randomize location to prevent hacking (yeah right)
local xPadding = 5;
local yPadding = 10;
local xPos = random(xPadding, GlueParent:GetWidth()-VirtualKeypadFrame:GetWidth()-xPadding);
local yPos = random(yPadding, GlueParent:GetHeight()-VirtualKeypadFrame:GetHeight()-yPadding);
--VirtualKeypadFrame:SetPoint("TOPLEFT", GlueParent, "TOPLEFT", xPos, -yPos);
VirtualKeypadFrame:Show();
VirtualKeypad_UpdateButtons();
end
function VirtualKeypadButton_OnClick()
local text = VirtualKeypadText:GetText();
if ( not text ) then
text = "";
end
VirtualKeypadFrame.PIN = VirtualKeypadFrame.PIN..this:GetID();
VirtualKeypadText:SetText(VirtualKeypadFrame.PIN);
VirtualKeypad_UpdateButtons();
end
function VirtualKeypadOkayButton_OnClick()
local PIN = VirtualKeypadText:GetText();
local numNumbers = strlen(PIN);
if numNumbers < 6 then return end
local pinNumber = {};
for i=1, MAX_PIN_LENGTH do
if ( i <= numNumbers ) then
pinNumber[i] = nil;
for j=1, 10 do
if tonumber(buttonText[j]) == tonumber(strsub(PIN,i,i)) then
pinNumber[i] = j-1;
end
end
else
pinNumber[i] = nil;
end
end
PINEntered(pinNumber[1], pinNumber[2], pinNumber[3], pinNumber[4], pinNumber[5], pinNumber[6], pinNumber[7], pinNumber[8], pinNumber[9], pinNumber[10]);
VirtualKeypadFrame:Hide();
end
function VirtualKeypad_UpdateButtons()
end