GUI2K4.UT2K4SPTab_Profile

//==============================================================================
// Single player profile management
//
// Written by Michiel Hendriks
// (c) 2003, Epic Games, Inc. All Rights Reserved
//==============================================================================

class UT2K4SPTab_Profile extends UT2K4SPTab_Base;

var automated GUISectionBackground sbProfiles, sbDetailsBg, sbFaceBorder, sbSponsorBorder;
var automated GUIImage imgFace, imgFaceBlur, imgSponsor;
var automated GUIListBox lbProfiles;
var automated GUIButton btnDelete, btnCreate, btnHighScores;
var automated GUIScrollTextBox sbDetails;

/** used to filter out double OnChange events */
var int HackyIndex;

var localized string NoProfileSelected, ProfileDetails, DeleteProfile, OverloadProfile, CheatWarning;
var localized string SpreeLabel[6];
var localized string MultiKillsLabel[7];

function InitComponent(GUIController pMyController, GUIComponent MyOwner)
{
    Super.Initcomponent(pMyController, MyOwner);
    HackyIndex = -1;
    lbProfiles.List.OnDblClick = OnProfileDblClick;
    bInit = true;
}

function ShowPanel(bool bShow)
{
    Super.ShowPanel(bShow);
    if (bShow)
    {
        if (!Controller.bCurMenuInitialized) return;
        if (bInit)
        {
            bInit = false;
            UpdateProfileList();
        }
        MainWindow.btnPlay.Caption = CaptionLoad;
        if (lbProfiles.List.ItemCount != 0)
        {
            btnPlayEnabled(true);
            btnDelete.EnableMe();
        }
        else {
            btnPlayEnabled(false);
            btnDelete.DisableMe();
        }
        UpdateProfileDesc();
    }
}

/**
    Refresh the profile list
*/
function UpdateProfileList()
{
    local array<string> profilenames;
    local int i;

    Profile("GetProfileList");
    Controller.GetProfileList(MainWindow.ProfilePrefix, profilenames);
    Profile("GetProfileList");
    lbProfiles.List.Clear();
    for ( i = 0; i < profilenames.Length; i++ )
    {
        lbProfiles.List.Add(getProfileName(profilenames[i]));
    }
    if (GP != none) lbProfiles.List.Find(getProfileName(GP.PackageName));
    //UpdateProfileDesc();
}

/**
    Update the profile description
*/
function UpdateProfileDesc()
{
    local string SelectedProfile;
    local UT2K4GameProfile SelectedGP;
    local xUtil.PlayerRecord PR;
    local string NewDetails, tmp;
    local int i;

    Profile("UpdateProfileDesc");
    SelectedProfile = MainWindow.ProfilePreFix$lbProfiles.List.Get();
    if (SelectedProfile != "") SelectedGP = PlayerOwner().Level.Game.LoadDataObject(ProfileClass, "GameProfile", SelectedProfile);
    if (SelectedGP == none)
    {
        imgFace.Image = none;
        imgFace.ImageColor.A = 196;
        imgFaceBlur.bVisible = true;
        imgSponsor.Image = none;
        sbDetails.SetContent(NoProfileSelected);
    }
    else {
        if ((GP != none) && (SelectedGP.PackageName ~= GP.PackageName))
        {
            imgFaceBlur.bVisible = false;
            imgFace.ImageColor.A = 255;
        }
        else {
            imgFaceBlur.bVisible = true;
            imgFace.ImageColor.A = 196;
        }
        PR = class'xGame.xUtil'.static.FindPlayerRecord(SelectedGP.PlayerCharacter);
        imgFace.Image = PR.Portrait;
        imgSponsor.Image = Material(DynamicLoadObject(SelectedGP.TeamSymbolName, class'Material'));
        NewDetails = Repl(ProfileDetails, "%teamname%", SelectedGP.TeamName);
        NewDetails = Repl(NewDetails, "%playername%", SelectedGP.PlayerName);
        NewDetails = Repl(NewDetails, "%teammembers%", JoinArray(SelectedGP.PlayerTeam, ", ", true));
        NewDetails = Repl(NewDetails, "%totaltime%", int(round(SelectedGP.TotalTime / 60)));
        NewDetails = Repl(NewDetails, "%credits%", ProfileClass.static.MoneyToString(SelectedGP.Balance));
        NewDetails = Repl(NewDetails, "%matches%", SelectedGP.matches);
        NewDetails = Repl(NewDetails, "%wins%", SelectedGP.wins);
        NewDetails = Repl(NewDetails, "%kills%", SelectedGP.kills);
        NewDetails = Repl(NewDetails, "%deaths%", SelectedGP.deaths);
        NewDetails = Repl(NewDetails, "%Goals%", SelectedGP.goals);
        tmp = "";
        for (i = 0; i < 6; i++)
        {
            if (SelectedGP.spree[i] > 0) tmp $= "|"$SpreeLabel[i]@SelectedGP.spree[i];
        }
        NewDetails = Repl(NewDetails, "%sprees%", tmp);
        tmp = "";
        for (i = 0; i < 7; i++)
        {
            if (SelectedGP.MultiKills[i] > 0) tmp $= "|"$MultiKillsLabel[i]@SelectedGP.MultiKills[i];
        }
        NewDetails = Repl(NewDetails, "%multikills%", tmp);
        tmp = "";
        for (i = 0; i < 6; i++)
        {
            if (SelectedGP.SpecialAwards[i] > 0) tmp $= "|"$SelectedGP.msgSpecialAward[i]$":"@SelectedGP.SpecialAwards[i];
        }
        NewDetails = Repl(NewDetails, "%specialawards%", tmp);

        sbDetails.SetContent(NewDetails);

        // the Ultimate answer to Life, the Universe and Everything is ...
        // ... show debug controlls
        if (SelectedGP.PlayerName == "42")
        {
            MainWindow.btnDebugExec.bVisible = true;
            MainWindow.edDebugExec.bVisible = true;
        }
    }
    Profile("UpdateProfileDesc");
}

/**
    Create profile button clicked
*/
function bool btnCreateOnClick(GUIComponent Sender)
{
    btnPlayEnabled(true);
    MainWindow.c_Tabs.ReplaceTab(MyButton, MainWindow.PanelCaption[1], MainWindow.PanelClass[1], , MainWindow.PanelHint[1], true);
    return true;
}

/**
    Delete profile button clicked
*/
function bool btnDeleteOnClick(GUIComponent Sender)
{
    local GUIQuestionPage QPage;
    local string SelectedProfile;

    if (Controller.OpenMenu(Controller.QuestionMenuClass))
    {
        SelectedProfile = lbProfiles.List.Get();
        QPage=GUIQuestionPage(Controller.TopPage());
        QPage.SetupQuestion(QPage.Replace(DeleteProfile, "profile", SelectedProfile), QBTN_YesNo, QBTN_No);
        QPage.OnButtonClick = OnConfirmDelete;
    }
    return true;
}

/**
    User confirmed the deletion of the profile
*/
function OnConfirmDelete(byte bButton)
{
    local string SelectedProfile;

    if (bButton == QBTN_Yes)
    {
        SelectedProfile = MainWindow.ProfilePreFix$lbProfiles.List.Get();
        if ( GP != none && GP.PackageName == SelectedProfile)
        {
            GP = none;
            PlayerOwner().Level.Game.CurrentGameProfile = none;
            MainWindow.UpdateTabs();
        }
        if (!PlayerOwner().Level.Game.DeletePackage(SelectedProfile))
        {
            Log("Failed to delete profile "$SelectedProfile, LogPrefix);
        }
        UpdateProfileList();
        btnPlayEnabled(lbProfiles.List.ItemCount != 0);
    }
}

/**
    User has selected a diffirent profile
*/
function onProfileChange(GUIComponent Sender)
{
    local string Selected;
    if (HackyIndex == lbProfiles.List.Index) return;
    HackyIndex = lbProfiles.List.Index;
    Selected = lbProfiles.List.Get();
    if ((Selected != "") || ((GP != none) && ((MainWindow.ProfilePreFix$Selected) == GP.PackageName)))
    {
        btnPlayEnabled(true);
        btnDelete.EnableMe();
    }
    else {
        btnPlayEnabled(false);
        btnDelete.DisableMe();
    }
    UpdateProfileDesc();
}

/**
    Double clicked the profile list -> load profile
*/
function bool OnProfileDblClick( GUIComponent Sender)
{
    return onPlayClick();
}

/**
    Load the selected profile, warn if already a profile loaded
*/
function bool onPlayClick()
{
    local GUIQuestionPage QPage;
    local string SelectedProfile;

    if (GP != none)
    {
        SelectedProfile = lbProfiles.List.Get();
        if (GP.PackageName ~= (MainWindow.ProfilePreFix$SelectedProfile)) return true; // selected profile is already loaded

        if (Controller.OpenMenu(Controller.QuestionMenuClass))
        {
            QPage=GUIQuestionPage(Controller.TopPage());
            QPage.SetupQuestion(OverloadProfile, QBTN_YesNo, QBTN_No);
            QPage.OnButtonClick = OnConfirmLoad;
        }
        return true;
    }
    else {
        OnConfirmLoad(QBTN_Yes);
        return true;
    }
}

/**
    User confirmed loading of a new profile
*/
function OnConfirmLoad(byte bButton)
{
    local GUIQuestionPage QPage;
    local string SelectedProfile;

    if (bButton == QBTN_Yes)
    {
        if (GP != none) PlayerOwner().Level.Game.SavePackage(GP.PackageName); // save before loading new profile
        SelectedProfile = MainWindow.ProfilePreFix$lbProfiles.List.Get();
        GP = PlayerOwner().Level.Game.LoadDataObject(ProfileClass, "GameProfile", SelectedProfile);
        if (GP.StoredPlayerID() != PlayerOwner().GetPlayerIDHash())
        {
            if (Controller.OpenMenu(Controller.QuestionMenuClass))
            {
                QPage=GUIQuestionPage(Controller.TopPage());
                QPage.SetupQuestion(CheatWarning, QBTN_YesNo, QBTN_No);
                QPage.OnButtonClick = OnFinalLoad;
            }
        }
        else OnFinalLoad(QBTN_Continue);
    }
}

/** */
function OnFinalLoad(byte bButton)
{
    local string SelectedProfile;
    if (bButton == QBTN_Yes || bButton == QBTN_Continue)
    {
        GP.LoadProfile(PlayerOwner());
        if ( GP != none )
        {
            SelectedProfile = MainWindow.ProfilePreFix$lbProfiles.List.Get();
            PlayerOwner().Level.Game.CurrentGameProfile = GP;
            GP.Initialize(PlayerOwner().Level.Game, SelectedProfile);
            GP.bInLadderGame = true;
            GP.bIsChallenge = false;
            MainWindow.UpdateTabs(true);
            MainWindow.HandleGameProfile();
            GP.bInLadderGame = false;
            if (MainWindow.SetActiveTab != none) MainWindow.c_Tabs.ActivateTab(MainWindow.SetActiveTab.MyButton, true);
        }
    }
    else {
        GP = none;
        PlayerOwner().Level.Game.CurrentGameProfile = none;
    }
}

function bool btnHighScoresOnClick(GUIComponent Sender)
{
    return Controller.OpenMenu(MainWindow.HighScorePage);
}

defaultproperties
{
     Begin Object Class=GUISectionBackground Name=SPPsbProfiles
         Caption="Profiles"
         WinTop=0.046588
         WinLeft=0.023243
         WinWidth=0.270899
         WinHeight=0.803050
         bBoundToParent=Wahr
         OnPreDraw=SPPsbProfiles.InternalPreDraw
     End Object
     sbProfiles=GUISectionBackground'GUI2K4.UT2K4SPTab_Profile.SPPsbProfiles'

     Begin Object Class=GUISectionBackground Name=SPPsbDetailsBg
         Caption="Details"
         WinTop=0.368975
         WinLeft=0.610000
         WinWidth=0.370000
         WinHeight=0.484668
         OnPreDraw=SPPsbDetailsBg.InternalPreDraw
     End Object
     sbDetailsBg=GUISectionBackground'GUI2K4.UT2K4SPTab_Profile.SPPsbDetailsBg'

     Begin Object Class=AltSectionBackground Name=SPPimgFaceBorder
         WinTop=0.050000
         WinLeft=0.310000
         WinWidth=0.280000
         WinHeight=0.800000
         bBoundToParent=Wahr
         OnPreDraw=SPPimgFaceBorder.InternalPreDraw
     End Object
     sbFaceBorder=AltSectionBackground'GUI2K4.UT2K4SPTab_Profile.SPPimgFaceBorder'

     Begin Object Class=GUISectionBackground Name=SPPimgSponsorBorder
         bAltCaption=Wahr
         WinTop=0.050000
         WinLeft=0.610000
         WinWidth=0.370000
         WinHeight=0.292959
         bBoundToParent=Wahr
         OnPreDraw=SPPimgSponsorBorder.InternalPreDraw
     End Object
     sbSponsorBorder=GUISectionBackground'GUI2K4.UT2K4SPTab_Profile.SPPimgSponsorBorder'

     Begin Object Class=GUIImage Name=SPPimgFace
         ImageColor=(A=196)
         ImageStyle=ISTY_Scaled
         WinTop=0.106977
         WinLeft=0.324005
         WinWidth=0.251990
         WinHeight=0.686098
         RenderWeight=0.300000
         bBoundToParent=Wahr
     End Object
     imgFace=GUIImage'GUI2K4.UT2K4SPTab_Profile.SPPimgFace'

     Begin Object Class=GUIImage Name=SPPimgFaceBlur
         Image=TexPanner'InterfaceContent.Menu.pEmptySlot'
         ImageStyle=ISTY_Scaled
         ImageRenderStyle=MSTY_Normal
         WinTop=0.106977
         WinLeft=0.324005
         WinWidth=0.251990
         WinHeight=0.686098
         RenderWeight=0.200000
         bBoundToParent=Wahr
     End Object
     imgFaceBlur=GUIImage'GUI2K4.UT2K4SPTab_Profile.SPPimgFaceBlur'

     Begin Object Class=GUIImage Name=SPPimgSponsor
         ImageStyle=ISTY_Justified
         ImageRenderStyle=MSTY_Normal
         ImageAlign=IMGA_Center
         WinTop=0.108412
         WinLeft=0.625255
         WinWidth=0.338214
         WinHeight=0.221199
         RenderWeight=0.300000
         bBoundToParent=Wahr
     End Object
     imgSponsor=GUIImage'GUI2K4.UT2K4SPTab_Profile.SPPimgSponsor'

     Begin Object Class=GUIListBox Name=SPPlbProfiles
         bVisibleWhenEmpty=Wahr
         bSorted=Wahr
         OnCreateComponent=SPPlbProfiles.InternalOnCreateComponent
         FontScale=FNS_Medium
         Hint="Select a profile"
         WinTop=0.125901
         WinLeft=0.041832
         WinWidth=0.236888
         WinHeight=0.689871
         TabOrder=1
         bBoundToParent=Wahr
         OnChange=UT2K4SPTab_Profile.onProfileChange
     End Object
     lbProfiles=GUIListBox'GUI2K4.UT2K4SPTab_Profile.SPPlbProfiles'

     Begin Object Class=GUIButton Name=SPPbtnDelete
         Caption="DELETE"
         FontScale=FNS_Small
         Hint="Delete the selected profile"
         WinTop=0.900000
         WinLeft=0.180000
         WinWidth=0.200000
         WinHeight=0.050000
         TabOrder=3
         bBoundToParent=Wahr
         OnClick=UT2K4SPTab_Profile.btnDeleteOnClick
         OnKeyEvent=SPPbtnDelete.InternalOnKeyEvent
     End Object
     btnDelete=GUIButton'GUI2K4.UT2K4SPTab_Profile.SPPbtnDelete'

     Begin Object Class=GUIButton Name=SPPbtnCreate
         Caption="CREATE NEW"
         FontScale=FNS_Small
         Hint="Create a new profile"
         WinTop=0.900000
         WinLeft=0.400000
         WinWidth=0.200000
         WinHeight=0.050000
         TabOrder=4
         bBoundToParent=Wahr
         OnClick=UT2K4SPTab_Profile.btnCreateOnClick
         OnKeyEvent=SPPbtnCreate.InternalOnKeyEvent
     End Object
     btnCreate=GUIButton'GUI2K4.UT2K4SPTab_Profile.SPPbtnCreate'

     Begin Object Class=GUIButton Name=SPPbtnHighScores
         Caption="HIGH SCORES"
         FontScale=FNS_Small
         Hint="View the high scores"
         WinTop=0.900000
         WinLeft=0.620000
         WinWidth=0.200000
         WinHeight=0.050000
         TabOrder=5
         bBoundToParent=Wahr
         OnClick=UT2K4SPTab_Profile.btnHighScoresOnClick
         OnKeyEvent=SPPbtnHighScores.InternalOnKeyEvent
     End Object
     btnHighScores=GUIButton'GUI2K4.UT2K4SPTab_Profile.SPPbtnHighScores'

     Begin Object Class=GUIScrollTextBox Name=SPPsbDetails
         CharDelay=0.002500
         EOLDelay=0.500000
         OnCreateComponent=SPPsbDetails.InternalOnCreateComponent
         WinTop=0.439184
         WinLeft=0.634133
         WinWidth=0.325485
         WinHeight=0.388622
         TabOrder=2
         bBoundToParent=Wahr
     End Object
     sbDetails=GUIScrollTextBox'GUI2K4.UT2K4SPTab_Profile.SPPsbDetails'

     NoProfileSelected="No profile selected..."
     ProfileDetails="Team: %teamname%|Leader: %playername%|Members: %teammembers%||Total game time: %totaltime% minutes|Balance: %credits%||Matches: %matches%|Wins: %wins%|Kills: %kills%|Deaths: %deaths%|Goals: %Goals%|%sprees%|%multikills%|%specialawards%"
     DeleteProfile="You are about to delete the profile for '%profile%'||Are you sure you want to delete this profile?"
     OverloadProfile="You already have a profile loaded.||Are you sure you want to load this profile?"
     CheatWarning="Warning!|This profile does NOT originate from your machine.|This profile is not eligible for unlocking characters.|Do you want to load this profile?"
     SpreeLabel(0)="Killing Spree:"
     SpreeLabel(1)="Rampage:"
     SpreeLabel(2)="Dominating:"
     SpreeLabel(3)="Unstoppable:"
     SpreeLabel(4)="GODLIKE:"
     SpreeLabel(5)="WICKED SICK:"
     MultiKillsLabel(0)="Double Kill:"
     MultiKillsLabel(1)="MultiKill:"
     MultiKillsLabel(2)="MegaKill:"
     MultiKillsLabel(3)="UltraKill:"
     MultiKillsLabel(4)="MONSTER KILL:"
     MultiKillsLabel(5)="LUDICROUS KILL:"
     MultiKillsLabel(6)="HOLY SHIT:"
     PanelCaption="Profile"
}