/**
* The Intro.
*/
void GameLoop_GameIntroAnimation(void)
{
GUI_ChangeSelectionType(SELECTIONTYPE_INTRO);
Gameloop_Logos();
if (Input_Keyboard_NextKey() == 0 || !g_canSkipIntro) {
const HouseAnimation_Animation *animation = g_table_houseAnimation_animation[HOUSEANIMATION_INTRO];
const HouseAnimation_Subtitle *subtitle = g_table_houseAnimation_subtitle[HOUSEANIMATION_INTRO];
const HouseAnimation_SoundEffect *soundEffect = g_table_houseAnimation_soundEffect[HOUSEANIMATION_INTRO];
Music_Play(0x1B);
/* 0x4A = 74 = Intro feedback base index */
GameLoop_PrepareAnimation(subtitle, 0x4A, soundEffect);
GameLoop_PlayAnimation(animation);
Driver_Music_FadeOut();
GameLoop_FinishAnimation();
}
GUI_ChangeSelectionType(SELECTIONTYPE_MENTAT);
}
/**
* Handles Click event for "Cancel" button.
*
* @return True, always.
*/
bool GUI_Widget_Cancel_Click(Widget *w)
{
VARIABLE_NOT_USED(w);
if (g_structureActiveType != 0xFFFF) {
Structure *s = Structure_Get_ByPackedTile(g_structureActivePosition);
Structure *s2 = g_structureActive;
assert(s2 != NULL);
if (s != NULL) {
s->o.linkedID = s2->o.index & 0xFF;
} else {
Structure_Free(s2);
}
g_structureActive = NULL;
g_structureActiveType = 0xFFFF;
GUI_ChangeSelectionType(SELECTIONTYPE_STRUCTURE);
g_selectionState = 0; /* Invalid. */
}
if (g_unitActive == NULL) return true;
g_unitActive = NULL;
g_activeAction = 0xFFFF;
g_cursorSpriteID = 0;
Sprites_SetMouseSprite(0, 0, g_sprites[0]);
GUI_ChangeSelectionType(SELECTIONTYPE_UNIT);
return true;
}
/**
* Handles Click event for a sprite/text button.
*
* @param w The widget.
* @return False, always.
*/
bool GUI_Widget_SpriteTextButton_Click(Widget *w)
{
Structure *s;
VARIABLE_NOT_USED(w);
s = Structure_Get_ByPackedTile(g_selectionPosition);
switch (g_productionStringID) {
default: break;
case STR_PLACE_IT:
if (s->o.type == STRUCTURE_CONSTRUCTION_YARD) {
Structure *ns;
ns = Structure_Get_ByIndex(s->o.linkedID);
g_structureActive = ns;
g_structureActiveType = s->objectType;
g_selectionState = Structure_IsValidBuildLocation(g_selectionRectanglePosition, g_structureActiveType);
g_structureActivePosition = g_selectionPosition;
s->o.linkedID = STRUCTURE_INVALID;
GUI_ChangeSelectionType(SELECTIONTYPE_PLACE);
}
break;
case STR_ON_HOLD:
s->o.flags.s.repairing = false;
s->o.flags.s.onHold = false;
s->o.flags.s.upgrading = false;
break;
case STR_BUILD_IT:
Structure_BuildObject(s, s->objectType);
break;
case STR_LAUNCH:
case STR_FREMEN:
case STR_SABOTEUR:
Structure_ActivateSpecial(s);
break;
case STR_D_DONE:
s->o.flags.s.onHold = true;
break;
}
return false;
}
/**
* Checks if the level comes to an end. If so, it shows all end-level stuff,
* and prepares for the next level.
*/
static void GameLoop_LevelEnd()
{
static uint32 levelEndTimer = 0;
if (levelEndTimer >= g_timerGame && !s_debugForceWin)
return;
if (GameLoop_IsLevelFinished())
{
Audio_PlayMusic(MUSIC_STOP);
Audio_PlayVoice(VOICE_STOP);
Video_SetCursor(SHAPE_CURSOR_NORMAL);
if (GameLoop_IsLevelWon())
{
Audio_PlayVoice(VOICE_YOUR_MISSION_IS_COMPLETE);
GUI_DisplayModalMessage(String_Get_ByIndex(STR_MISSION_WON), 0xFFFF);
g_gameMode = GM_WIN;
}
else
{
Audio_PlayVoice(VOICE_YOU_HAVE_FAILED_YOUR_MISSION);
GUI_DisplayModalMessage(String_Get_ByIndex(STR_MISSION_FAILED), 0xFFFF);
g_gameMode = GM_LOSE;
}
GUI_ChangeSelectionType(SELECTIONTYPE_MENTAT);
g_playerHouse->flags.doneFullScaleAttack = false;
s_debugForceWin = false;
return;
}
levelEndTimer = g_timerGame + 300;
}
static bool Skirmish_GenerateMapInner(bool generate_houses, SkirmishData* sd)
{
const MapInfo* mi = &g_mapInfos[0];
if (generate_houses)
Skirmish_Prepare();
Game_Init();
Skirmish_GenGeneral();
Sprites_UnloadTiles();
Sprites_LoadTiles();
Tools_RandomLCG_Seed(g_skirmish.seed);
Map_CreateLandscape(g_skirmish.seed);
if (!generate_houses)
return true;
/* Create initial island. */
sd->island[0].start = 0;
sd->island[0].end = 0;
for (int dy = 0; dy < mi->sizeY; dy++)
{
for (int dx = 0; dx < mi->sizeX; dx++)
{
const int tx = mi->minX + dx;
const int ty = mi->minY + dy;
const uint16 packed = Tile_PackXY(tx, ty);
sd->buildable[sd->island[0].end].x = tx;
sd->buildable[sd->island[0].end].y = ty;
sd->buildable[sd->island[0].end].packed = packed;
sd->buildable[sd->island[0].end].parent = 0;
sd->island[0].end++;
}
}
memset(sd->islandID, 0, MAP_SIZE_MAX * MAP_SIZE_MAX * sizeof(sd->islandID[0]));
Skirmish_DivideIsland(HOUSE_INVALID, 0, sd);
if (sd->nislands_unused == 0)
return false;
/* Spawn players. */
for (HouseType houseID = HOUSE_HARKONNEN; houseID < HOUSE_MAX; houseID++)
{
if (g_skirmish.brain[houseID] == BRAIN_NONE)
continue;
if (g_skirmish.brain[houseID] == BRAIN_HUMAN)
Scenario_Create_House(houseID, g_skirmish.brain[houseID], 2000, 0, 250);
else
{
House* h = Scenario_Create_House(houseID, g_skirmish.brain[houseID], 1000, 0, 250);
h->flags.isAIActive = true;
if (!Skirmish_GenStructuresAI(houseID, sd))
return false;
}
}
for (HouseType houseID = HOUSE_HARKONNEN; houseID < HOUSE_MAX; houseID++)
{
if (g_skirmish.brain[houseID] == BRAIN_NONE)
continue;
if (g_skirmish.brain[houseID] == BRAIN_HUMAN)
{
if (!Skirmish_GenUnitsHuman(houseID, sd))
return false;
}
else
{
Skirmish_GenUnitsAI(houseID);
}
}
Skirmish_GenSpiceBlooms();
Skirmish_GenSandworms();
Skirmish_GenCHOAM();
Game_Prepare();
GUI_ChangeSelectionType(SELECTIONTYPE_STRUCTURE);
Scenario_CentreViewport(g_playerHouseID);
g_tickScenarioStart = g_timerGame;
return true;
}
/**
* Main game loop.
*/
static void GameLoop_Main(void)
{
static uint32 l_timerNext = 0;
static uint32 l_timerUnitStatus = 0;
static int16 l_selectionState = -2;
uint16 key;
String_Init();
Sprites_Init();
Input_Flags_SetBits(INPUT_FLAG_KEY_REPEAT | INPUT_FLAG_UNKNOWN_0010 | INPUT_FLAG_UNKNOWN_0200 |
INPUT_FLAG_UNKNOWN_2000);
Input_Flags_ClearBits(INPUT_FLAG_KEY_RELEASE | INPUT_FLAG_UNKNOWN_0400 | INPUT_FLAG_UNKNOWN_0100 |
INPUT_FLAG_UNKNOWN_0080 | INPUT_FLAG_UNKNOWN_0040 | INPUT_FLAG_UNKNOWN_0020 |
INPUT_FLAG_UNKNOWN_0008 | INPUT_FLAG_UNKNOWN_0004 | INPUT_FLAG_NO_TRANSLATE);
Timer_SetTimer(TIMER_GAME, true);
Timer_SetTimer(TIMER_GUI, true);
g_campaignID = 0;
g_scenarioID = 1;
g_playerHouseID = HOUSE_INVALID;
g_debugScenario = false;
g_selectionType = SELECTIONTYPE_MENTAT;
g_selectionTypeNew = SELECTIONTYPE_MENTAT;
g_palette1 = calloc(1, 256 * 3);
g_palette2 = calloc(1, 256 * 3);
g_readBufferSize = 12000;
g_readBuffer = calloc(1, g_readBufferSize);
ReadProfileIni("PROFILE.INI");
free(g_readBuffer); g_readBuffer = NULL;
File_ReadBlockFile("IBM.PAL", g_palette_998A, 256 * 3);
memmove(g_palette1, g_palette_998A, 256 * 3);
GUI_ClearScreen(SCREEN_0);
Video_SetPalette(g_palette1, 0, 256);
GFX_SetPalette(g_palette1);
GFX_SetPalette(g_palette2);
g_paletteMapping1 = malloc(256);
g_paletteMapping2 = malloc(256);
GUI_Palette_CreateMapping(g_palette1, g_paletteMapping1, 0xC, 0x55);
g_paletteMapping1[0xFF] = 0xFF;
g_paletteMapping1[0xDF] = 0xDF;
g_paletteMapping1[0xEF] = 0xEF;
GUI_Palette_CreateMapping(g_palette1, g_paletteMapping2, 0xF, 0x55);
g_paletteMapping2[0xFF] = 0xFF;
g_paletteMapping2[0xDF] = 0xDF;
g_paletteMapping2[0xEF] = 0xEF;
Script_LoadFromFile("TEAM.EMC", g_scriptTeam, g_scriptFunctionsTeam, NULL);
Script_LoadFromFile("BUILD.EMC", g_scriptStructure, g_scriptFunctionsStructure, NULL);
GUI_Palette_CreateRemap(HOUSE_MERCENARY);
g_cursorSpriteID = 0;
Sprites_SetMouseSprite(0, 0, g_sprites[0]);
while (g_mouseHiddenDepth > 1) {
GUI_Mouse_Show_Safe();
}
Window_WidgetClick_Create();
GameOptions_Load();
Unit_Init();
Team_Init();
House_Init();
Structure_Init();
GUI_Mouse_Show_Safe();
if (g_debugSkipDialogs) {
Music_Play(0);
free(g_readBuffer);
g_readBufferSize = (g_enableVoices == 0) ? 12000 : 20000;
g_readBuffer = calloc(1, g_readBufferSize);
g_gameMode = GM_NORMAL;
}
for (;; sleepIdle()) {
if (g_gameMode == GM_MENU) {
GameLoop_GameIntroAnimationMenu();
if (!g_running) break;
if (g_gameMode == GM_MENU) continue;
GUI_Mouse_Hide_Safe();
g_canSkipIntro = false;
GUI_DrawFilledRectangle(g_curWidgetXBase << 3, g_curWidgetYBase, (g_curWidgetXBase + g_curWidgetWidth) << 3, g_curWidgetYBase + g_curWidgetHeight, 12);
Input_History_Clear();
if (s_enableLog != 0) Mouse_SetMouseMode((uint8)s_enableLog, "DUNE.LOG");
GFX_SetPalette(g_palette1);
GUI_Mouse_Show_Safe();
}
if (g_gameMode == GM_PICKHOUSE) {
Music_Play(28);
g_playerHouseID = HOUSE_MERCENARY;
g_playerHouseID = GUI_PickHouse();
GUI_Mouse_Hide_Safe();
GFX_ClearBlock(SCREEN_0);
Sprites_LoadTiles();
GUI_Palette_CreateRemap(g_playerHouseID);
Voice_LoadVoices(g_playerHouseID);
GUI_Mouse_Show_Safe();
g_gameMode = GM_RESTART;
g_scenarioID = 1;
g_campaignID = 0;
g_strategicRegionBits = 0;
}
if (g_selectionTypeNew != g_selectionType) {
GUI_ChangeSelectionType(g_selectionTypeNew);
}
GUI_PaletteAnimate();
if (g_gameMode == GM_RESTART) {
GUI_ChangeSelectionType(SELECTIONTYPE_MENTAT);
Game_LoadScenario(g_playerHouseID, g_scenarioID);
if (!g_debugScenario && !g_debugSkipDialogs) GUI_Mentat_ShowBriefing();
g_gameMode = GM_NORMAL;
GUI_ChangeSelectionType(g_debugScenario ? SELECTIONTYPE_DEBUG : SELECTIONTYPE_STRUCTURE);
Music_Play(Tools_RandomLCG_Range(0, 8) + 8);
l_timerNext = g_timerGUI + 300;
}
if (l_selectionState != g_selectionState) {
Map_SetSelectionObjectPosition(0xFFFF);
Map_SetSelectionObjectPosition(g_selectionRectanglePosition);
l_selectionState = g_selectionState;
}
if (!Driver_Voice_IsPlaying() && !Sound_StartSpeech()) {
if (g_gameConfig.music == 0) {
Music_Play(2);
g_musicInBattle = 0;
} else if (g_musicInBattle > 0) {
Music_Play(Tools_RandomLCG_Range(0, 5) + 17);
l_timerNext = g_timerGUI + 300;
g_musicInBattle = -1;
} else {
g_musicInBattle = 0;
if (g_enableSoundMusic != 0 && g_timerGUI > l_timerNext) {
if (!Driver_Music_IsPlaying()) {
Music_Play(Tools_RandomLCG_Range(0, 8) + 8);
l_timerNext = g_timerGUI + 300;
}
}
}
}
GFX_Screen_SetActive(SCREEN_0);
key = GUI_Widget_HandleEvents(g_widgetLinkedListHead);
if (g_selectionType == SELECTIONTYPE_TARGET || g_selectionType == SELECTIONTYPE_PLACE || g_selectionType == SELECTIONTYPE_UNIT || g_selectionType == SELECTIONTYPE_STRUCTURE) {
if (g_unitSelected != NULL) {
if (l_timerUnitStatus < g_timerGame) {
Unit_DisplayStatusText(g_unitSelected);
l_timerUnitStatus = g_timerGame + 300;
}
if (g_selectionType != SELECTIONTYPE_TARGET) {
g_selectionPosition = Tile_PackTile(Tile_Center(g_unitSelected->o.position));
}
}
GUI_Widget_ActionPanel_Draw(false);
InGame_Numpad_Move(key);
GUI_DrawCredits(g_playerHouseID, 0);
GameLoop_Team();
GameLoop_Unit();
GameLoop_Structure();
GameLoop_House();
GUI_DrawScreen(SCREEN_0);
}
GUI_DisplayText(NULL, 0);
if (g_running && !g_debugScenario) {
GameLoop_LevelEnd();
}
if (!g_running) break;
}
GUI_Mouse_Hide_Safe();
if (s_enableLog != 0) Mouse_SetMouseMode(INPUT_MOUSE_MODE_NORMAL, "DUNE.LOG");
GUI_Mouse_Hide_Safe();
Widget_SetCurrentWidget(0);
GFX_Screen_SetActive(SCREEN_1);
GFX_ClearScreen();
GUI_Screen_FadeIn(g_curWidgetXBase, g_curWidgetYBase, g_curWidgetXBase, g_curWidgetYBase, g_curWidgetWidth, g_curWidgetHeight, SCREEN_1, SCREEN_0);
}
/**
* Checks if the level comes to an end. If so, it shows all end-level stuff,
* and prepares for the next level.
*/
static void GameLoop_LevelEnd(void)
{
static uint32 levelEndTimer = 0;
if (levelEndTimer >= g_timerGame && !s_debugForceWin) return;
if (GameLoop_IsLevelFinished()) {
Music_Play(0);
g_cursorSpriteID = 0;
Sprites_SetMouseSprite(0, 0, g_sprites[0]);
Sound_Output_Feedback(0xFFFE);
GUI_ChangeSelectionType(SELECTIONTYPE_MENTAT);
if (GameLoop_IsLevelWon()) {
Sound_Output_Feedback(40);
GUI_DisplayModalMessage(String_Get_ByIndex(STR_YOU_HAVE_SUCCESSFULLY_COMPLETED_YOUR_MISSION), 0xFFFF);
GUI_Mentat_ShowWin();
Sprites_UnloadTiles();
g_campaignID++;
GUI_EndStats_Show(g_scenario.killedAllied, g_scenario.killedEnemy, g_scenario.destroyedAllied, g_scenario.destroyedEnemy, g_scenario.harvestedAllied, g_scenario.harvestedEnemy, g_scenario.score, g_playerHouseID);
if (g_campaignID == 9) {
GUI_Mouse_Hide_Safe();
GUI_SetPaletteAnimated(g_palette2, 15);
GUI_ClearScreen(SCREEN_0);
GameLoop_GameEndAnimation();
PrepareEnd();
exit(0);
}
GUI_Mouse_Hide_Safe();
GameLoop_LevelEndAnimation();
GUI_Mouse_Show_Safe();
File_ReadBlockFile("IBM.PAL", g_palette1, 256 * 3);
g_scenarioID = GUI_StrategicMap_Show(g_campaignID, true);
GUI_SetPaletteAnimated(g_palette2, 15);
if (g_campaignID == 1 || g_campaignID == 7) {
if (!GUI_Security_Show()) {
PrepareEnd();
exit(0);
}
}
} else {
Sound_Output_Feedback(41);
GUI_DisplayModalMessage(String_Get_ByIndex(STR_YOU_HAVE_FAILED_YOUR_MISSION), 0xFFFF);
GUI_Mentat_ShowLose();
Sprites_UnloadTiles();
g_scenarioID = GUI_StrategicMap_Show(g_campaignID, false);
}
g_playerHouse->flags.doneFullScaleAttack = false;
Sprites_LoadTiles();
g_gameMode = GM_RESTART;
s_debugForceWin = false;
}
levelEndTimer = g_timerGame + 300;
}
/**
* Handles Click event for unit commands button.
*
* @param w The widget.
* @return True, always.
*/
bool GUI_Widget_TextButton_Click(Widget *w)
{
const UnitInfo *ui;
const ActionInfo *ai;
const uint16 *actions;
ActionType action;
Unit *u;
uint16 *found;
ActionType unitAction;
u = g_unitSelected;
ui = &g_table_unitInfo[u->o.type];
actions = ui->o.actionsPlayer;
if (Unit_GetHouseID(u) != g_playerHouseID && u->o.type != UNIT_HARVESTER) {
actions = g_table_actionsAI;
}
action = actions[w->index - 8];
unitAction = u->nextActionID;
if (unitAction == ACTION_INVALID) {
unitAction = u->actionID;
}
if (u->deviated != 0) {
Unit_Deviation_Decrease(u, 5);
if (u->deviated == 0) {
GUI_Widget_MakeNormal(w, false);
return true;
}
}
GUI_Widget_MakeSelected(w, false);
ai = &g_table_actionInfo[action];
if (ai->selectionType != g_selectionType) {
g_unitActive = g_unitSelected;
g_activeAction = action;
GUI_ChangeSelectionType(ai->selectionType);
return true;
}
Object_Script_Variable4_Clear(&u->o);
u->targetAttack = 0;
u->targetMove = 0;
u->route[0] = 0xFF;
Unit_SetAction(u, action);
if (ui->movementType == MOVEMENT_FOOT) Sound_StartSound(ai->soundID);
if (unitAction == action) return true;
found = memchr(actions, unitAction, 4);
if (found == NULL) return true;
GUI_Widget_MakeNormal(GUI_Widget_Get_ByIndex(g_widgetLinkedListHead, found - actions + 8), false);
return true;
}
/**
* Handles the Click events for the Viewport widget.
*
* @param w The widget.
*/
bool GUI_Widget_Viewport_Click(Widget *w)
{
uint16 direction;
uint16 x, y;
uint16 spriteID;
uint16 packed;
bool click, drag;
spriteID = g_cursorSpriteID;
switch (w->index) {
default: break;
case 39: spriteID = 1; break;
case 40: spriteID = 2; break;
case 41: spriteID = 4; break;
case 42: spriteID = 3; break;
case 43: spriteID = g_cursorDefaultSpriteID; break;
case 44: spriteID = g_cursorDefaultSpriteID; break;
case 45: spriteID = 0; break;
}
if (spriteID != g_cursorSpriteID) {
/* HotSpots for different cursor types. */
static const XYPosition cursorHotSpots[6] = {{0, 0}, {5, 0}, {8, 5}, {5, 8}, {0, 5}, {8, 8}};
s_tickCursor = g_timerGame;
Sprites_SetMouseSprite(cursorHotSpots[spriteID].x, cursorHotSpots[spriteID].y, g_sprites[spriteID]);
g_cursorSpriteID = spriteID;
}
if (w->index == 45) return true;
click = false;
drag = false;
if ((w->state.buttonState & 0x11) != 0) {
click = true;
g_var_37B8 = false;
} else if ((w->state.buttonState & 0x22) != 0 && !g_var_37B8) {
drag = true;
}
/* ENHANCEMENT -- Dune2 depends on slow CPUs to limit the rate mouse clicks are handled. */
if (g_dune2_enhanced && (click || drag)) {
if (s_tickClick + 2 >= g_timerGame) return true;
s_tickClick = g_timerGame;
}
direction = 0xFFFF;
switch (w->index) {
default: break;
case 39: direction = 0; break;
case 40: direction = 2; break;
case 41: direction = 6; break;
case 42: direction = 4; break;
}
if (direction != 0xFFFF) {
/* Always scroll if we have a click or a drag */
if (!click && !drag) {
/* Wait for either one of the timers */
if (s_tickMapScroll + 10 >= g_timerGame || s_tickCursor + 20 >= g_timerGame) return true;
/* Don't scroll if we have a structure/unit selected and don't want to autoscroll */
if (g_gameConfig.autoScroll == 0 && (g_selectionType == SELECTIONTYPE_STRUCTURE || g_selectionType == SELECTIONTYPE_UNIT)) return true;
}
s_tickMapScroll = g_timerGame;
Map_MoveDirection(direction);
return true;
}
if (click) {
x = g_mouseClickX;
y = g_mouseClickY;
} else {
x = g_mouseX;
y = g_mouseY;
}
if (w->index == 43) {
x = x / 16 + Tile_GetPackedX(g_minimapPosition);
y = (y - 40) / 16 + Tile_GetPackedY(g_minimapPosition);
} else if (w->index == 44) {
uint16 mapScale;
const MapInfo *mapInfo;
mapScale = g_scenario.mapScale;
mapInfo = &g_mapInfos[mapScale];
x = min((max(x, 256) - 256) / (mapScale + 1), mapInfo->sizeX - 1) + mapInfo->minX;
y = min((max(y, 136) - 136) / (mapScale + 1), mapInfo->sizeY - 1) + mapInfo->minY;
}
packed = Tile_PackXY(x, y);
if (click && g_selectionType == SELECTIONTYPE_TARGET) {
Unit *u;
ActionType action;
uint16 encoded;
GUI_DisplayText(NULL, -1);
if (g_unitHouseMissile != NULL) {
Unit_LaunchHouseMissile(packed);
return true;
}
u = g_unitActive;
action = g_activeAction;
Object_Script_Variable4_Clear(&u->o);
u->targetAttack = 0;
u->targetMove = 0;
u->route[0] = 0xFF;
if (action != ACTION_MOVE && action != ACTION_HARVEST) {
encoded = Tools_Index_Encode(Unit_FindTargetAround(packed), IT_TILE);
} else {
encoded = Tools_Index_Encode(packed, IT_TILE);
}
Unit_SetAction(u, action);
if (action == ACTION_MOVE) {
Unit_SetDestination(u, encoded);
} else if (action == ACTION_HARVEST) {
u->targetMove = encoded;
} else {
Unit *target;
Unit_SetTarget(u, encoded);
target = Tools_Index_GetUnit(u->targetAttack);
if (target != NULL) target->blinkCounter = 8;
}
if (g_enableVoices == 0) {
Driver_Sound_Play(36, 0xFF);
} else if (g_table_unitInfo[u->o.type].movementType == MOVEMENT_FOOT) {
Sound_StartSound(g_table_actionInfo[action].soundID);
} else {
Sound_StartSound(((Tools_Random_256() & 0x1) == 0) ? 20 : 17);
}
g_unitActive = NULL;
g_activeAction = 0xFFFF;
GUI_ChangeSelectionType(SELECTIONTYPE_UNIT);
return true;
}
if (click && g_selectionType == SELECTIONTYPE_PLACE) {
const StructureInfo *si;
Structure *s;
House *h;
s = g_structureActive;
si = &g_table_structureInfo[g_structureActiveType];
h = g_playerHouse;
if (Structure_Place(s, g_selectionPosition)) {
Voice_Play(20);
if (s->o.type == STRUCTURE_PALACE) House_Get_ByIndex(s->o.houseID)->palacePosition = s->o.position;
if (g_structureActiveType == STRUCTURE_REFINERY && g_validateStrictIfZero == 0) {
Unit *u;
g_validateStrictIfZero++;
u = Unit_CreateWrapper(g_playerHouseID, UNIT_HARVESTER, Tools_Index_Encode(s->o.index, IT_STRUCTURE));
g_validateStrictIfZero--;
if (u == NULL) {
h->harvestersIncoming++;
} else {
u->originEncoded = Tools_Index_Encode(s->o.index, IT_STRUCTURE);
}
}
GUI_ChangeSelectionType(SELECTIONTYPE_STRUCTURE);
s = Structure_Get_ByPackedTile(g_structureActivePosition);
if (s != NULL) {
if ((Structure_GetBuildable(s) & (1 << s->objectType)) == 0) Structure_BuildObject(s, 0xFFFE);
}
g_structureActiveType = 0xFFFF;
g_structureActive = NULL;
g_selectionState = 0; /* Invalid. */
GUI_DisplayHint(si->o.hintStringID, si->o.spriteID);
House_UpdateRadarState(h);
if (h->powerProduction < h->powerUsage) {
if ((h->structuresBuilt & (1 << STRUCTURE_OUTPOST)) != 0) {
GUI_DisplayText(String_Get_ByIndex(STR_NOT_ENOUGH_POWER_FOR_RADAR_BUILD_WINDTRAPS), 3);
}
}
return true;
}
Voice_Play(47);
if (g_structureActiveType == STRUCTURE_SLAB_1x1 || g_structureActiveType == STRUCTURE_SLAB_2x2) {
GUI_DisplayText(String_Get_ByIndex(STR_CAN_NOT_PLACE_FOUNDATION_HERE), 2);
} else {
GUI_DisplayHint(STR_STRUCTURES_MUST_BE_PLACED_ON_CLEAR_ROCK_OR_CONCRETE_AND_ADJACENT_TO_ANOTHER_FRIENDLY_STRUCTURE, 0xFFFF);
GUI_DisplayText(String_Get_ByIndex(STR_CAN_NOT_PLACE_S_HERE), 2, String_Get_ByIndex(si->o.stringID_abbrev));
}
return true;
}
if (click && w->index == 43) {
uint16 position;
if (g_debugScenario) {
position = packed;
} else {
position = Unit_FindTargetAround(packed);
}
if (g_map[position].overlaySpriteID != g_veiledSpriteID || g_debugScenario) {
if (Object_GetByPackedTile(position) != NULL || g_debugScenario) {
Map_SetSelection(position);
Unit_DisplayStatusText(g_unitSelected);
}
}
if ((w->state.buttonState & 0x10) != 0) Map_SetViewportPosition(packed);
return true;
}
if ((click || drag) && w->index == 44) {
Map_SetViewportPosition(packed);
return true;
}
if (g_selectionType == SELECTIONTYPE_TARGET) {
Map_SetSelection(Unit_FindTargetAround(packed));
} else if (g_selectionType == SELECTIONTYPE_PLACE) {
Map_SetSelection(packed);
}
return true;
}
/**
* Main game loop.
*/
void GameLoop_Main(bool new_game, const char* scenario)
{
static int64_t l_timerNext = 0;
static int64_t l_timerUnitStatus = 0;
static int16 l_selectionState = -2;
int frames_skipped = 0;
Mouse_TransformFromDiv(SCREENDIV_MENU, &g_mouseX, &g_mouseY);
Sprites_UnloadTiles();
Sprites_LoadTiles();
Viewport_Init();
if (new_game)
{
if (scenario)
{
if (!Game_LoadScenario(scenario))
goto end;
}
else
Game_LoadScenario(g_playerHouseID, g_scenarioID);
GUI_ChangeSelectionType(g_debugScenario ? SELECTIONTYPE_DEBUG : SELECTIONTYPE_STRUCTURE);
}
GUI_Palette_CreateRemap(g_table_houseInfo[g_playerHouseID].spriteColor);
Audio_LoadSampleSet(g_table_houseInfo[g_playerHouseID].sampleSet);
Timer_ResetScriptTimers();
Timer_SetTimer(TIMER_GAME, true);
/* Note: original game chose only MUSIC_IDLE1 .. MUSIC_IDLE6. */
Audio_PlayMusic(MUSIC_RANDOM_IDLE);
l_timerNext = Timer_GetTicks() + 300;
g_musicInBattle = 0;
g_gameMode = GM_NORMAL;
g_gameOverlay = GAMEOVERLAY_NONE;
Timer_RegisterSource();
while (g_gameMode == GM_NORMAL)
{
Timer_WaitForEvent();
const int64_t curr_ticks = Timer_GameTicks();
if (g_gameOverlay == GAMEOVERLAY_NONE)
{
Input_Tick(false);
uint16 key = GUI_Widget_HandleEvents(g_widgetLinkedListHead);
GameLoop_ProcessUnhandledInput(key);
if (g_mousePanning)
Video_WarpCursor(TRUE_DISPLAY_WIDTH / 2, TRUE_DISPLAY_HEIGHT / 2);
}
else if (g_gameOverlay == GAMEOVERLAY_MENTAT)
{
Input_Tick(true);
MenuBar_TickMentatOverlay();
}
else
{
Input_Tick(true);
MenuBar_TickOptionsOverlay();
}
if (g_gameOverlay == GAMEOVERLAY_NONE && g_timerGame != curr_ticks)
g_timerGame = curr_ticks;
else if (g_gameOverlay == GAMEOVERLAY_NONE)
continue;
if (g_selectionTypeNew != g_selectionType)
GUI_ChangeSelectionType(g_selectionTypeNew);
GUI_PaletteAnimate();
if (l_selectionState != g_selectionState)
{
Map_SetSelectionObjectPosition(0xFFFF);
Map_SetSelectionObjectPosition(g_selectionRectanglePosition);
l_selectionState = g_selectionState;
}
const bool narrator_speaking = Audio_Poll();
if (!narrator_speaking)
{
if (!g_enable_audio || !g_enable_music)
{
g_musicInBattle = 0;
}
else if (g_musicInBattle > 0)
{
Audio_PlayMusic(MUSIC_RANDOM_ATTACK);
l_timerNext = Timer_GetTicks() + 300;
g_musicInBattle = -1;
}
else
{
if (Timer_GetTicks() > l_timerNext)
{
if (!Audio_MusicIsPlaying())
{
if (g_gameOverlay == GAMEOVERLAY_MENTAT)
Audio_PlayMusic((MusicID)g_table_houseInfo[g_playerHouseID].musicBriefing);
else
Audio_PlayMusic(MUSIC_RANDOM_IDLE);
l_timerNext = Timer_GetTicks() + 300;
g_musicInBattle = 0;
}
}
}
}
GFX_Screen_SetActive(SCREEN_0);
if ((g_gameOverlay == GAMEOVERLAY_NONE) && (g_selectionType == SELECTIONTYPE_TARGET || g_selectionType == SELECTIONTYPE_PLACE || g_selectionType == SELECTIONTYPE_UNIT || g_selectionType == SELECTIONTYPE_STRUCTURE))
{
if (Unit_AnySelected())
{
if (l_timerUnitStatus < g_timerGame)
{
Unit_DisplayGroupStatusText();
l_timerUnitStatus = g_timerGame + 300;
}
if (g_selectionType != SELECTIONTYPE_TARGET)
{
const Unit* u = Unit_FirstSelected(NULL);
g_selectionPosition = Tile_PackTile(Tile_Center(u->o.position));
}
}
UnitAI_SquadLoop();
GameLoop_Team();
GameLoop_Unit();
GameLoop_Structure();
GameLoop_House();
}
if (g_running && !g_debugScenario)
GameLoop_LevelEnd();
if (!g_running)
break;
if (frames_skipped > 4 || Timer_QueueIsEmpty())
{
frames_skipped = 0;
if (g_gameOverlay == GAMEOVERLAY_NONE)
GUI_DrawInterfaceAndRadar();
else if (g_gameOverlay == GAMEOVERLAY_MENTAT)
MenuBar_DrawMentatOverlay();
else
{
GUI_DrawInterfaceAndRadar();
MenuBar_DrawOptionsOverlay();
}
Video_Tick();
A5_UseTransform(SCREENDIV_MAIN);
}
else
frames_skipped++;
}
end:
Timer_UnregisterSource();
Audio_PlayVoice(VOICE_STOP);
Widget_SetCurrentWidget(0);
g_selectionPosition = 0xFFFF;
Unit_UnselectAll();
if (g_gameOverlay == GAMEOVERLAY_NONE)
Mouse_TransformToDiv(SCREENDIV_MENU, &g_mouseX, &g_mouseY);
}
