// Mechwarrior: Vengeance
// Copyright © 1999-2000 Microsoft Corporation
// Loading.script
// Jerry Edsall
// March 7, 2000
// Paolo Malabuyo
// July 28, 2000

#include "Content\\ShellScripts\\stddefs.h"
#include "Content\\ShellScripts\\ShellFunctionHeaders.hpp"
#include "Content\\ShellScripts\\ScriptStrings.h"

main
{
	GUI_CREATE
	{
		setresource("ScriptStrings.dll")
		object o_launch = launch
	}
}

launch
{

	GUI_CREATE
	{
		font3d titlefont	= FPATH localize$(IDS_F_LOAD_TITLE)
		font3d labelfont	= FPATH localize$(IDS_F_LOAD_TEXT)

		location			= 100, 125, 1

        int g_nLoaded = 0
        if g_nLoaded || callback($$CTCL_IsConsoleX$$)
        {
		pane p_logo		= "hsh\\logo.bmp", alpha //GPATH "logo.tga"
		alphamode(p_logo) = am_alpha_alphainvalpha
        origin(p_logo)		= getwidth(p_logo) / 2, getheight(p_logo) / 2
        scale(p_logo) = 100 * getresx()/getwidth(p_logo), 100 * getresy()/getheight(p_logo), 100
        }
		pane p_dialog		= GPATH "dialog_600x350m.tga"
		alphamode(p_dialog) = am_alpha_alphainvalpha

		pane p_bar			= GPATH "loadingbar.tga"
		origin(p_bar)		= getwidth(p_bar) / 2, getheight(p_bar) / 2
		alphamode(p_bar)	= am_alpha_alphainvalpha

		pane p_davion		= GPATH "davion_200x200.tga"
		alphamode(p_davion) = am_alpha_alphainvalpha
		origin(p_davion)	= getwidth(p_davion) / 2, getheight(p_davion) / 2

		string mission_name
		callback($$Shell_CallbackHandler$$, ShellLoadMissionName, mission_name)

		framerate			= 15

		int num_of_bars		= 8
		int num_of_barx		= num_of_bars + 1
		int barx[num_of_barx]
		barx[0]				= (getresx() / 2) - 256
		barx[1]				= (getresx() / 2) - 192
		barx[2]				= (getresx() / 2) - 128
		barx[3]				= (getresx() / 2) - 64
		barx[4]				= (getresx() / 2)
		barx[5]				= (getresx() / 2) + 64
		barx[6]				= (getresx() / 2) + 128
		barx[7]				= (getresx() / 2) + 192
		barx[8]				= (getresx() / 2) + 256

		int barcount		= 0
	}

	GUI_EXECUTE
	{
		if barcount < num_of_barx
		{
			barcount++
		}
		if barcount >= num_of_barx
		{
			barcount = 0
		}
	}

	GUI_DRAW
	{
#if 1
		setpencolor(0xff000000)
        drawrect 0, 0 to getresx(), getresy()

		if g_nLoaded || callback($$CTCL_IsConsoleX$$)
			render p_logo, getresx() / 2, (getresy() / 2), location.z
#else
		setpencolor(0xff000000)
		drawrect 0, 0 to getresx(), getresy()

		render p_dialog, location
		render p_davion, location.x + 460, location.y + 165

		if barcount == 0
		{
			setpencolor(200, 0, 0, 200)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 1
		{
			setpencolor(200, 0, 0, 180)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 2
		{
			setpencolor(200, 0, 0, 160)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 3
		{
			setpencolor(200, 0, 0, 140)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 4
		{
			setpencolor(200, 0, 0, 120)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 5
		{
			setpencolor(200, 0, 0, 100)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 6
		{
			setpencolor(200, 0, 0, 80)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 60)
			drawrect barx[7], 410 to barx[8], 431
		}
		if barcount == 7
		{
			setpencolor(200, 0, 0, 60)
			drawrect barx[0], 410 to barx[1], 431
			setpencolor(200, 0, 0, 80)
			drawrect barx[1], 410 to barx[2], 431
			setpencolor(200, 0, 0, 100)
			drawrect barx[2], 410 to barx[3], 431
			setpencolor(200, 0, 0, 120)
			drawrect barx[3], 410 to barx[4], 431
			setpencolor(200, 0, 0, 140)
			drawrect barx[4], 410 to barx[5], 431
			setpencolor(200, 0, 0, 160)
			drawrect barx[5], 410 to barx[6], 431
			setpencolor(200, 0, 0, 180)
			drawrect barx[6], 410 to barx[7], 431
			setpencolor(200, 0, 0, 200)
			drawrect barx[7], 410 to barx[8], 431
		}

		render p_bar, getresx() / 2, (getresy() / 2) + 120

		print3d_attributes = titlefont, 0xffffffff, 1,1,1,0,0, just_center
		print3d_margins = location.x, location.y to location.x + getwidth(p_dialog), location.y + getheight(p_dialog)
		print3d_position = location.x, location.y + 6
		print3d localize$(IDS_LOAD_LOADING)

		print3d_attributes = titlefont, 0xffffffff, 1,1,1,0,0
		print3d_margins = location.x + 45, location.y to location.x + getwidth(p_dialog) / 2, location.y + getheight(p_dialog)
		print3d_position = location.x + 45, location.y + 65
		print3d localize$(IDS_LOAD_SEQUENCEINIT)
		print3d_position = location.x + 45, location.y + 170
		print3d mission_name

		print3d_attributes = labelfont, 0xffffffff, 1,1,1,0,0
		print3d_margins = location.x + 45, location.y to location.x + getwidth(p_dialog) / 2, location.y + getheight(p_dialog)
		print3d_position = location.x + 45, location.y + 140
		print3d localize$(IDS_LOAD_MISSION)
#endif
	}
}