GUI2K4.UT2K4SP_CGManoEMano

//==============================================================================
// Challenge a team for a 1vs1 game
//
// Written by Michiel Hendriks
// (c) 2003, 2004, Epic Games, Inc. All Rights Reserved
//==============================================================================

class UT2K4SP_CGManoEMano extends LargeWindow;

var automated GUIImage imgMap1, imgMap2, imgMapBg1, imgMapBg2;
var automated GUIButton btnOk, btnCancel;
var automated GUILabel lblTitle, lblNoPreview1, lblNoPreview2, lblMinMaxBet, lblBalance;
var automated GUIGFXButton cbMap1, cbMap2;
var automated moComboBox cbEnemyTeam;
var automated moFormatNumEdit neBet;
var automated GUIScrollTextBox sbDetails;

var UT2K4GameProfile GP;

/** the penalty we pay when we cancel the challenge */
var int CancelPenalty;

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

/** Minimal bet you may place */
var int MinimalBet;

/** set to the preselect/challenged team */
var string ChallengedBy;
/** true if we have been challenged */
var bool bChallenged;

var localized string PenaltyWarning, YouveBeenChallenged, SelectAMap,
                     msgChallenge, msgChallenged, NotEnoughCash, msgMinMaxBet;
/** always append this to the url */
var string DefaultUrl;

/** available maps */
var array<string> ChalMaps;

struct ChallengeSettingRecord
{
    var string Acronym;
    var int GoalScore;
    var string GameType;
};
/** per acronym settings */
var array<ChallengeSettingRecord> ChallengeSettings;

function InitComponent(GUIController MyController, GUIComponent MyOwner)
{
    local int i;
    local class<UT2K4TeamRoster> ET;

    Super.Initcomponent(MyController, MyOwner);
    GP = UT2K4GameProfile(PlayerOwner().Level.Game.CurrentGameProfile);
    for ( i = 0; i < Controls.Length; i++ )
    {
        Controls[i].bScaleToParent=True;
        Controls[i].bBoundToParent=True;
    }

    cbEnemyTeam.MyComboBox.List.Clear();
    for (i = 0; i < GP.TeamStats.length; i++)
    {
        if (GP.TeamStats[i].Matches > 0)
        {
            if (GP.TeamStats[i].Level >=3) continue; // never add strong team in 1vs1
            ET = class<UT2K4TeamRoster>(DynamicLoadObject(GP.TeamStats[i].Name, class'Class'));
            if (ET != none) cbEnemyTeam.AddItem(ET.Default.TeamName@"("$class'UT2K4SPTab_DetailEnemies'.default.StrengthLabels[ET.Default.TeamLevel]$")",,GP.TeamStats[i].Name);
        }
    }

    cbEnemyTeam.MyComboBox.List.Sort();
    cbEnemyTeam.SetIndex(0);

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

    sbDetails.SetContent(SelectAMap);

    lblBalance.Caption = class'UT2K4SPTab_LadderBase'.default.BalanceLabel@GP.MoneyToString(GP.Balance);
}

function GetRandomMaps()
{
    local int m1, m2;
    m1 = -1;
    m2 = -1;
    if (MapOptions[0].MapName == "") m1 = rand(ChalMaps.Length);
    do {
        if (MapOptions[1].MapName == "") m2 = rand(ChalMaps.Length);
        else break;
    } until (m1 != m2);
    if (m1 > -1) MapOptions[0] = class'CacheManager'.static.GetMapRecord(ChalMaps[m1]);
    if (m2 > -1) MapOptions[1] = class'CacheManager'.static.GetMapRecord(ChalMaps[m2]);

    if (MapOptions[0].ScreenshotRef != "") imgMap1.Image = Material(DynamicLoadObject(MapOptions[0].ScreenshotRef, class'Material'));
    lblNoPreview1.bVisible = MapOptions[0].ScreenshotRef == "";
    cbMap1.Caption = MapOptions[0].MapName;
    if (MapOptions[1].ScreenshotRef != "") imgMap2.Image = Material(DynamicLoadObject(MapOptions[1].ScreenshotRef, class'Material'));
    lblNoPreview2.bVisible = MapOptions[1].ScreenshotRef == "";
    cbMap2.Caption = MapOptions[1].MapName;
}

function setChallengeInfo(int selectedMap)
{
    local string desc;
    local class<UT2K4TeamRoster> ETI;
    local CacheManager.GameRecord GR;
    local int chalset;

    for (chalset = 0; chalset < ChallengeSettings.length; chalset++)
    {
        if (ChallengeSettings[chalset].Acronym ~= MapOptions[selectedMap].Acronym) break;
    }
    GR = class'CacheManager'.static.getGameRecord(ChallengeSettings[chalset].GameType);
    ETI = class<UT2K4TeamRoster>(DynamicLoadObject(cbEnemyTeam.GetExtra(), class'Class'));

    GP.ChallengeInfo.LevelName = MapOptions[selectedMap].MapName;
    GP.ChallengeInfo.NumBots = 1; // always 1 on 1
    GP.ChallengeInfo.DifficultyModifier = ETI.default.TeamLevel / 1.2;
    if (GP.ChallengeInfo.LevelName ~= "CTF-1on1-Joust") GP.ChallengeInfo.DifficultyModifier += 2;
    GP.ChallengeInfo.PrizeMoney = neBet.GetValue()*2;
    GP.ChallengeInfo.GameType = ChallengeSettings[chalset].GameType;
    GP.ChallengeInfo.GoalScore = ChallengeSettings[chalset].GoalScore;
    GP.ChallengeInfo.EntryFee = neBet.GetValue();
    GP.ChallengeInfo.URLString = DefaultUrl;

    if (bChallenged) desc = msgChallenged;
    else desc = msgChallenge;
    desc = repl(desc, "%map%", MapOptions[selectedMap].MapName);
    desc = repl(desc, "%teamname%", cbEnemyTeam.GetText());
    if (ETI.default.TeamLeader != "") desc = repl(desc, "%teamleader%", ETI.default.TeamLeader);
    else desc = repl(desc, "%teamleader%", ETI.default.RosterNames[0]);
    desc = repl(desc, "%prizemoney%", GP.MoneyToString(GP.ChallengeInfo.PrizeMoney));
    desc = repl(desc, "%entryfee%", GP.MoneyToString(GP.ChallengeInfo.EntryFee));
    desc = repl(desc, "%gametype%", GR.GameName);
    desc = repl(desc, "%penalty%", GP.MoneyToString(CancelPenalty));
    sbDetails.SetContent(desc);

    if ((GP.ChallengeInfo.LevelName != "") && (GP.Balance > GP.getMinimalEntryFeeFor(GP.ChallengeInfo)+GP.MinBalance)) btnOk.EnableMe();
        else btnOk.DisableMe();
}

/**
    param1 = preselect enemy team, fully qualified classname.
    param2 = not empty -> lock team change controlls
*/
event HandleParameters(string Param1, string Param2)
{
    local GUIController MyController;

    ChallengedBy = Param1;
    if (ChallengedBy != "") cbEnemyTeam.SetIndex(cbEnemyTeam.FindExtra(ChallengedBy));
    bChallenged = (Param2 != "");
    if (bChallenged)
    {
        MinimalBet = MinimalBet+rand(MinimalBet);
        CancelPenalty = MinimalBet*1.5;
        cbEnemyTeam.disableme();

        if (GP.CurrentLadder == GP.UT2K4GameLadder.default.LID_CTF)
        {
            if (frand() > 0.5)
            {
                MapOptions[rand(2)] = class'CacheManager'.static.GetMapRecord("CTF-1on1-Joust");
            }
        }
    }
    else {
        ChalMaps.Length = ChalMaps.Length+1;
        ChalMaps[ChalMaps.length-1] = "CTF-1on1-Joust";
    }

    neBet.Setup(MinimalBet, GP.Balance, (GP.Balance-MinimalBet)/20);
    UpdateTeamDetails(cbEnemyTeam);

    if ((GP.Balance-GP.MinBalance < MinimalBet) || (GP.Balance-GP.MinBalance < CancelPenalty))
    {
        CancelPenalty = 0;
        MyController = Controller;
        Controller.CloseMenu(true);
        if (bChallenged) return;

        MyController.ShowQuestionDialog(NotEnoughCash);
        return;
    }
    GetRandomMaps();
}

/**
    Play the selected match, first check if we need to assign team mates
*/
function bool onOkClick(GUIComponent Sender)
{
    GP.EnemyTeam = cbEnemyTeam.GetExtra();
    GP.ChallengeInfo.EnemyTeamName = GP.EnemyTeam;
    GP.bGotChallenged = bChallenged;
    GP.ChallengeVariable = GP.MoneyToString(neBet.GetValue());
    class'xGame.ManoEMano'.static.StartChallenge(GP, PlayerOwner().Level);
    Controller.CloseAll(false,true);
    return 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;
        Controller.CloseMenu(true);
    }
}

function OnMapSelect(GUIComponent Sender)
{
    if (Sender == cbMap1)
    {
        GP.ActiveMap = MapOptions[0];
        cbMap1.bChecked = true;
        cbMap2.bChecked = false;
        setChallengeInfo(0);
    }
    else {
        GP.ActiveMap = MapOptions[1];
        cbMap1.bChecked = false;
        cbMap2.bChecked = true;
        setChallengeInfo(1);
    }
    return;
}

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;
}

function UpdateDetails(GUIComponent Sender)
{
    if (cbMap1.bChecked) setChallengeInfo(0);
    else if (cbMap2.bChecked) setChallengeInfo(1);
}

function UpdateTeamDetails(GUIComponent Sender)
{
    local class<UT2K4TeamRoster> ETI;
    ETI = class<UT2K4TeamRoster>(DynamicLoadObject(cbEnemyTeam.GetExtra(), class'Class'));
    neBet.MyNumericEdit.MaxValue = min(GP.Balance, MinimalBet*(ETI.default.TeamLevel+1)*2);
    neBet.MyNumericEdit.Step = (neBet.MyNumericEdit.MaxValue-neBet.MyNumericEdit.MinValue) / 20;
    neBet.SetValue(neBet.GetValue());
    lblMinMaxBet.Caption = repl(repl(msgMinMaxBet, "%min%", GP.MoneyToString(MinimalBet)), "%max%", GP.MoneyToString(neBet.MyNumericEdit.MaxValue));
}


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;
}

function bool XButtonClicked( GUIComponent Sender )
{
    Controller.CloseMenu(true);
    return true;
}

function string FormatMoney(int NewValue)
{
    return GP.MoneyToString(NewValue);
}

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

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

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

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

     Begin Object Class=GUIButton Name=SPMbtnOk
         Caption="ACCEPT"
         MenuState=MSAT_Disabled
         FontScale=FNS_Small
         WinTop=0.904398
         WinLeft=0.710071
         WinWidth=0.222222
         WinHeight=0.056944
         RenderWeight=0.200000
         TabOrder=1
         bBoundToParent=True
         OnClick=UT2K4SP_CGManoEMano.onOkClick
         OnKeyEvent=SPMbtnOk.InternalOnKeyEvent
     End Object
     btnOK=GUIButton'GUI2K4.UT2K4SP_CGManoEMano.SPMbtnOk'

     Begin Object Class=GUIButton Name=SPCbtnCancel
         Caption="REFUSE"
         FontScale=FNS_Small
         WinTop=0.904398
         WinLeft=0.050348
         WinWidth=0.222222
         WinHeight=0.056944
         RenderWeight=0.200000
         TabOrder=2
         bBoundToParent=True
         OnClick=UT2K4SP_CGManoEMano.onCancelClick
         OnKeyEvent=SPCbtnCancel.InternalOnKeyEvent
     End Object
     btnCancel=GUIButton'GUI2K4.UT2K4SP_CGManoEMano.SPCbtnCancel'

     Begin Object Class=GUILabel Name=SPClblTitle
         Caption="Head to Head"
         TextAlign=TXTA_Center
         FontScale=FNS_Large
         StyleName="TextLabel"
         WinTop=0.026180
         WinLeft=0.067813
         WinWidth=0.862501
         WinHeight=0.077500
         RenderWeight=0.200000
         bBoundToParent=True
     End Object
     lblTitle=GUILabel'GUI2K4.UT2K4SP_CGManoEMano.SPClblTitle'

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

     lblNoPreview2=GUILabel'GUI2K4.UT2K4SP_CGManoEMano.NoPreview'

     Begin Object Class=GUILabel Name=SPClblMinMax
         FontScale=FNS_Small
         StyleName="TextLabel"
         WinTop=0.619930
         WinLeft=0.026146
         WinWidth=0.952778
         WinHeight=0.042778
         RenderWeight=0.200000
         bBoundToParent=True
     End Object
     lblMinMaxBet=GUILabel'GUI2K4.UT2K4SP_CGManoEMano.SPClblMinMax'

     Begin Object Class=GUILabel Name=SPLlblBalance
         TextAlign=TXTA_Right
         StyleName="TextLabel"
         WinTop=0.046667
         WinLeft=0.532360
         WinWidth=0.450000
         WinHeight=0.041250
         RenderWeight=0.250000
         bBoundToParent=True
     End Object
     lblBalance=GUILabel'GUI2K4.UT2K4SP_CGManoEMano.SPLlblBalance'

     Begin Object Class=GUIGFXButton Name=SPCcbMap1
         bCheckBox=True
         WinTop=0.452974
         WinLeft=0.020833
         WinWidth=0.444444
         WinHeight=0.062500
         bBoundToParent=True
         OnChange=UT2K4SP_CGManoEMano.OnMapSelect
         OnKeyEvent=SPCcbMap1.InternalOnKeyEvent
     End Object
     cbMap1=GUIGFXButton'GUI2K4.UT2K4SP_CGManoEMano.SPCcbMap1'

     Begin Object Class=GUIGFXButton Name=SPCcbMap2
         bCheckBox=True
         WinTop=0.452974
         WinLeft=0.534722
         WinWidth=0.444444
         WinHeight=0.062500
         bBoundToParent=True
         OnChange=UT2K4SP_CGManoEMano.OnMapSelect
         OnKeyEvent=SPCcbMap2.InternalOnKeyEvent
     End Object
     cbMap2=GUIGFXButton'GUI2K4.UT2K4SP_CGManoEMano.SPCcbMap2'

     Begin Object Class=moComboBox Name=SPCcbEnemyTeam
         bReadOnly=True
         Caption="Challenge team:"
         OnCreateComponent=SPCcbEnemyTeam.InternalOnCreateComponent
         Hint="Challenge this team for a match"
         WinTop=0.536447
         WinLeft=0.024306
         WinWidth=0.952779
         WinHeight=0.059722
         TabOrder=3
         bBoundToParent=True
         OnChange=UT2K4SP_CGManoEMano.UpdateTeamDetails
     End Object
     cbEnemyTeam=moComboBox'GUI2K4.UT2K4SP_CGManoEMano.SPCcbEnemyTeam'

     Begin Object Class=moFormatNumEdit Name=SPCneBet
         FormatValue=UT2K4SP_CGManoEMano.FormatMoney
         Caption="Challenge bet:"
         OnCreateComponent=SPCneBet.InternalOnCreateComponent
         Hint="The bet for this challenge"
         WinTop=0.590614
         WinLeft=0.024306
         WinWidth=0.952779
         WinHeight=0.037500
         TabOrder=4
         bBoundToParent=True
         OnChange=UT2K4SP_CGManoEMano.UpdateDetails
     End Object
     neBet=moFormatNumEdit'GUI2K4.UT2K4SP_CGManoEMano.SPCneBet'

     Begin Object Class=GUIScrollTextBox Name=SPCsbDetails
         bNoTeletype=True
         OnCreateComponent=SPCsbDetails.InternalOnCreateComponent
         WinTop=0.674643
         WinLeft=0.019792
         WinWidth=0.958334
         WinHeight=0.217361
         RenderWeight=0.200000
         TabOrder=1
         bBoundToParent=True
     End Object
     sbDetails=GUIScrollTextBox'GUI2K4.UT2K4SP_CGManoEMano.SPCsbDetails'

     MinimalBet=150
     PenaltyWarning="When you refuse you will have to pay a penalty of %cancelpenalty%.||Are you sure you want to refuse?"
     YouveBeenChallenged="You've been challenged!"
     SelectAMap="Please select an area for the challenge."
     msgChallenge="You have selected to play a %gametype% match in %map%. You will play against %teamleader% of the %teamname%.|You will have to pay %entryfee% to participate in this challenge, if you win you will earn %prizemoney%"
     msgChallenged="You have been challenged by %teamname% for a Head to Head match. You will play against %teamleader%.|When you win you will earn %prizemoney%, but you have to pay up %entryfee% to join this challenge.|You will play a %gametype% game in %map%.|If you refuse the match you will have to pay %penalty%."
     NotEnoughCash="You do not have enough money to pay the minimal bet for this challenge."
     msgMinMaxBet="minimum: %min%, maximum: %max%"
     DefaultUrl="?TeamScreen=true"
     ChalMaps(0)="DM-1on1-Albatross"
     ChalMaps(1)="DM-1on1-Crash"
     ChalMaps(2)="DM-1on1-Idoma"
     ChalMaps(3)="DM-1on1-Irondust"
     ChalMaps(4)="DM-1on1-Mixer"
     ChalMaps(5)="DM-1on1-Roughinery"
     ChalMaps(6)="DM-1on1-Serpentine"
     ChalMaps(7)="DM-1on1-Spirit"
     ChalMaps(8)="DM-1on1-Squader"
     ChalMaps(9)="DM-1on1-Trite"
     ChallengeSettings(0)=(Acronym="DM",GoalScore=15,GameType="xGame.xTeamGame")
     ChallengeSettings(1)=(Acronym="CTF",GoalScore=3,GameType="xGame.xCTFGame")
     DefaultLeft=0.050000
     DefaultTop=0.100000
     DefaultWidth=0.900000
     DefaultHeight=0.800000
     OnClose=UT2K4SP_CGManoEMano.OnWindowClose
     OnCanClose=UT2K4SP_CGManoEMano.OnCanWindowClose
     WinTop=0.100000
     WinLeft=0.050000
     WinWidth=0.900000
     WinHeight=0.800000
}