#pragma region Copyright (c) 2014-2016 OpenRCT2 Developers
/*****************************************************************************
 * OpenRCT2, an open source clone of Roller Coaster Tycoon 2.
 *
 * OpenRCT2 is the work of many authors, a full list can be found in contributors.md
 * For more information, visit https://github.com/OpenRCT2/OpenRCT2
 *
 * OpenRCT2 is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * A full copy of the GNU General Public License can be found in licence.txt
 *****************************************************************************/
#pragma endregion

#include <time.h>
#include "addresses.h"
#include "audio/audio.h"
#include "config.h"
#include "drawing/drawing.h"
#include "editor.h"
#include "game.h"
#include "input.h"
#include "localisation/date.h"
#include "localisation/localisation.h"
#include "interface/screenshot.h"
#include "interface/viewport.h"
#include "intro.h"
#include "management/news_item.h"
#include "management/research.h"
#include "network/network.h"
#include "openrct2.h"
#include "peep/staff.h"
#include "ride/ride.h"
#include "scenario.h"
#include "util/util.h"
#include "world/climate.h"
#include "world/map.h"
#include "world/park.h"
#include "world/scenery.h"
#include "world/sprite.h"
#include "title.h"
#include "interface/title_sequences.h"
#include "windows/error.h"

static const int gRandomShowcase = 0;
sint32 gTitleScriptCommand = -1;
uint8 gTitleScriptSave = 0xFF;
sint32 gTitleScriptSkipTo = -1;
sint32 gTitleScriptSkipLoad = -1;
rct_xy16 _titleScriptCurrentCentralPosition = { -1, -1 };

#pragma region Showcase script

#define WAIT(t)				TITLE_SCRIPT_WAIT, t
#define LOADMM()			TITLE_SCRIPT_LOADMM
#define LOCATION(x, y)		TITLE_SCRIPT_LOCATION, x, y
#define ROTATE(n)			TITLE_SCRIPT_ROTATE, n
#define ZOOM(d)				TITLE_SCRIPT_ZOOM, d
#define RESTART()			TITLE_SCRIPT_RESTART
#define LOAD(i)				TITLE_SCRIPT_LOAD, i
#define LOADRCT1(i)			TITLE_SCRIPT_LOADRCT1, i

static const uint8 _magicMountainScript[] = {
	LOADMM(),
	LOCATION(210, 112), WAIT(13),
	ROTATE(1), LOCATION(210, 112), WAIT(14),
	ROTATE(3), LOCATION(167, 180), WAIT(12),
	ROTATE(1), LOCATION(155, 189), WAIT(12),
	LOCATION(106, 39), WAIT(12),
	LOCATION(182, 50), WAIT(12),
	ROTATE(3), LOCATION(209, 47), WAIT(12),
	ROTATE(1), LOCATION(159, 93), WAIT(12),
	RESTART(),
};

static uint8* _loadedScript;
static const uint8* _currentScript;
static uint8 _lastOpcode;
static int _scriptNoLoadsSinceRestart;
static int _scriptWaitCounter;
static int _scriptCurrentPreset;

static void title_init_showcase();
static void title_update_showcase();

static uint8 *generate_random_script();

#pragma endregion

static void title_create_windows();

static uint8 *title_script_load();

/**
 *
 *  rct2: 0x0068E8DA
 */
void title_load()
{
	log_verbose("loading title");

	if (gGamePaused & GAME_PAUSED_NORMAL)
		pause_toggle();

	gScreenFlags = SCREEN_FLAGS_TITLE_DEMO;

	reset_park_entrances();
	user_string_clear_all();
	reset_sprite_list();
	ride_init_all();
	window_guest_list_init_vars_a();
	staff_reset_modes();
	map_init(150);
	park_init();
	date_reset();
	climate_reset(CLIMATE_COOL_AND_WET);
	scenery_set_default_placement_configuration();
	window_new_ride_init_vars();
	window_guest_list_init_vars_b();
	window_staff_list_init_vars();
	map_update_tile_pointers();
	reset_0x69EBE4();
	audio_stop_ride_music();
	audio_stop_crowd_sound();
	//stop_other_sounds();
	viewport_init_all();
	news_item_init_queue();
	title_create_windows();
	title_init_showcase();
	gfx_invalidate_screen();
	gScreenAge = 0;
#ifndef DISABLE_NETWORK
	network_close();
#endif

	if (gOpenRCT2ShowChangelog) {
		gOpenRCT2ShowChangelog = false;
		window_changelog_open();
	}

	log_verbose("loading title finished");
}

/**
 * Creates the windows shown on the title screen; New game, load game,
 * tutorial, toolbox and exit.
 *  rct2: 0x0066B5C0 (part of 0x0066B3E8)
 */
static void title_create_windows()
{
	window_main_open();
	window_title_menu_open();
	window_title_exit_open();
	window_title_options_open();
	window_title_logo_open();
	window_resize_gui(gScreenWidth, gScreenHeight);
}

/**
 *
 *  rct2: 0x00678680
 */
static void title_init_showcase()
{
	title_refresh_sequence();
}

static int title_load_park(const char *path)
{
	rct_window* w;
	int successfulLoad = 0;

	if (_strcmpi(path_get_extension(path), ".sv6") == 0) {
		SDL_RWops* rw = SDL_RWFromFile(path, "rb");
		if (rw != NULL) {
			successfulLoad = game_load_sv6(rw);
			SDL_RWclose(rw);
		}
	} else {
		successfulLoad = scenario_load(path);
	}

	if (!successfulLoad)
		return 0;

	w = window_get_main();
	w->viewport_target_sprite = -1;
	w->saved_view_x = gSavedViewX;
	w->saved_view_y = gSavedViewY;

	{
		char zoomDifference = gSavedViewZoom - w->viewport->zoom;
		w->viewport->zoom = gSavedViewZoom;
		gCurrentRotation = gSavedViewRotation;
		if (zoomDifference != 0) {
			if (zoomDifference < 0) {
				zoomDifference = -zoomDifference;
				w->viewport->view_width >>= zoomDifference;
				w->viewport->view_height >>= zoomDifference;
			} else {
				w->viewport->view_width <<= zoomDifference;
				w->viewport->view_height <<= zoomDifference;
			}
		}
		w->saved_view_x -= w->viewport->view_width >> 1;
		w->saved_view_y -= w->viewport->view_height >> 1;
	}

	window_invalidate(w);
	reset_all_sprite_quadrant_placements();
	window_new_ride_init_vars();
	if (_strcmpi(path_get_extension(path), ".sv6") != 0)
		sub_684AC3();
	scenery_set_default_placement_configuration();
	news_item_init_queue();
	gfx_invalidate_screen();
	gScreenAge = 0;
	gGameSpeed = 1;
	return 1;
}

/**
 * Sets the map location to the given tile coordinates. Z is automatic.
 * @param x X position in map tiles.
 * @param y Y position in map tiles.
 */
static void title_set_location(int x, int y)
{
	int z = map_element_height(x, y);

	// Update viewport
	rct_window* w = window_get_main();
	if (w != NULL) {
		window_scroll_to_location(w, x, y, z);
		w->flags &= ~WF_SCROLLING_TO_LOCATION;
		viewport_update_position(w);
	}

	// Save known tile position in case of window resize
	_titleScriptCurrentCentralPosition.x = (sint16)x;
	_titleScriptCurrentCentralPosition.y = (sint16)y;
}

/**
 * Re-centres the map location to the last scripted tile position.
 */
void title_fix_location()
{
	if (gScreenFlags == SCREEN_FLAGS_TITLE_DEMO) {
		rct_xy16 position = _titleScriptCurrentCentralPosition;
		if (position.x != -1) {
			title_set_location(position.x, position.y);
		}
	}
}

static void title_skip_opcode()
{
	uint8 script_opcode;

	script_opcode = *_currentScript++;
	gTitleScriptCommand++;
	_lastOpcode = script_opcode;

	switch (script_opcode) {
	case TITLE_SCRIPT_WAIT:
		_currentScript++;
		break;
	case TITLE_SCRIPT_LOADMM:
		_currentScript++;
		break;
	case TITLE_SCRIPT_LOCATION:
		_currentScript++;
		_currentScript++;
		break;
	case TITLE_SCRIPT_ROTATE:
		_currentScript++;
		break;
	case TITLE_SCRIPT_RESTART:
		break;
	case TITLE_SCRIPT_LOAD:
		do {
			_currentScript++;
		} while (*(_currentScript - 1) != 0);
		break;
	}
}

static void title_do_next_script_opcode()
{
	int i;
	short x, y;
	uint8 script_opcode, script_operand;
	rct_window* w;
	gTitleScriptCommand++;
	script_opcode = *_currentScript++;
	if (gTitleScriptSkipTo != -1) {
		if (gTitleScriptSkipTo == gTitleScriptCommand) {
			gTitleScriptSkipTo = -1;
			gTitleScriptSkipLoad = -1;
		}
		else if (gTitleScriptSkipLoad == gTitleScriptCommand) {
			gTitleScriptSkipLoad = -1;
		}
		else if (gTitleScriptSkipLoad != -1) {
			gTitleScriptCommand--;
			_currentScript--;
			title_skip_opcode();
			return;
		}
	}

	_lastOpcode = script_opcode;

	switch (script_opcode) {
	case TITLE_SCRIPT_END:
		_scriptWaitCounter = 1;
		break;
	case TITLE_SCRIPT_WAIT:
		_scriptWaitCounter = (*_currentScript++) * 32;
		break;
	case TITLE_SCRIPT_LOADMM:
		if (!title_load_park(get_file_path(PATH_ID_SIXFLAGS_MAGICMOUNTAIN))) {
			log_fatal("OpenRCT2 can not currently cope when unable to load title screen scenario.");
			exit(-1);
		}
		gTitleScriptSave = 0xFF;
		break;
	case TITLE_SCRIPT_LOCATION:
		x = (*_currentScript++) * 32 + 16;
		y = (*_currentScript++) * 32 + 16;
		title_set_location(x, y);
		break;
	case TITLE_SCRIPT_ROTATE:
		script_operand = (*_currentScript++);
		w = window_get_main();
		if (w != NULL)
			for (i = 0; i < script_operand; i++)
				window_rotate_camera(w, 1);
		break;
	case TITLE_SCRIPT_ZOOM:
		script_operand = (*_currentScript++);
		w = window_get_main();
		if (w != NULL && w->viewport != NULL)
			window_zoom_set(w, script_operand);
		break;
	case TITLE_SCRIPT_SPEED:
		script_operand = (*_currentScript++);
		gGameSpeed = max(1, min(4, script_operand));
		break;
	case TITLE_SCRIPT_RESTART:
		_scriptNoLoadsSinceRestart = 1;
		gTitleScriptCommand = -1;
		gTitleScriptSave = 0xFF;
		_currentScript = _loadedScript;
		if (gRandomShowcase) {
			if (_currentScript != NULL)
				free((uint8*)_currentScript);
			_currentScript = generate_random_script();
		}
		break;
	case TITLE_SCRIPT_LOAD:
		{
			const uint8 *loadPtr;
			char *ch, filename[32], path[MAX_PATH];
			char separator = platform_get_path_separator();

			loadPtr = _currentScript - 1;

			// Get filename
			ch = filename;
			do {
				*ch++ = *_currentScript++;
			} while (*(_currentScript - 1) != 0);

			// Construct full relative path
			if (gConfigTitleSequences.presets[_scriptCurrentPreset].path[0]) {
				safe_strcpy(path, gConfigTitleSequences.presets[_scriptCurrentPreset].path, MAX_PATH);
			}
			else {
				platform_get_user_directory(path, "title sequences");
				strcat(path, gConfigTitleSequences.presets[_scriptCurrentPreset].name);
				strncat(path, &separator, 1);
			}

			strcat(path, filename);
			if (title_load_park(path)) {
				_scriptNoLoadsSinceRestart = 0;
				gTitleScriptSave = gConfigTitleSequences.presets[gCurrentPreviewTitleSequence].commands[gTitleScriptCommand].saveIndex;
			} else {
				log_error("Failed to load: \"%s\" for the title sequence.", path);
				script_opcode = *_currentScript;
				while (script_opcode != TITLE_SCRIPT_LOADMM && script_opcode != TITLE_SCRIPT_LOAD && script_opcode != TITLE_SCRIPT_RESTART && script_opcode != TITLE_SCRIPT_END) {
					title_skip_opcode();
					script_opcode = *_currentScript;
				}

				if ((script_opcode == TITLE_SCRIPT_RESTART || script_opcode == TITLE_SCRIPT_END) && _scriptNoLoadsSinceRestart) {
					if (_currentScript != _magicMountainScript) {
						_scriptNoLoadsSinceRestart = 1;
						gTitleScriptCommand = -1;
						gTitleScriptSave = 0xFF;
						_currentScript = _magicMountainScript;
						gCurrentPreviewTitleSequence = 0;
						gTitleScriptSkipTo = -1;
						gTitleScriptSkipLoad = -1;
						_scriptCurrentPreset = 0;
						//window_invalidate_by_class(WC_TITLE_EDITOR);
					} else {
						log_fatal("OpenRCT2 can not currently cope when unable to load title screen scenario.");
						exit(-1);
					}
				}
			}
		}
		break;
	case TITLE_SCRIPT_LOADRCT1:
		script_operand = (*_currentScript++);

		source_desc sourceDesc;
		if (!scenario_get_source_desc_by_id(script_operand, &sourceDesc) || sourceDesc.index == -1) {
			log_fatal("Invalid scenario id.");
			exit(-1);
		}

		const utf8 *path = NULL;
		for (int i = 0; i < gScenarioListCount; i++) {
			if (gScenarioList[i].source_index == sourceDesc.index) {
				path = gScenarioList[i].path;
				break;
			}
		}

		if (path == NULL || !title_load_park(path)) {
			script_opcode = *_currentScript;
			while (script_opcode != TITLE_SCRIPT_LOADRCT1 && script_opcode != TITLE_SCRIPT_RESTART && script_opcode != TITLE_SCRIPT_END) {
				title_skip_opcode();
				script_opcode = *_currentScript;
			}
			if (script_opcode == TITLE_SCRIPT_RESTART) {
				title_sequence_change_preset(4);
				title_refresh_sequence();
				config_save_default();
				return;
			}
		}
		gTitleScriptSave = 0xFF;
		break;
	}
	window_invalidate_by_class(WC_TITLE_EDITOR);
}

/**
 *
 *  rct2: 0x00678761
 */
static void title_update_showcase()
{
	int i, numUpdates;
	// Loop used for scene skip functionality
	// Only loop here when the appropriate save hasn't been loaded yet since no game updates are required
	do {
		do {
			if (_scriptWaitCounter <= 0) {
				do {
					title_do_next_script_opcode();
				} while (_scriptWaitCounter == 0);
			}

			if (gTitleScriptSkipTo != -1 && gTitleScriptSkipLoad != -1)
				_scriptWaitCounter = 0;
			else if (_lastOpcode != TITLE_SCRIPT_END)
				_scriptWaitCounter--;
		} while (gTitleScriptSkipTo != -1 && gTitleScriptSkipLoad != -1);

		if (gTitleScriptSkipTo != -1 && gTitleScriptSkipLoad == -1) {
			if (gGameSpeed > 1) {
				numUpdates = 1 << (gGameSpeed - 1);
			} else {
				numUpdates = 1;
			}
			for (i = 0; i < numUpdates; i++) {
				game_logic_update();
			}
			update_palette_effects();
			update_rain_animation();
		}
	} while (gTitleScriptSkipTo != -1 && gTitleScriptSkipLoad == -1);
}

void DrawOpenRCT2(int x, int y)
{
	utf8 buffer[256];
	rct_drawpixelinfo *dpi = &gScreenDPI;

	// Draw background
	gfx_fill_rect_inset(dpi, x, y, x + 128, y + 20, TRANSLUCENT(COLOUR_DARK_GREEN), 0x8);

	// Write format codes
	utf8 *ch = buffer;
	ch = utf8_write_codepoint(ch, FORMAT_MEDIUMFONT);
	ch = utf8_write_codepoint(ch, FORMAT_OUTLINE);
	ch = utf8_write_codepoint(ch, FORMAT_WHITE);

	// Write name and version information
	openrct2_write_full_version_info(ch, sizeof(buffer) - (ch - buffer));

	// Draw Text
	gfx_draw_string(dpi, buffer, 0, x + 5, y + 5);
}


void game_handle_input();
void title_update()
{
	int i, numUpdates;
	screenshot_check();
	title_handle_keyboard_input();

	if (game_is_not_paused()) {
		title_update_showcase();

		if (gGameSpeed > 1) {
			numUpdates = 1 << (gGameSpeed - 1);
		} else {
			numUpdates = 1;
		}

		for (i = 0; i < numUpdates; i++) {
			game_logic_update();
		}
		audio_start_title_music();
	}

	gInputFlags &= ~INPUT_FLAG_VIEWPORT_SCROLLING;

	window_map_tooltip_update_visibility();
	window_dispatch_update_all();

	RCT2_GLOBAL(RCT2_ADDRESS_SAVED_AGE, uint16)++;

	// Input
	game_handle_input();
}

static uint8 *generate_random_script()
{
	int i, j;
	const int views = 16;

	util_srand((unsigned int)time(NULL));

	uint8 *script = malloc(views * 8 + 2);
	i = 0;
	script[i++] = TITLE_SCRIPT_LOAD;
	for (j = 0; j < views; j++) {
		script[i++] = TITLE_SCRIPT_LOCATION;
		script[i++] = 64 + (util_rand() % 128);
		script[i++] = 64 + (util_rand() % 128);

		int rotationCount = util_rand() % 4;
		if (rotationCount > 0) {
			script[i++] = TITLE_SCRIPT_ROTATE;
			script[i++] = rotationCount;
		}

		script[i++] = TITLE_SCRIPT_WAIT;
		script[i++] = 8 + (util_rand() % 6);
	}
	script[i] = TITLE_SCRIPT_RESTART;

	return script;
}

#pragma region Load script.txt

void title_script_get_line(SDL_RWops *file, char *parts)
{
	int i, c, part, cindex, whitespace, comment, load;

	for (i = 0; i < 3; i++)
		parts[i * 128] = 0;

	part = 0;
	cindex = 0;
	whitespace = 1;
	comment = 0;
	load = 0;
	for (; part < 3;) {
		c = 0;
		if (SDL_RWread(file, &c, 1, 1) != 1)
			c = EOF;

		if (c == '\n' || c == '\r' || c == EOF) {
			parts[part * 128 + cindex] = 0;
			return;
		} else if (c == '#') {
			parts[part * 128 + cindex] = 0;
			comment = 1;
		} else if (c == ' ' && !comment && !load) {
			if (!whitespace) {
				if (part == 0 && cindex == 4 && _strnicmp(parts, "LOAD", 4) == 0)
					load = true;
				parts[part * 128 + cindex] = 0;
				part++;
				cindex = 0;
			}
		} else if (!comment) {
			whitespace = 0;
			if (cindex < 127) {
				parts[part * 128 + cindex] = c;
				cindex++;
			}
			else {
				parts[part * 128 + cindex] = 0;
				part++;
				cindex = 0;
			}
		}
	}
}

static uint8 *title_script_load()
{
	SDL_RWops *file;
	char parts[3 * 128], *token, *part1, *part2, *src;

	utf8 path[MAX_PATH];
	utf8 dataPath[MAX_PATH];
	utf8 filePath[] = "title/script.txt";

	platform_get_openrct_data_path(dataPath);
	sprintf(path, "%s%c%s", dataPath, platform_get_path_separator(), filePath);
	log_verbose("loading title script, %s", path);
	file = SDL_RWFromFile(path, "r");
	if (file == NULL) {
		log_error("unable to load title script");
		return NULL;
	}
	sint64 fileSize = SDL_RWsize(file);

	uint8 *binaryScript = (uint8*)malloc(1024 * 8);
	if (binaryScript == NULL) {
		SDL_RWclose(file);

		log_error("unable to allocate memory for script");
		return NULL;
	}

	uint8 *scriptPtr = binaryScript;

	do {
		title_script_get_line(file, parts);

		token = &parts[0 * 128];
		part1 = &parts[1 * 128];
		part2 = &parts[2 * 128];

		if (token[0] != 0) {
			if (_stricmp(token, "LOAD") == 0) {
				src = part1;
				*scriptPtr++ = TITLE_SCRIPT_LOAD;
				do {
					*scriptPtr++ = *src++;
				} while (*(src - 1) != 0);
			} else if (_stricmp(token, "LOCATION") == 0) {
				*scriptPtr++ = TITLE_SCRIPT_LOCATION;
				*scriptPtr++ = atoi(part1) & 0xFF;
				*scriptPtr++ = atoi(part2) & 0xFF;
			} else if (_stricmp(token, "ROTATE") == 0) {
				*scriptPtr++ = TITLE_SCRIPT_ROTATE;
				*scriptPtr++ = atoi(part1) & 0xFF;
			} else if (_stricmp(token, "ZOOM") == 0) {
				*scriptPtr++ = TITLE_SCRIPT_ZOOM;
				*scriptPtr++ = atoi(part1) & 0xFF;
			} else if (_stricmp(token, "WAIT") == 0) {
				*scriptPtr++ = TITLE_SCRIPT_WAIT;
				*scriptPtr++ = atoi(part1) & 0xFF;
			} else {
				log_error("unknown token, %s", token);
				SafeFree(binaryScript);
				SDL_RWclose(file);
				return NULL;
			}
		}
	} while (SDL_RWtell(file) < fileSize);
	SDL_RWclose(file);

	*scriptPtr++ = TITLE_SCRIPT_RESTART;

	int scriptLength = (int)(scriptPtr - binaryScript);
	binaryScript = realloc(binaryScript, scriptLength);
	if (binaryScript == NULL) {
		log_error("unable to reallocate memory for script");
		return NULL;
	}

	return binaryScript;
}

#pragma endregion

bool title_refresh_sequence()
{
	_scriptCurrentPreset = gCurrentPreviewTitleSequence;
	title_sequence *title = &gConfigTitleSequences.presets[_scriptCurrentPreset];

	bool hasLoad = false, hasInvalidSave = false, hasWait = false, hasRestart = false;
	for (int i = 0; i < title->num_commands && !hasInvalidSave; i++) {
		if (title->commands[i].command == TITLE_SCRIPT_LOAD) {
			if (title->commands[i].saveIndex == 0xFF)
				hasInvalidSave = true;
			hasLoad = true;
		}
		else if (title->commands[i].command == TITLE_SCRIPT_LOADRCT1) {
			hasLoad = true;
		}
		else if (title->commands[i].command == TITLE_SCRIPT_LOADMM) {
			hasLoad = true;
		}
		else if (title->commands[i].command == TITLE_SCRIPT_WAIT && title->commands[i].seconds >= 4) {
			hasWait = true;
		}
		else if (title->commands[i].command == TITLE_SCRIPT_RESTART) {
			hasRestart = true;
			break;
		}
		else if (title->commands[i].command == TITLE_SCRIPT_END) {
			break;
		}
	}
	if (hasLoad && (hasWait || !hasRestart) && !hasInvalidSave) {
		char *src;
		uint8 *scriptPtr, *binaryScript;
		binaryScript = malloc(1024 * 8);
		scriptPtr = binaryScript;

		for (int i = 0; i < title->num_commands; i++) {
			*scriptPtr++ = title->commands[i].command;
			switch (title->commands[i].command) {
			case TITLE_SCRIPT_LOADRCT1:
				*scriptPtr++ = title->commands[i].saveIndex;
				break;
			case TITLE_SCRIPT_LOAD:
				src = title->saves[title->commands[i].saveIndex];
				do {
					*scriptPtr++ = *src++;
				} while (*(src - 1) != 0);
				break;
			case TITLE_SCRIPT_LOCATION:
				*scriptPtr++ = title->commands[i].x;
				*scriptPtr++ = title->commands[i].y;
				break;
			case TITLE_SCRIPT_ROTATE:
				*scriptPtr++ = title->commands[i].rotations;
				break;
			case TITLE_SCRIPT_ZOOM:
				*scriptPtr++ = title->commands[i].zoom;
				break;
			case TITLE_SCRIPT_SPEED:
				*scriptPtr++ = title->commands[i].speed;
				break;
			case TITLE_SCRIPT_WAIT:
				*scriptPtr++ = title->commands[i].seconds;
				break;
			}
		}

		*scriptPtr++ = TITLE_SCRIPT_END;

		int scriptLength = (int)(scriptPtr - binaryScript);
		binaryScript = realloc(binaryScript, scriptLength);

		_scriptNoLoadsSinceRestart = 1;
		if (_loadedScript != _magicMountainScript)
			SafeFree(_loadedScript);
		_loadedScript = binaryScript;
		_currentScript = binaryScript;
		_scriptWaitCounter = 0;
		gTitleScriptCommand = -1;
		gTitleScriptSave = 0xFF;

		if (gScreenFlags == SCREEN_FLAGS_TITLE_DEMO) {
			title_update_showcase();
			gfx_invalidate_screen();
		}

		return true;
	}
	log_error("Failed to load title sequence, hasLoad: %i, hasWait4seconds: %i, hasRestart: %i, hasInvalidSave: %i", hasLoad, hasWait, hasRestart, hasInvalidSave);
	window_error_open(5402, (!hasWait && hasRestart) ? 5439 : STR_NONE);
	_scriptNoLoadsSinceRestart = 1;
	if (_loadedScript != _magicMountainScript)
		SafeFree(_loadedScript);
	_scriptCurrentPreset = 0;
	_loadedScript = (uint8*)_magicMountainScript;
	_currentScript = _magicMountainScript;
	_scriptWaitCounter = 0;
	gTitleScriptCommand = -1;
	gTitleScriptSave = 0xFF;
	gCurrentPreviewTitleSequence = 0;
	window_invalidate_by_class(WC_OPTIONS);
	window_invalidate_by_class(WC_TITLE_EDITOR);

	if (gScreenFlags == SCREEN_FLAGS_TITLE_DEMO) {
		title_update_showcase();
		gfx_invalidate_screen();
	}

	return false;
}

void title_skip_from_beginning()
{
	_scriptNoLoadsSinceRestart = 1;
	gTitleScriptCommand = -1;
	gTitleScriptSave = 0xFF;
	_currentScript = _loadedScript;
}
