GUI2K4.UT2K4SP_Challenge

//==============================================================================
// Challenge a team for a deathmatch (SP)
//
// Written by Michiel Hendriks
// (c) 2003, Epic Games, Inc. All Rights Reserved
//==============================================================================

class UT2K4SP_Challenge extends LargeWindow;

var automated GUIImage imgMap1, imgMap2, imgMapBg1, imgMapBg2;
var automated GUIButton btnOk, btnCancel;
var automated GUILabel lblTitle, lblGameDescription, lblNoPreview1, lblNoPreview2;
var automated GUIComboBox cbGameType;
var automated GUIGFXButton cbMap1, cbMap2;
var automated moComboBox cbEnemyTeam;
var automated GUIScrollTextBox sbDetails;

var UT2K4GameProfile GP;

/** team role selection window */
var string TeamRoleWindow;
var UT2K4SP_TeamRoles RoleWindow;

/** we have been challenged by this team */
var string ChallengedBy;
/** the penalty we pay when we cancel the challenge */
var int CancelPenalty;

var array<CacheManager.MapRecord> MapData;
/** The two maps to choose from */
var CacheManager.MapRecord MapOptions[2];

/** PrizeMoney = enemy team size * this number */
var int BasePrizeMoney;
/** This is added to the base price money after it has been multiplied with a random float */
var int VarPrizeMoney;

struct ChallengeGameType
{
    var string GameType;
    var string ExtraUrl;
    var int MaxBots;
    var string MapAcronym;
    var string MapPrefix;
    var int BaseGoalScore;
    var int VarGoalScore;
};
/** Possible challenge matches */
var array<ChallengeGameType> ChallengeGames;
/** localized names for the above types */
var localized array<string> ChallengeGameNames;

var localized string PenaltyWarning, ChallengeDescription, ChallengedDescription, NotEnoughCash, YouveBeenChallenged, PlayTitle;
/** always append this to the url */
var string DefaultUrl;

function InitComponent(GUIController MyController, GUIComponent MyOwner)
{
    local int i;

    Super.Initcomponent(MyController, MyOwner);
    GP = UT2K4GameProfile(PlayerOwner().Level.Game.CurrentGameProfile);
    for (i = 0; i < ChallengeGames.length; i++)
    {
        cbGameType.AddItem(ChallengeGameNames[i]);
    }
    for ( i = 0; i < Controls.Length; i++ )
    {
        Controls[i].bScaleToParent=True;
        Controls[i].bBoundToParent=True;
    }
    cbGameType.SetIndex(rand(ChallengeGames.length));  // get an random game
    cbEnemyTeam.MyComboBox.List.Sort();
    cbEnemyTeam.SetIndex(0);
    cbGameType.Edit.FontScale = cbGameType.FontScale;
    cbGameType.Edit.CaptionAlign = TXTA_Center;
    cbGameType.List.FontScale = cbGameType.FontScale;
    cbGameType.List.TextAlign = TXTA_Center;

    SetupNoPreview(lblNoPreview1, imgMap1);
    SetupNoPreview(lblNoPreview2, imgMap2);
}

function GetGame(int index, optional bool noRecreateEnemies)
{
    local int j, n;
    local string tmp;
    local class<UT2K4TeamRoster> ET;

    GP.bIsChallenge = true;
    lblGameDescription.Caption = ChallengeGameNames[index];
    // get two random maps
    MapData.length = 0;
    class'CacheManager'.static.GetMapList(MapData, ChallengeGames[index].MapAcronym);
    if (ChallengeGames[index].MapPrefix != "") // check optional prefix
    {
        for (n = MapData.length-1; n >= 0; n--)
        {
            if (Left(MapData[n].MapName, Len(ChallengeGames[index].MapPrefix)) ~= ChallengeGames[index].MapPrefix)
            {
                continue;
            }
            MapData.Remove(n, 1);
        }
    }
    for (n = 0; n < 2; n++)
    {
        do {
            if (MapData.length == 0) break;
            j = rand(MapData.length);
            MapOptions[n] = MapData[j];
            //Log("Map select"@n@"="@MapOptions[n].MapName);
            //Log(MapOptions[n].PlayerCountMin@MapOptions[n].PlayerCountMax@ChallengeGames[index].MaxBots);
            MapData.Remove(j, 1);
        } until (((ChallengeGames[index].MaxBots+1) >= MapOptions[n].PlayerCountMin)
            && ((ChallengeGames[index].MaxBots+1) <= MapOptions[n].PlayerCountMax));
    }
    if (MapOptions[0].ScreenshotRef != "") imgMap1.Image = Material(DynamicLoadObject(MapOptions[0].ScreenshotRef, class'Material'));
    else imgMap1.Image = None;
    imgMap1.SetVisibility(imgMap1.Image != None); lblNoPreview1.SetVisibility(imgMap1.Image == None);
    if (MapOptions[1].ScreenshotRef != "") imgMap2.Image = Material(DynamicLoadObject(MapOptions[1].ScreenshotRef, class'Material'));
    else imgMap2.Image = None;
    imgMap2.SetVisibility(imgMap2.Image != None); lblNoPreview2.SetVisibility(imgMap2.Image == None);
    cbMap1.Caption = PlayTitle@MapOptions[0].MapName;
    cbMap2.Caption = PlayTitle@MapOptions[1].MapName;

    GP.ChallengeInfo = new(GP) class'UT2K4MatchInfo';
    GP.ChallengeInfo.NumBots = ChallengeGames[index].MaxBots;
    GP.ChallengeInfo.URLString = DefaultUrl$ChallengeGames[index].ExtraUrl;
    GP.ChallengeInfo.GameType = ChallengeGames[index].GameType;
    BasePrizeMoney += VarPrizeMoney*frand();
    GP.ChallengeInfo.PrizeMoney = (GP.GetNumTeammatesForMatch()+1.5)*BasePrizeMoney;
    GP.ChallengeInfo.EntryFee = 0.5*BasePrizeMoney; // half the base price
    GP.ChallengeInfo.GoalScore = ChallengeGames[index].BaseGoalScore+(ChallengeGames[index].VarGoalScore*frand());

    tmp = repl(ChallengeDescription, "%entryfee%", GP.MoneyToString(GP.ChallengeInfo.EntryFee));
    tmp = repl(tmp, "%PrizeMoney%", GP.MoneyToString(GP.ChallengeInfo.PrizeMoney));
    tmp = repl(tmp, "%balance%", GP.MoneyToString(GP.Balance));
    sbDetails.SetContent(tmp);

    // Get enemies
    if (!noRecreateEnemies)
    {
        cbEnemyTeam.MyComboBox.List.Clear();
        for (j = 0; j < GP.TeamStats.length; j++)
        {
            if (GP.TeamStats[j].Matches > 0)
            {
                if ((GP.TeamStats[j].Level >=3) && (GP.ChallengeInfo.NumBots == 1)) continue; // never add strong team in 1vs1
                ET = class<UT2K4TeamRoster>(DynamicLoadObject(GP.TeamStats[j].Name, class'Class'));
                cbEnemyTeam.AddItem(ET.Default.TeamName,,GP.TeamStats[j].Name);
            }
        }
    }

    if (cbMap1.bChecked) OnMapSelect(cbMap1);
    else if (cbMap2.bChecked) OnMapSelect(cbMap2);
    GP.bIsChallenge = false;
}

event HandleParameters(string Param1, string Param2)
{
    local string tmp;
    local int i, teampos;
    local GUIQuestionPage QPage;
    local GUIController MyController;

    if (GP.ChallengeInfo.EntryFee > GP.Balance)
    {
        MyController = Controller;
        Controller.CloseMenu(true);
        if (MyController.OpenMenu("GUI2K4.GUI2K4QuestionPage"))
        {
            QPage=GUIQuestionPage(MyController.TopPage());
            QPage.SetupQuestion(NotEnoughCash, QBTN_Ok, QBTN_Ok);
        }
        return;
    }

    if (Param1 != "")
    {
        i = cbEnemyTeam.FindExtra(Param1);
        if (i > -1)
        {
            teampos = GP.GetTeamPosition(Param1);
            if (teampos > -1)
            {
                if (GP.TeamStats[teampos].Level >= 3)
                {
                    while (GP.ChallengeInfo.NumBots == 1) GetGame(rand(ChallengeGames.length), true); // no 1vs1 against top team
                }
            }
            cbGameType.bVisible = false;
            cbEnemyTeam.SetIndex(i);
            lblTitle.Caption = YouveBeenChallenged;
            cbEnemyTeam.MenuStateChange(MSAT_Disabled);
            CancelPenalty = GP.ChallengeInfo.EntryFee;
            GP.ChallengeInfo.EntryFee = 0;
            tmp = repl(ChallengedDescription, "%entryfee%", GP.MoneyToString(GP.ChallengeInfo.EntryFee));
            tmp = repl(tmp, "%PrizeMoney%", GP.MoneyToString(GP.ChallengeInfo.PrizeMoney));
            tmp = repl(tmp, "%enemyteam%", cbEnemyTeam.GetText());
            tmp = repl(tmp, "%cancelfee%", GP.MoneyToString(CancelPenalty));
            tmp = repl(tmp, "%balance%", GP.MoneyToString(GP.Balance));
            sbDetails.SetContent(tmp);
        }
    }
}

/**
    Play the selected match, first check if we need to assign team mates
*/
function bool onOkClick(GUIComponent Sender)
{
    if (GP != none)
    {
        GP.bIsChallenge = true;
        GP.ChallengeInfo.EnemyTeamName = cbEnemyTeam.GetExtra();
        GP.EnemyTeam = GP.ChallengeInfo.EnemyTeamName;
        // Difficulty = Team Level / 1.2 (strongest team is level 3 -> 2.5)
        GP.ChallengeInfo.DifficultyModifier = GP.TeamStats[GP.GetTeamPosition(GP.ChallengeInfo.EnemyTeamName)].Level/1.2;
        // 1vs1 -> make enemy 33% stronger
        if (GP.ChallengeInfo.NumBots == 1) GP.ChallengeInfo.DifficultyModifier *= 1.33;
        GP.ChallengeInfo.SpecialEvent = "";

        if (GP.GetNumTeammatesForMatch() > 0)
        {
            if (Controller.OpenMenu(TeamRoleWindow))
            {
                RoleWindow = UT2K4SP_TeamRoles(Controller.TopPage());
                RoleWindow.OnOkClick = StartMatch;
            }
        }
        else StartMatch();
    }
    else Warn("GP != none");
    return true;
}

/** Start the selected match */
function StartMatch()
{
    local LevelInfo myLevel;
    GP.Balance -= GP.ChallengeInfo.EntryFee;
    myLevel = PlayerOwner().Level;
    GP.StartNewMatch ( -1, myLevel );
    Controller.CloseAll(false,true);
}

/**
    Cancel button pressed
*/
function bool onCancelClick(GUIComponent Sender)
{
    if (OnCanWindowClose(true)) return Controller.CloseMenu(true);
    else return false;
}

/** Player accepts to pay the penalty */
function OnConfirmCancel(byte bButton)
{
    if (bButton == QBTN_Yes)
    {
        GP.Balance -= CancelPenalty;
        CancelPenalty = 0;
        //PlayerOwner().Level.Game.SavePackage(GP.PackageName);
        Controller.CloseMenu(true);
    }
}

function OnMapSelect(GUIComponent Sender)
{
    if (Sender == cbMap1)
    {
        GP.ActiveMap = MapOptions[0];
        cbMap1.bChecked = true;
        cbMap2.bChecked = false;
    }
    else {
        GP.ActiveMap = MapOptions[1];
        cbMap1.bChecked = false;
        cbMap2.bChecked = true;
    }
    GP.ChallengeInfo.LevelName = GP.ActiveMap.MapName;
    if ((GP.ChallengeInfo.LevelName != "") && (GP.Balance > GP.ChallengeInfo.EntryFee)) btnOk.MenuStateChange(MSAT_Blurry);
        else btnOk.MenuStateChange(MSAT_Disabled);
    return;
}

function OnGameSelect(GUIComponent Sender)
{
    GetGame(cbGameType.GetIndex());
}

function OnWindowClose(optional Bool bCancelled)
{
    GP.bIsChallenge = !bCancelled;
}

function bool OnCanWindowClose(optional Bool bCancelled)
{
    local GUIQuestionPage QPage;
    if (!bCancelled) return true;
    if (CancelPenalty > 0)
    {
        if (Controller.OpenMenu("GUI2K4.GUI2K4QuestionPage"))
        {
            QPage=GUIQuestionPage(Controller.TopPage());
            QPage.SetupQuestion(repl(PenaltyWarning, "%cancelpenalty%", GP.MoneyToString(CancelPenalty)), QBTN_YesNo, QBTN_No);
            QPage.OnButtonClick = OnConfirmCancel;
        }
        return false;
    }
    return true;
}

event SetVisibility(bool bIsVisible)
{
    Super.SetVisibility(bIsVisible);
    if ( imgMap1 != None )
    {
        imgMap1.SetVisibility(imgMap1.Image != None);
        if ( lblNoPreview1 != None ) lblNoPreview1.SetVisibility(imgMap1.Image == None);
    }
    if ( imgMap2 != None )
    {
        imgMap2.SetVisibility(imgMap2.Image != None);
        if ( lblNoPreview2 != None ) lblNoPreview2.SetVisibility(imgMap2.Image == None);
    }
}

protected function SetupNoPreview( GUILabel lbl, GUIImage img )
{
    if ( lbl == None || img == None ) return;
    lbl.WinLeft   = img.WinLeft;
    lbl.WinTop    = img.WinTop;
    lbl.WinWidth  = img.WinWidth;
    lbl.WinHeight = img.WinHeight;
}

defaultproperties
{
     Begin Object Class=GUIImage Name=SPCimgMap1
         Image=Texture'2K4Menus.Controls.sectionback'
         ImageStyle=ISTY_Scaled
         WinTop=0.197531
         WinLeft=0.022222
         WinWidth=0.441667
         WinHeight=0.312500
         RenderWeight=0.150000
     End Object
     imgMap1=GUIImage'GUI2K4.UT2K4SP_Challenge.SPCimgMap1'

     Begin Object Class=GUIImage Name=SPCimgMap2
         Image=Texture'2K4Menus.Controls.sectionback'
         ImageStyle=ISTY_Scaled
         WinTop=0.197531
         WinLeft=0.536111
         WinWidth=0.441667
         WinHeight=0.312500
         RenderWeight=0.150000
     End Object
     imgMap2=GUIImage'GUI2K4.UT2K4SP_Challenge.SPCimgMap2'

     Begin Object Class=GUIImage Name=SPCimgMapBg1
         Image=Texture'2K4Menus.Controls.sectionback'
         ImageStyle=ISTY_Scaled
         WinTop=0.186308
         WinLeft=0.020833
         WinWidth=0.444444
         WinHeight=0.333333
     End Object
     imgMapBg1=GUIImage'GUI2K4.UT2K4SP_Challenge.SPCimgMapBg1'

     Begin Object Class=GUIImage Name=SPCimgMapBg2
         Image=Texture'2K4Menus.Controls.sectionback'
         ImageStyle=ISTY_Scaled
         WinTop=0.186308
         WinLeft=0.534722
         WinWidth=0.444444
         WinHeight=0.333333
     End Object
     imgMapBg2=GUIImage'GUI2K4.UT2K4SP_Challenge.SPCimgMapBg2'

     Begin Object Class=GUIButton Name=SPMbtnOk
         Caption="ACCEPT"
         FontScale=FNS_Small
         WinTop=0.887731
         WinLeft=0.710071
         WinWidth=0.222222
         WinHeight=0.044444
         RenderWeight=0.200000
         TabOrder=1
         OnClick=UT2K4SP_Challenge.onOkClick
         OnKeyEvent=SPMbtnOk.InternalOnKeyEvent
     End Object
     btnOK=GUIButton'GUI2K4.UT2K4SP_Challenge.SPMbtnOk'

     Begin Object Class=GUIButton Name=SPCbtnCancel
         Caption="REFUSE"
         FontScale=FNS_Small
         WinTop=0.887731
         WinLeft=0.050348
         WinWidth=0.222222
         WinHeight=0.044444
         RenderWeight=0.200000
         TabOrder=2
         OnClick=UT2K4SP_Challenge.onCancelClick
         OnKeyEvent=SPCbtnCancel.InternalOnKeyEvent
     End Object
     btnCancel=GUIButton'GUI2K4.UT2K4SP_Challenge.SPCbtnCancel'

     Begin Object Class=GUILabel Name=SPClblTitle
         Caption="Challenge"
         TextAlign=TXTA_Center
         FontScale=FNS_Large
         StyleName="TextLabel"
         WinTop=0.017847
         WinLeft=0.067813
         WinWidth=0.862501
         WinHeight=0.077500
         RenderWeight=0.200000
     End Object
     lblTitle=GUILabel'GUI2K4.UT2K4SP_Challenge.SPClblTitle'

     Begin Object Class=GUILabel Name=SPClblGameDescription
         TextAlign=TXTA_Center
         FontScale=FNS_Large
         StyleName="TextLabel"
         WinTop=0.101180
         WinLeft=0.067813
         WinWidth=0.862501
         WinHeight=0.077500
         RenderWeight=0.200000
     End Object
     lblGameDescription=GUILabel'GUI2K4.UT2K4SP_Challenge.SPClblGameDescription'

     Begin Object Class=GUILabel Name=NoPreview
         Caption="No Preview Available"
         TextAlign=TXTA_Center
         TextColor=(B=0,G=255,R=247)
         TextFont="UT2HeaderFont"
         bTransparent=Falsch
         bMultiLine=Wahr
         VertAlign=TXTA_Center
         WinTop=0.197531
         WinLeft=0.022222
         WinWidth=0.441667
         WinHeight=0.312500
     End Object
     lblNoPreview1=GUILabel'GUI2K4.UT2K4SP_Challenge.NoPreview'

     lblNoPreview2=GUILabel'GUI2K4.UT2K4SP_Challenge.NoPreview'

     Begin Object Class=GUIComboBox Name=SPCcbGameType
         bReadOnly=Wahr
         FontScale=FNS_Large
         Hint="Select the game"
         WinTop=0.097830
         WinLeft=0.019792
         WinWidth=0.958334
         WinHeight=0.079167
         RenderWeight=0.210000
         TabOrder=0
         OnChange=UT2K4SP_Challenge.OnGameSelect
         OnKeyEvent=SPCcbGameType.InternalOnKeyEvent
     End Object
     cbGameType=GUIComboBox'GUI2K4.UT2K4SP_Challenge.SPCcbGameType'

     Begin Object Class=GUIGFXButton Name=SPCcbMap1
         bCheckBox=Wahr
         WinTop=0.519641
         WinLeft=0.020833
         WinWidth=0.444444
         WinHeight=0.062500
         OnChange=UT2K4SP_Challenge.OnMapSelect
         OnKeyEvent=SPCcbMap1.InternalOnKeyEvent
     End Object
     cbMap1=GUIGFXButton'GUI2K4.UT2K4SP_Challenge.SPCcbMap1'

     Begin Object Class=GUIGFXButton Name=SPCcbMap2
         bCheckBox=Wahr
         WinTop=0.519641
         WinLeft=0.534722
         WinWidth=0.444444
         WinHeight=0.062500
         OnChange=UT2K4SP_Challenge.OnMapSelect
         OnKeyEvent=SPCcbMap2.InternalOnKeyEvent
     End Object
     cbMap2=GUIGFXButton'GUI2K4.UT2K4SP_Challenge.SPCcbMap2'

     Begin Object Class=moComboBox Name=SPCcbEnemyTeam
         bReadOnly=Wahr
         Caption="Challenge team:"
         OnCreateComponent=SPCcbEnemyTeam.InternalOnCreateComponent
         Hint="Challenge this team for a match"
         WinTop=0.594780
         WinLeft=0.024306
         WinWidth=0.952779
         WinHeight=0.059722
         TabOrder=3
     End Object
     cbEnemyTeam=moComboBox'GUI2K4.UT2K4SP_Challenge.SPCcbEnemyTeam'

     Begin Object Class=GUIScrollTextBox Name=SPCsbDetails
         bNoTeletype=Wahr
         OnCreateComponent=SPCsbDetails.InternalOnCreateComponent
         WinTop=0.667977
         WinLeft=0.019792
         WinWidth=0.958334
         WinHeight=0.211111
         RenderWeight=0.200000
         TabOrder=1
     End Object
     sbDetails=GUIScrollTextBox'GUI2K4.UT2K4SP_Challenge.SPCsbDetails'

     TeamRoleWindow="GUI2K4.UT2K4SP_TeamRoles"
     BasePrizeMoney=400
     VarPrizeMoney=100
     ChallengeGames(0)=(GameType="xGame.xTeamGame",maxbots=5,MapAcronym="DM",BaseGoalScore=20,VarGoalScore=5)
     ChallengeGames(1)=(GameType="xGame.xDeathmatch",maxbots=1,MapAcronym="DM",MapPrefix="DM-1on1",BaseGoalScore=10,VarGoalScore=5)
     ChallengeGames(2)=(GameType="BonusPack.xMutantGame",maxbots=4,MapAcronym="DM",BaseGoalScore=15,VarGoalScore=5)
     ChallengeGames(3)=(GameType="xGame.xTeamGame",ExtraUrl="?mutator=XGame.MutInstaGib",maxbots=7,MapAcronym="DM",BaseGoalScore=30,VarGoalScore=10)
     ChallengeGameNames(0)="Team DeathMatch"
     ChallengeGameNames(1)="1vs1 DeathMatch"
     ChallengeGameNames(2)="Mutant"
     ChallengeGameNames(3)="Instagib Team DeathMatch"
     PenaltyWarning="When you refuse you will have to pay a penalty of %cancelpenalty%.||Are you sure you want to refuse?"
     ChallengeDescription="To enter this challenge you have to pay the entry fee of %entryfee%.|You can win %PrizeMoney% when you win this match.|Your current balance is %balance%."
     ChallengedDescription="You have been challenged by %enemyteam%.|You can win %PrizeMoney% when you defeat them.|When you don't accept this challenge you have to pay %cancelfee% to the opposing team.|Your current balance is %balance%."
     NotEnoughCash="You do not have enough money to challenge another team."
     YouveBeenChallenged="You've been challenged!"
     PlayTitle="Play"
     DefaultUrl="?TeamScreen=true"
     OnClose=UT2K4SP_Challenge.OnWindowClose
     OnCanClose=UT2K4SP_Challenge.OnCanWindowClose
     WinTop=0.050000
     WinLeft=0.050000
     WinWidth=0.900000
     WinHeight=0.900000
}