ZoneClubScreen.mdl

use "effect";
use "zoneclubdata";
use "font";
use "gamepanes";

/////////////////////////////////////////////////////////////////////////////
//
// Zone Club Screen
//
/////////////////////////////////////////////////////////////////////////////

paneSizeY = 238;
paneSizeX = 523;

messageImage = MDLFileImage("messageofthedaydefault");
imageSize = Max(PointY(ImageSize(messageImage)), paneSizeY);
delta     = Subtract(imageSize, paneSizeY);

y =
    Subtract(
        Mod(
            Multiply(10, Subtract(time, timeStart)), 
            delta
        ),
        delta
    );

messagePane =        
    AnimatedImagePaneRect(
        PaneImage(
            BlackPane(
                AnimatedImagePaneRect(
                    TranslateImage(
                        messageImage,
                        PointV(0, y)
                    ),
                    Rect(0, 0, paneSizeX, paneSizeY)
                )
            ),
            false,
            true
        ),
        Rect(0, 0, paneSizeX, paneSizeY)
    );

//
// Normal buttons
//

gamesButtonPane = ButtonPane(ImportImage("btnzone2gamesbmp", true), ButtonNormal, false);
gamesBigButtonPane = ButtonPane(ImportImage("btnzone2games2bmp", true), ButtonNormal, false);
zoneEventsButtonPane = ButtonPane(ImportImage("btnzoneeventsbmp", true), ButtonNormal, false);
squadsButtonPane = ButtonPane(ImportImage("btnzone2squadsbmp", true), ButtonNormal, false);
mainmenuButtonPane = SoundButtonPane(ImportImage("btnzone2mainmenubmp", true), ButtonNormal, false, negativeButtonClickSoundId);
playerProfileButtonPane = ButtonPane(ImportImage("btnzone2playerprofilebmp", true), ButtonNormal, false);
webButtonPane = ButtonPane(ImportImage("btnzone2webbmp", true), ButtonNormal, false);
leaderboardButtonPane = ButtonPane(ImportImage("btnzone2leaderbmp", true), ButtonNormal, false);
            
//
// Titles
//

yellowText          = Color(0.878, 0.573, 0);
whiteText           = Color(1, 1, 1);
titlePane           = StringPane("ALLEGIANCE ZONE", yellowText, Point(200, 30), JustifyLeft, titleFont);
captionPane         = StringPane("ACCESS THE ALLEGIANCE ZONE GAMES LIST, OR EXAMINE COMPLETE STATISTICS ON ALL SQUADS AND PLAYERS", whiteText, Point(800, 30), JustifyLeft, promptFont);

//
// Rollover tips
//

hoverSite = HoverSite(0);

hoverString =
    SwitchString(
        HoverSiteGetID(hoverSite),
        emptyString,
        [
            ( 1, "Return to the Allegiance main menu."),
            ( 2, "See a list of games currently available at Allegiance Zone."),
            ( 3, "Access your own player statistics."),
            ( 4, "Access the statistics of all Allegiance squads, create and manage your own."),
            ( 5, "Connect to the Allegiance Zone website."),
            ( 6, "Access the statistics of all Allegiance Zone players."),
            ( 7, "See the current schedule of Allegiance Zone events.")
        ]
    );

hoverImage = StringImage(JustifyLeft, 215, smallFont, white, hoverString);
hoverPane  = AnimatedImagePaneRect(hoverImage, Rect(0, -35, 215, 0));

//
// The background and control positions
//

screen =
    ScreenPane(
        ImportImageFromFile("zoneauscreenbmp.png", false),
        [   
            (titlePane,                 Point(15, 15)),
            (captionPane,               Point(75, 50)),
            (HoverPane(hoverSite,  1, mainmenuButtonPane        ), Point(24, 523)),
            (HoverPane(hoverSite,  2, gamesButtonPane           ), Point(104, 523)),
            (HoverPane(hoverSite,  7, zoneEventsButtonPane      ), Point(184, 523)),
            (HoverPane(hoverSite,  2, gamesBigButtonPane        ), Point(200, 382)),
            (HoverPane(hoverSite,  4, squadsButtonPane          ), Point(264, 523)),
            (HoverPane(hoverSite,  6, leaderboardButtonPane     ), Point(344, 523)),
            (HoverPane(hoverSite,  3, playerProfileButtonPane   ), Point(424, 523)),
            (HoverPane(hoverSite,  5, webButtonPane             ), Point(504, 523)),
            (messagePane,               Point(136, 139)),
            (hoverPane, Point( 580, 550))// place the text
        ]
    );