/**
* Set the ground sprite of the tile.
* @param animation The Animation for which we change the ground sprite.
* @param parameter The offset in the iconGroup to which the ground sprite is set.
*/
static void Animation_Func_SetGroundSprite(Animation *animation, int16 parameter)
{
uint16 specialMap[1];
uint16 *iconMap;
const uint16 *layout = g_table_structure_layoutTiles[animation->tileLayout];
uint16 packed = Tile_PackTile(animation->tile);
uint16 layoutTileCount;
int i;
layoutTileCount = g_table_structure_layoutTileCount[animation->tileLayout];
iconMap = &g_iconMap[g_iconMap[animation->iconGroup] + layoutTileCount * parameter];
/* Some special case for turrets */
if (parameter > 1 && (animation->iconGroup == 23 || animation->iconGroup == 24)) {
Structure *s = Structure_Get_ByPackedTile(packed);
assert(s != NULL);
assert(layoutTileCount == 1);
specialMap[0] = s->rotationSpriteDiff + g_iconMap[g_iconMap[animation->iconGroup]] + 2;
iconMap = &specialMap[0];
}
for (i = 0; i < layoutTileCount; i++) {
uint16 position = packed + (*layout++);
uint16 spriteID = *iconMap++;
Tile *t = &g_map[position];
if (t->groundSpriteID == spriteID) continue;
t->groundSpriteID = spriteID;
t->houseID = animation->houseID;
if (Map_IsPositionUnveiled(position)) {
t->overlaySpriteID = 0;
}
Map_Update(position, 0, false);
Map_MarkTileDirty(position);
}
}
static void Skirmish_FindClosestStructures(HouseType houseID, uint16 packed, uint16* dist_ally, uint16* dist_enemy)
{
PoolFindStruct find;
Structure* s;
find.houseID = HOUSE_INVALID;
find.type = 0xFFFF;
find.index = STRUCTURE_INDEX_INVALID;
*dist_ally = 0xFFFF;
*dist_enemy = 0xFFFF;
while ((s = Structure_Find(&find)) != NULL)
{
if (s->o.type == STRUCTURE_SLAB_1x1 || s->o.type == STRUCTURE_SLAB_2x2 || s->o.type == STRUCTURE_WALL)
continue;
const uint16 dist = Tile_GetDistancePacked(Tile_PackTile(s->o.position), packed);
if (House_AreAllied(houseID, s->o.houseID))
*dist_ally = min(dist, *dist_ally);
else
*dist_enemy = min(dist, *dist_enemy);
}
}
/**
* Make the structure explode.
*
* Stack: *none*
*
* @param script The script engine to operate on.
* @return unknown.
*/
uint16 Script_Structure_Explode(ScriptEngine *script)
{
Structure *s;
uint16 position;
uint16 layout;
uint16 i;
VARIABLE_NOT_USED(script);
s = g_scriptCurrentStructure;
layout = g_table_structureInfo[s->o.type].layout;
position = Tile_PackTile(s->o.position);
for (i = 0; i < g_table_structure_layoutTileCount[layout]; i++) {
tile32 tile;
tile = Tile_UnpackTile(position + g_table_structure_layoutTiles[layout][i]);
Map_MakeExplosion(EXPLOSION_STRUCTURE, tile, 0, 0);
}
return 0;
}
static void Scenario_Load_Unit(const char *key, char *settings)
{
uint8 houseType, unitType, actionType;
int8 orientation;
uint16 hitpoints;
tile32 position;
Unit *u;
char *split;
VARIABLE_NOT_USED(key);
/* The value should have 6 values separated by a ',' */
split = strchr(settings, ',');
if (split == NULL) return;
*split = '\0';
/* First value is the House type */
houseType = House_StringToType(settings);
if (houseType == HOUSE_INVALID) return;
/* Find the next value in the ',' separated list */
settings = split + 1;
split = strchr(settings, ',');
if (split == NULL) return;
*split = '\0';
/* Second value is the Unit type */
unitType = Unit_StringToType(settings);
if (unitType == UNIT_INVALID) return;
/* Find the next value in the ',' separated list */
settings = split + 1;
split = strchr(settings, ',');
if (split == NULL) return;
*split = '\0';
/* Third value is the Hitpoints in percent (in base 256) */
hitpoints = atoi(settings);
/* Find the next value in the ',' separated list */
settings = split + 1;
split = strchr(settings, ',');
if (split == NULL) return;
*split = '\0';
/* Fourth value is the position on the map */
position = Tile_UnpackTile(atoi(settings));
/* Find the next value in the ',' separated list */
settings = split + 1;
split = strchr(settings, ',');
if (split == NULL) return;
*split = '\0';
/* Fifth value is orientation */
orientation = (int8)((uint8)atoi(settings));
/* Sixth value is the current state of the unit */
settings = split + 1;
actionType = Unit_ActionStringToType(settings);
if (actionType == ACTION_INVALID) return;
u = Unit_Allocate(UNIT_INDEX_INVALID, unitType, houseType);
if (u == NULL) return;
u->o.flags.s.byScenario = true;
u->o.hitpoints = hitpoints * g_table_unitInfo[unitType].o.hitpoints / 256;
u->o.position = position;
u->orientation[0].current = orientation;
u->actionID = actionType;
u->nextActionID = ACTION_INVALID;
/* In case the above function failed and we are passed campaign 2, don't add the unit */
if (!Map_IsValidPosition(Tile_PackTile(u->o.position)) && g_campaignID > 2) {
Unit_Free(u);
return;
}
/* XXX -- There is no way this is ever possible, as the beingBuilt flag is unset by Unit_Allocate() */
if (!u->o.flags.s.isNotOnMap) Unit_SetAction(u, u->actionID);
u->o.seenByHouses = 0x00;
Unit_HouseUnitCount_Add(u, u->o.houseID);
Unit_SetOrientation(u, u->orientation[0].current, true, 0);
Unit_SetOrientation(u, u->orientation[0].current, true, 1);
Unit_SetSpeed(u, 0);
}
static bool Skirmish_GenUnitsHuman(HouseType houseID, SkirmishData* sd)
{
const int delta[7] = {
0, -4, 4,
-MAP_SIZE_MAX * 3 - 2, -MAP_SIZE_MAX * 3 + 2,
MAP_SIZE_MAX * 3 - 2, MAP_SIZE_MAX * 3 + 2,
};
const MapInfo* mi = &g_mapInfos[0];
/* Pick a tile that is not too close to the edge, and not too
* close to the enemy.
*/
int r;
for (int attempts = 0; attempts < 100; attempts++)
{
const int island = Skirmish_PickRandomIsland(sd);
if (island < 0)
return false;
r = Tools_RandomLCG_Range(sd->island[island].start, sd->island[island].end - 1);
if (!(mi->minX + 4 <= sd->buildable[r].x && sd->buildable[r].x < mi->minX + mi->sizeX - 4))
continue;
if (!(mi->minY + 3 <= sd->buildable[r].y && sd->buildable[r].y < mi->minY + mi->sizeY - 3))
continue;
PoolFindStruct find;
find.houseID = HOUSE_INVALID;
find.type = 0xFFFF;
find.index = STRUCTURE_INDEX_INVALID;
Structure* s = Structure_Find(&find);
for (; s != NULL; s = Structure_Find(&find))
{
if (s->o.type == STRUCTURE_SLAB_1x1 || s->o.type == STRUCTURE_SLAB_2x2 || s->o.type == STRUCTURE_WALL)
continue;
if (House_AreAllied(g_playerHouseID, s->o.houseID))
continue;
const uint16 dist = Tile_GetDistancePacked(Tile_PackTile(s->o.position), sd->buildable[r].packed);
if (dist < 24)
break;
}
if (s == NULL)
{
break;
}
else
{
r = -1;
}
}
if (r < 0)
return false;
bool mcvPlaced = false;
for (int i = 0; i < 7; i++)
{
const uint16 packed = sd->buildable[r].packed + delta[i];
const tile32 position = Tile_UnpackTile(packed);
UnitType type;
if (!mcvPlaced)
type = UNIT_MCV;
else if (i >= 0 && i < 3)
type = UNIT_SIEGE_TANK;
else if (i >= 3 && i < 4)
type = House_GetIXVehicle(houseID);
else if (i >= 4 && i < 5)
type = House_GetMediumVehicle(houseID);
else if (i >= 5 && i < 6)
type = UNIT_QUAD;
else if (i >= 6)
type = House_GetInfantrySquad(houseID);
const LandscapeType lst = (const LandscapeType)Map_GetLandscapeType(packed);
/* If there's a structure or a bloom here, tough luck. */
if (lst == LST_STRUCTURE || lst == LST_BLOOM_FIELD)
continue;
/* If there's a mountain here, build infantry instead. */
if (lst == LST_ENTIRELY_MOUNTAIN || lst == LST_PARTIAL_MOUNTAIN)
type = House_GetInfantrySquad(houseID);
Scenario_Create_Unit(houseID, type, 256, position, 127, (UnitActionType)g_table_unitInfo[type].o.actionsPlayer[3]);
if (type == UNIT_MCV)
mcvPlaced = true;
}
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);
}
/**
* Makes the current unit fire a bullet (or eat its target).
*
* Stack: *none*.
*
* @param script The script engine to operate on.
* @return The value 1 if the current unit fired/eat, 0 otherwise.
*/
uint16 Script_Unit_Fire(ScriptEngine *script)
{
const UnitInfo *ui;
Unit *u;
uint16 target;
UnitType typeID;
uint16 distance;
bool fireTwice;
uint16 damage;
u = g_scriptCurrentUnit;
target = u->targetAttack;
if (target == 0 || !Tools_Index_IsValid(target)) return 0;
if (u->o.type != UNIT_SANDWORM && target == Tools_Index_Encode(Tile_PackTile(u->o.position), IT_TILE)) u->targetAttack = 0;
if (u->targetAttack != target) {
Unit_SetTarget(u, target);
return 0;
}
ui = &g_table_unitInfo[u->o.type];
if (u->o.type != UNIT_SANDWORM && u->orientation[ui->o.flags.hasTurret ? 1 : 0].speed != 0) return 0;
if (Tools_Index_GetType(target) == IT_TILE && Object_GetByPackedTile(Tools_Index_GetPackedTile(target)) != NULL) Unit_SetTarget(u, target);
if (u->fireDelay != 0) return 0;
distance = Object_GetDistanceToEncoded(&u->o, target);
if ((int16)(ui->fireDistance << 8) < (int16)distance) return 0;
if (u->o.type != UNIT_SANDWORM && (Tools_Index_GetType(target) != IT_UNIT || g_table_unitInfo[Tools_Index_GetUnit(target)->o.type].movementType != MOVEMENT_WINGER)) {
int16 diff = 0;
int8 orientation;
orientation = Tile_GetDirection(u->o.position, Tools_Index_GetTile(target));
diff = abs(u->orientation[ui->o.flags.hasTurret ? 1 : 0].current - orientation);
if (ui->movementType == MOVEMENT_WINGER) diff /= 8;
if (diff >= 8) return 0;
}
damage = ui->damage;
typeID = ui->bulletType;
fireTwice = ui->flags.firesTwice && u->o.hitpoints > ui->o.hitpoints / 2;
if ((u->o.type == UNIT_TROOPERS || u->o.type == UNIT_TROOPER) && (int16)distance > 512) typeID = UNIT_MISSILE_TROOPER;
switch (typeID) {
case UNIT_SANDWORM: {
Unit *u2;
Unit_UpdateMap(0, u);
u2 = Tools_Index_GetUnit(target);
if (u2 != NULL) {
u2->o.script.variables[1] = 0xFFFF;
Unit_RemovePlayer(u2);
Unit_HouseUnitCount_Remove(u2);
Unit_Remove(u2);
}
Map_MakeExplosion(ui->explosionType, u->o.position, 0, 0);
Voice_PlayAtTile(63, u->o.position);
Unit_UpdateMap(1, u);
u->amount--;
script->delay = 12;
if ((int8)u->amount < 1) Unit_SetAction(u, ACTION_DIE);
} break;
case UNIT_MISSILE_TROOPER:
damage -= damage / 4;
/* FALL-THROUGH */
case UNIT_MISSILE_ROCKET:
case UNIT_MISSILE_TURRET:
case UNIT_MISSILE_DEVIATOR:
case UNIT_BULLET:
case UNIT_SONIC_BLAST: {
Unit *bullet;
bullet = Unit_CreateBullet(u->o.position, typeID, Unit_GetHouseID(u), damage, target);
if (bullet == NULL) return 0;
bullet->originEncoded = Tools_Index_Encode(u->o.index, IT_UNIT);
Voice_PlayAtTile(ui->bulletSound, u->o.position);
Unit_Deviation_Decrease(u, 20);
} break;
default: break;
}
u->fireDelay = Tools_AdjustToGameSpeed(ui->fireDelay * 2, 1, 0xFFFF, true);
if (fireTwice) {
u->o.flags.s.fireTwiceFlip = !u->o.flags.s.fireTwiceFlip;
if (u->o.flags.s.fireTwiceFlip) u->fireDelay = Tools_AdjustToGameSpeed(5, 1, 10, true) & 0xFF;
} else {
u->o.flags.s.fireTwiceFlip = false;
}
u->fireDelay += Tools_Random_256() & 1;
Unit_UpdateMap(2, u);
return 1;
}
/**
* Pickup a unit (either from structure or on the map). The unit that does the
* picking up returns the unit to his last position.
*
* Stack: *none*.
*
* @param script The script engine to operate on.
* @return The value 0. Always.
*/
uint16 Script_Unit_Pickup(ScriptEngine *script)
{
Unit *u;
VARIABLE_NOT_USED(script);
u = g_scriptCurrentUnit;
if (u->o.linkedID != 0xFF) return 0;
switch (Tools_Index_GetType(u->targetMove)) {
case IT_STRUCTURE: {
Structure *s;
Unit *u2;
s = Tools_Index_GetStructure(u->targetMove);
/* There was nothing to pickup here */
if (s->state != STRUCTURE_STATE_READY) {
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
return 0;
}
u->o.flags.s.inTransport = true;
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
u2 = Unit_Get_ByIndex(s->o.linkedID);
/* Pickup the unit */
u->o.linkedID = u2->o.index & 0xFF;
s->o.linkedID = u2->o.linkedID;
u2->o.linkedID = 0xFF;
if (s->o.linkedID == 0xFF) Structure_SetState(s, STRUCTURE_STATE_IDLE);
/* Check if the unit has a return-to position or try to find spice in case of a harvester */
if (u2->targetLast.tile != 0) {
u->targetMove = Tools_Index_Encode(Tile_PackTile(u2->targetLast), IT_TILE);
} else if (u2->o.type == UNIT_HARVESTER && Unit_GetHouseID(u2) != g_playerHouseID) {
u->targetMove = Tools_Index_Encode(Map_SearchSpice(Tile_PackTile(u->o.position), 20), IT_TILE);
}
Unit_UpdateMap(2, u);
return 1;
}
case IT_UNIT: {
Unit *u2;
Structure *s = NULL;
PoolFindStruct find;
int16 minDistance = 0;
u2 = Tools_Index_GetUnit(u->targetMove);
if (!u2->o.flags.s.allocated) return 0;
find.houseID = Unit_GetHouseID(u);
find.index = 0xFFFF;
find.type = 0xFFFF;
/* Find closest refinery / repair station */
while (true) {
Structure *s2;
int16 distance;
s2 = Structure_Find(&find);
if (s2 == NULL) break;
distance = Tile_GetDistanceRoundedUp(s2->o.position, u->o.position);
if (u2->o.type == UNIT_HARVESTER) {
if (s2->o.type != STRUCTURE_REFINERY || s2->state != STRUCTURE_STATE_IDLE || s2->o.script.variables[4] != 0) continue;
if (minDistance != 0 && distance >= minDistance) break;
minDistance = distance;
s = s2;
break;
}
if (s2->o.type != STRUCTURE_REPAIR || s2->state != STRUCTURE_STATE_IDLE || s2->o.script.variables[4] != 0) continue;
if (minDistance != 0 && distance >= minDistance) continue;
minDistance = distance;
s = s2;
}
if (s == NULL) return 0;
/* Deselect the unit as it is about to be picked up */
if (u2 == g_unitSelected) Unit_Select(NULL);
/* Pickup the unit */
u->o.linkedID = u2->o.index & 0xFF;
u->o.flags.s.inTransport = true;
Unit_UpdateMap(0, u2);
Unit_Hide(u2);
/* Set where we are going to */
Object_Script_Variable4_Link(Tools_Index_Encode(u->o.index, IT_UNIT), Tools_Index_Encode(s->o.index, IT_STRUCTURE));
u->targetMove = u->o.script.variables[4];
Unit_UpdateMap(2, u);
if (u2->o.type != UNIT_HARVESTER) return 0;
/* Check if we want to return to this spice field later */
if (Map_SearchSpice(Tile_PackTile(u2->o.position), 2) == 0) {
u2->targetPreLast.tile = 0;
u2->targetLast.tile = 0;
}
return 0;
}
default: return 0;
}
}
/**
* Delivery of transport, either to structure or to a tile.
*
* Stack: *none*.
*
* @param script The script engine to operate on.
* @return One if delivered, zero otherwise..
*/
uint16 Script_Unit_TransportDeliver(ScriptEngine *script)
{
Unit *u;
Unit *u2;
VARIABLE_NOT_USED(script);
u = g_scriptCurrentUnit;
if (u->o.linkedID == 0xFF) return 0;
if (Tools_Index_GetType(u->targetMove) == IT_UNIT) return 0;
if (Tools_Index_GetType(u->targetMove) == IT_STRUCTURE) {
const StructureInfo *si;
Structure *s;
s = Tools_Index_GetStructure(u->targetMove);
si = &g_table_structureInfo[s->o.type];
if (s->o.type == STRUCTURE_STARPORT) {
uint16 ret = 0;
if (s->state == STRUCTURE_STATE_BUSY) {
s->o.linkedID = u->o.linkedID;
u->o.linkedID = 0xFF;
u->o.flags.s.inTransport = false;
u->amount = 0;
Unit_UpdateMap(2, u);
Voice_PlayAtTile(24, u->o.position);
Structure_SetState(s, STRUCTURE_STATE_READY);
ret = 1;
}
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
return ret;
}
if ((s->state == STRUCTURE_STATE_IDLE || (si->o.flags.busyStateIsIncoming && s->state == STRUCTURE_STATE_BUSY)) && s->o.linkedID == 0xFF) {
Voice_PlayAtTile(24, u->o.position);
Unit_EnterStructure(Unit_Get_ByIndex(u->o.linkedID), s);
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
u->o.linkedID = 0xFF;
u->o.flags.s.inTransport = false;
u->amount = 0;
Unit_UpdateMap(2, u);
return 1;
}
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
return 0;
}
if (!Map_IsValidPosition(Tile_PackTile(Tile_Center(u->o.position)))) return 0;
u2 = Unit_Get_ByIndex(u->o.linkedID);
if (!Unit_SetPosition(u2, Tile_Center(u->o.position))) return 0;
if (u2->o.houseID == g_playerHouseID) {
Voice_PlayAtTile(24, u->o.position);
}
Unit_SetOrientation(u2, u->orientation[0].current, true, 0);
Unit_SetOrientation(u2, u->orientation[0].current, true, 1);
Unit_SetSpeed(u2, 0);
u->o.linkedID = u2->o.linkedID;
u2->o.linkedID = 0xFF;
if (u->o.linkedID != 0xFF) return 1;
u->o.flags.s.inTransport = false;
Object_Script_Variable4_Clear(&u->o);
u->targetMove = 0;
return 1;
}
/**
* Redraw parts of the viewport that require redrawing.
*
* @param forceRedraw If true, dirty flags are ignored, and everything is drawn.
* @param arg08 ??
* @param drawToMainScreen True if and only if we are drawing to the main screen and not some buffer screen.
*/
void GUI_Widget_Viewport_Draw(bool forceRedraw, bool arg08, bool drawToMainScreen)
{
static const uint16 values_32A4[8][2] = {
{0, 0}, {1, 0}, {2, 0}, {3, 0},
{4, 0}, {3, 1}, {2, 1}, {1, 1}
};
uint16 x;
uint16 y;
uint16 i;
uint16 curPos;
bool updateDisplay;
Screen oldScreenID;
uint16 oldValue_07AE_0000;
int16 minX[10];
int16 maxX[10];
PoolFindStruct find;
updateDisplay = forceRedraw;
memset(minX, 0xF, sizeof(minX));
memset(maxX, 0, sizeof(minX));
oldScreenID = GFX_Screen_SetActive(SCREEN_1);
oldValue_07AE_0000 = Widget_SetCurrentWidget(2);
if (g_dirtyViewportCount != 0 || forceRedraw) {
for (y = 0; y < 10; y++) {
uint16 top = (y << 4) + 0x28;
for (x = 0; x < (drawToMainScreen ? 15 : 16); x++) {
Tile *t;
uint16 left;
curPos = g_viewportPosition + Tile_PackXY(x, y);
if (x < 15 && !forceRedraw && BitArray_Test(g_dirtyViewport, curPos)) {
if (maxX[y] < x) maxX[y] = x;
if (minX[y] > x) minX[y] = x;
updateDisplay = true;
}
if (!BitArray_Test(g_dirtyMinimap, curPos) && !forceRedraw) continue;
BitArray_Set(g_dirtyViewport, curPos);
if (x < 15) {
updateDisplay = true;
if (maxX[y] < x) maxX[y] = x;
if (minX[y] > x) minX[y] = x;
}
t = &g_map[curPos];
left = x << 4;
if (!g_debugScenario && g_veiledSpriteID == t->overlaySpriteID) {
GUI_DrawFilledRectangle(left, top, left + 15, top + 15, 12);
continue;
}
GFX_DrawSprite(t->groundSpriteID, left, top, t->houseID);
if (t->overlaySpriteID == 0 || g_debugScenario) continue;
GFX_DrawSprite(t->overlaySpriteID, left, top, t->houseID);
}
}
g_dirtyViewportCount = 0;
}
find.type = UNIT_SANDWORM;
find.index = 0xFFFF;
find.houseID = HOUSE_INVALID;
while (true) {
Unit *u;
uint8 *sprite;
u = Unit_Find(&find);
if (u == NULL) break;
if (!u->o.flags.s.isDirty && !forceRedraw) continue;
u->o.flags.s.isDirty = false;
if (!g_map[Tile_PackTile(u->o.position)].isUnveiled && !g_debugScenario) continue;
sprite = GUI_Widget_Viewport_Draw_GetSprite(g_table_unitInfo[u->o.type].groundSpriteID, Unit_GetHouseID(u));
s_spriteFlags = 0x200;
if (Map_IsPositionInViewport(u->o.position, &x, &y)) GUI_DrawSprite(g_screenActiveID, sprite, x, y, 2, s_spriteFlags | 0xC000);
if (Map_IsPositionInViewport(u->targetLast, &x, &y)) GUI_DrawSprite(g_screenActiveID, sprite, x, y, 2, s_spriteFlags | 0xC000);
if (Map_IsPositionInViewport(u->targetPreLast, &x, &y)) GUI_DrawSprite(g_screenActiveID, sprite, x, y, 2, s_spriteFlags | 0xC000);
if (u != g_unitSelected) continue;
if (!Map_IsPositionInViewport(u->o.position, &x, &y)) continue;
GUI_DrawSprite(g_screenActiveID, g_sprites[6], x, y, 2, 0xC000);
}
if (g_unitSelected == NULL && (g_var_3A08 != 0 || arg08) && (Structure_Get_ByPackedTile(g_selectionRectanglePosition) != NULL || g_selectionType == SELECTIONTYPE_PLACE || g_debugScenario)) {
uint16 x1 = (Tile_GetPackedX(g_selectionRectanglePosition) - Tile_GetPackedX(g_minimapPosition)) << 4;
uint16 y1 = ((Tile_GetPackedY(g_selectionRectanglePosition) - Tile_GetPackedY(g_minimapPosition)) << 4) + 0x28;
uint16 x2 = x1 + (g_selectionWidth << 4) - 1;
uint16 y2 = y1 + (g_selectionHeight << 4) - 1;
GUI_SetClippingArea(0, 40, 239, SCREEN_HEIGHT - 1);
GUI_DrawWiredRectangle(x1, y1, x2, y2, 0xFF);
if (g_selectionState == 0 && g_selectionType == SELECTIONTYPE_PLACE) {
GUI_DrawLine(x1, y1, x2, y2, 0xFF);
GUI_DrawLine(x2, y1, x1, y2, 0xFF);
}
GUI_SetClippingArea(0, 0, SCREEN_WIDTH - 1, SCREEN_HEIGHT - 1);
g_var_3A08 = 0;
}
if (g_dirtyUnitCount != 0 || forceRedraw || updateDisplay) {
find.type = 0xFFFF;
find.index = 0xFFFF;
find.houseID = HOUSE_INVALID;
while (true) {
Unit *u;
UnitInfo *ui;
uint16 packed;
uint8 orientation;
uint16 index;
u = Unit_Find(&find);
if (u == NULL) break;
if (u->o.index < 20 || u->o.index > 101) continue;
packed = Tile_PackTile(u->o.position);
if ((!u->o.flags.s.isDirty || u->o.flags.s.isNotOnMap) && !forceRedraw && !BitArray_Test(g_dirtyViewport, packed)) continue;
u->o.flags.s.isDirty = false;
if (!g_map[packed].isUnveiled && !g_debugScenario) continue;
ui = &g_table_unitInfo[u->o.type];
if (!Map_IsPositionInViewport(u->o.position, &x, &y)) continue;
x += g_table_tilediff[0][u->wobbleIndex].x;
y += g_table_tilediff[0][u->wobbleIndex].y;
orientation = Orientation_Orientation256ToOrientation8(u->orientation[0].current);
if (u->spriteOffset >= 0 || ui->destroyedSpriteID == 0) {
static const uint16 values_32C4[8][2] = {
{0, 0}, {1, 0}, {1, 0}, {1, 0},
{2, 0}, {1, 1}, {1, 1}, {1, 1}
};
index = ui->groundSpriteID;
switch (ui->displayMode) {
case DISPLAYMODE_UNIT:
case DISPLAYMODE_ROCKET:
if (ui->movementType == MOVEMENT_SLITHER) break;
index += values_32A4[orientation][0];
s_spriteFlags = values_32A4[orientation][1];
break;
case DISPLAYMODE_INFANTRY_3_FRAMES: {
static const uint16 values_334A[4] = {0, 1, 0, 2};
index += values_32C4[orientation][0] * 3;
index += values_334A[u->spriteOffset & 3];
s_spriteFlags = values_32C4[orientation][1];
} break;
case DISPLAYMODE_INFANTRY_4_FRAMES:
index += values_32C4[orientation][0] * 4;
index += u->spriteOffset & 3;
s_spriteFlags = values_32C4[orientation][1];
break;
default:
s_spriteFlags = 0;
break;
}
} else {
index = ui->destroyedSpriteID - u->spriteOffset - 1;
s_spriteFlags = 0;
}
if (u->o.type != UNIT_SANDWORM && u->o.flags.s.isHighlighted) s_spriteFlags |= 0x100;
if (ui->o.flags.blurTile) s_spriteFlags |= 0x200;
GUI_DrawSprite(g_screenActiveID, GUI_Widget_Viewport_Draw_GetSprite(index, (u->deviated != 0) ? u->deviatedHouse : Unit_GetHouseID(u)), x, y, 2, s_spriteFlags | 0xE000, s_paletteHouse, g_paletteMapping2, 1);
if (u->o.type == UNIT_HARVESTER && u->actionID == ACTION_HARVEST && u->spriteOffset >= 0 && (u->actionID == ACTION_HARVEST || u->actionID == ACTION_MOVE)) {
uint16 type = Map_GetLandscapeType(packed);
if (type == LST_SPICE || type == LST_THICK_SPICE) {
static const int16 values_334E[8][2] = {
{0, 7}, {-7, 6}, {-14, 1}, {-9, -6},
{0, -9}, { 9, -6}, { 14, 1}, { 7, 6}
};
GUI_DrawSprite(g_screenActiveID, GUI_Widget_Viewport_Draw_GetSprite((u->spriteOffset % 3) + 0xDF + (values_32A4[orientation][0] * 3), Unit_GetHouseID(u)), x + values_334E[orientation][0], y + values_334E[orientation][1], 2, values_32A4[orientation][1] | 0xC000);
}
}
if (u->spriteOffset >= 0 && ui->turretSpriteID != 0xFFFF) {
int16 offsetX = 0;
int16 offsetY = 0;
uint16 spriteID = ui->turretSpriteID;
orientation = Orientation_Orientation256ToOrientation8(u->orientation[ui->o.flags.hasTurret ? 1 : 0].current);
switch (ui->turretSpriteID) {
case 0x8D: /* sonic tank */
offsetY = -2;
break;
case 0x92: /* rocket launcher */
offsetY = -3;
break;
case 0x7E: { /* siege tank */
static const int16 values_336E[8][2] = {
{ 0, -5}, { 0, -5}, { 2, -3}, { 2, -1},
{-1, -3}, {-2, -1}, {-2, -3}, {-1, -5}
};
offsetX = values_336E[orientation][0];
offsetY = values_336E[orientation][1];
} break;
case 0x88: { /* devastator */
static const int16 values_338E[8][2] = {
{ 0, -4}, {-1, -3}, { 2, -4}, {0, -3},
{-1, -3}, { 0, -3}, {-2, -4}, {1, -3}
};
offsetX = values_338E[orientation][0];
offsetY = values_338E[orientation][1];
} break;
default:
break;
}
s_spriteFlags = values_32A4[orientation][1];
spriteID += values_32A4[orientation][0];
GUI_DrawSprite(g_screenActiveID, GUI_Widget_Viewport_Draw_GetSprite(spriteID, Unit_GetHouseID(u)), x + offsetX, y + offsetY, 2, s_spriteFlags | 0xE000, s_paletteHouse);
}
if (u->o.flags.s.isSmoking) {
uint16 spriteID = 180 + (u->spriteOffset & 3);
if (spriteID == 183) spriteID = 181;
GUI_DrawSprite(g_screenActiveID, g_sprites[spriteID], x, y - 14, 2, 0xC000);
}
if (u != g_unitSelected) continue;
GUI_DrawSprite(g_screenActiveID, g_sprites[6], x, y, 2, 0xC000);
}
g_dirtyUnitCount = 0;
}
for (i = 0; i < EXPLOSION_MAX; i++) {
Explosion *e = Explosion_Get_ByIndex(i);
curPos = Tile_PackTile(e->position);
if (BitArray_Test(g_dirtyViewport, curPos)) e->isDirty = true;
if (e->commands == NULL) continue;
if (!e->isDirty && !forceRedraw) continue;
if (e->spriteID == 0) continue;
e->isDirty = false;
if (!g_map[curPos].isUnveiled && !g_debugScenario) continue;
if (!Map_IsPositionInViewport(e->position, &x, &y)) continue;
s_spriteFlags = 0xC000;
GUI_DrawSprite(g_screenActiveID, GUI_Widget_Viewport_Draw_GetSprite(e->spriteID, e->houseID), x, y, 2, s_spriteFlags, s_paletteHouse);
}
if (g_dirtyAirUnitCount != 0 || forceRedraw || updateDisplay) {
find.type = 0xFFFF;
find.index = 0xFFFF;
find.houseID = HOUSE_INVALID;
while (true) {
static const uint16 values_32E4[8][2] = {
{0, 0}, {1, 0}, {2, 0}, {1, 2},
{0, 2}, {1, 3}, {2, 1}, {1, 1}
};
Unit *u;
UnitInfo *ui;
uint8 orientation;
uint8 *sprite;
uint16 index;
u = Unit_Find(&find);
if (u == NULL) break;
if (u->o.index > 15) continue;
curPos = Tile_PackTile(u->o.position);
if ((!u->o.flags.s.isDirty || u->o.flags.s.isNotOnMap) && !forceRedraw && !BitArray_Test(g_dirtyViewport, curPos)) continue;
u->o.flags.s.isDirty = false;
if (!g_map[curPos].isUnveiled && !g_debugScenario) continue;
ui = &g_table_unitInfo[u->o.type];
if (!Map_IsPositionInViewport(u->o.position, &x, &y)) continue;
index = ui->groundSpriteID;
orientation = u->orientation[0].current;
s_spriteFlags = 0xC000;
switch (ui->displayMode) {
case DISPLAYMODE_SINGLE_FRAME:
if (u->o.flags.s.bulletIsBig) index++;
break;
case DISPLAYMODE_UNIT:
orientation = Orientation_Orientation256ToOrientation8(orientation);
index += values_32E4[orientation][0];
s_spriteFlags |= values_32E4[orientation][1];
break;
case DISPLAYMODE_ROCKET: {
static const uint16 values_3304[16][2] = {
{0, 0}, {1, 0}, {2, 0}, {3, 0},
{4, 0}, {3, 2}, {2, 2}, {1, 2},
{0, 2}, {3, 3}, {2, 3}, {3, 3},
{4, 1}, {3, 1}, {2, 1}, {1, 1}
};
orientation = Orientation_Orientation256ToOrientation16(orientation);
index += values_3304[orientation][0];
s_spriteFlags |= values_3304[orientation][1];
} break;
case DISPLAYMODE_ORNITHOPTER: {
static const uint16 values_33AE[4] = {2, 1, 0, 1};
orientation = Orientation_Orientation256ToOrientation8(orientation);
index += (values_32E4[orientation][0] * 3) + values_33AE[u->spriteOffset & 3];
s_spriteFlags |= values_32E4[orientation][1];
} break;
default:
s_spriteFlags = 0x0;
break;
}
if (ui->flags.hasAnimationSet && u->o.flags.s.animationFlip) index += 5;
if (u->o.type == UNIT_CARRYALL && u->o.flags.s.inTransport) index += 3;
sprite = GUI_Widget_Viewport_Draw_GetSprite(index, Unit_GetHouseID(u));
if (ui->o.flags.hasShadow) GUI_DrawSprite(g_screenActiveID, sprite, x + 1, y + 3, 2, (s_spriteFlags & 0xDFFF) | 0x300, g_paletteMapping1, 1);
if (ui->o.flags.blurTile) s_spriteFlags |= 0x200;
GUI_DrawSprite(g_screenActiveID, sprite, x, y, 2, s_spriteFlags | 0x2000, s_paletteHouse);
}
g_dirtyAirUnitCount = 0;
}
if (updateDisplay) {
memset(g_dirtyMinimap, 0, sizeof(g_dirtyMinimap));
memset(g_dirtyViewport, 0, sizeof(g_dirtyViewport));
}
if (g_changedTilesCount != 0) {
bool init = false;
bool update = false;
Screen oldScreenID2 = SCREEN_1;
for (i = 0; i < g_changedTilesCount; i++) {
curPos = g_changedTiles[i];
BitArray_Clear(g_changedTilesMap, curPos);
if (!init) {
init = true;
oldScreenID2 = GFX_Screen_SetActive(SCREEN_1);
GUI_Mouse_Hide_InWidget(3);
}
GUI_Widget_Viewport_DrawTile(curPos);
if (!update && BitArray_Test(g_displayedMinimap, curPos)) update = true;
}
if (update) Map_UpdateMinimapPosition(g_minimapPosition, true);
if (init) {
GUI_Screen_Copy(32, 136, 32, 136, 8, 64, g_screenActiveID, SCREEN_0);
GFX_Screen_SetActive(oldScreenID2);
GUI_Mouse_Show_InWidget();
}
if (g_changedTilesCount == lengthof(g_changedTiles)) {
g_changedTilesCount = 0;
for (i = 0; i < 4096; i++) {
if (!BitArray_Test(g_changedTilesMap, i)) continue;
g_changedTiles[g_changedTilesCount++] = i;
if (g_changedTilesCount == lengthof(g_changedTiles)) break;
}
} else {
g_changedTilesCount = 0;
}
}
if ((g_viewportMessageCounter & 1) != 0 && g_viewportMessageText != NULL && (minX[6] <= 14 || maxX[6] >= 0 || arg08 || forceRedraw)) {
GUI_DrawText_Wrapper(g_viewportMessageText, 112, 139, 15, 0, 0x132);
minX[6] = -1;
maxX[6] = 14;
}
if (updateDisplay && !drawToMainScreen) {
if (g_viewport_fadein) {
GUI_Mouse_Hide_InWidget(g_curWidgetIndex);
/* ENHANCEMENT -- When fading in the game on start, you don't see the fade as it is against the already drawn screen. */
if (g_dune2_enhanced) {
Screen oldScreenID2 = g_screenActiveID;
GFX_Screen_SetActive(SCREEN_0);
GUI_DrawFilledRectangle(g_curWidgetXBase << 3, g_curWidgetYBase, (g_curWidgetXBase + g_curWidgetWidth) << 3, g_curWidgetYBase + g_curWidgetHeight, 0);
GFX_Screen_SetActive(oldScreenID2);
}
GUI_Screen_FadeIn(g_curWidgetXBase, g_curWidgetYBase, g_curWidgetXBase, g_curWidgetYBase, g_curWidgetWidth, g_curWidgetHeight, g_screenActiveID, SCREEN_0);
GUI_Mouse_Show_InWidget();
g_viewport_fadein = false;
} else {
bool init = false;
for (i = 0; i < 10; i++) {
uint16 width;
uint16 height;
if (arg08) {
minX[i] = 0;
maxX[i] = 14;
}
if (maxX[i] < minX[i]) continue;
x = minX[i] * 2;
y = (i << 4) + 0x28;
width = (maxX[i] - minX[i] + 1) * 2;
height = 16;
if (!init) {
GUI_Mouse_Hide_InWidget(g_curWidgetIndex);
init = true;
}
GUI_Screen_Copy(x, y, x, y, width, height, g_screenActiveID, SCREEN_0);
}
if (init) GUI_Mouse_Show_InWidget();
}
}
GFX_Screen_SetActive(oldScreenID);
Widget_SetCurrentWidget(oldValue_07AE_0000);
}
/**
* Transform an MCV into Construction Yard.
*
* Stack: *none*.
*
* @param script The script engine to operate on.
* @return 1 if and only if the transformation succeeded.
*/
uint16 Script_Unit_MCVDeploy(ScriptEngine *script)
{
Unit *u;
Structure *s = NULL;
uint16 i;
VARIABLE_NOT_USED(script);
u = g_scriptCurrentUnit;
Unit_UpdateMap(0, u);
for (i = 0; i < 4; i++) {
static int8 offsets[4] = { 0, -1, -64, -65 };
s = Structure_Create(STRUCTURE_INDEX_INVALID, STRUCTURE_CONSTRUCTION_YARD, Unit_GetHouseID(u), Tile_PackTile(u->o.position) + offsets[i]);
if (s != NULL) {
Unit_Remove(u);
return 1;
}
}
if (Unit_GetHouseID(u) == g_playerHouseID) {
GUI_DisplayText(String_Get_ByIndex(STR_UNIT_IS_UNABLE_TO_DEPLOY_HERE), 0);
}
Unit_UpdateMap(1, u);
return 0;
}
/**
* 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);
}
