void fronttorture_unload(void)
{
LbDataFreeAll(torture_load_files);
memcpy(&frontend_palette, frontend_backup_palette, PALETTE_SIZE);
StopAllSamples();
// Clearing the space used for torture graphics
clear_light_system(&game.lish);
clear_computer();
clear_things_and_persons_data();
clear_mapmap();
clear_slabs();
clear_rooms();
clear_dungeons();
}
void unload_pointer_file(short hi_res)
{
struct TbLoadFiles *ldfiles;
set_pointer_graphic_none();
if ((features_enabled & Ft_BigPointer) == 0)
{
if (hi_res)
ldfiles = hi_res_small_pointer_load_files;
else
ldfiles = low_res_small_pointer_load_files;
} else
{
if (hi_res)
ldfiles = hi_res_pointer_load_files;
else
ldfiles = low_res_pointer_load_files;
}
LbDataFreeAll(ldfiles);
}
/**
* Loads MCGA graphics files, for low resolution mode.
* It is modified version of LbDataLoadAll, optimized for maximum
* game speed on very slow machines.
* @return Returns true if all files were loaded, false otherwise.
*/
short LoadMcgaData(void)
{
struct TbLoadFiles *load_files;
void *mem;
struct TbLoadFiles *t_lfile;
int ferror;
int ret_val;
int i;
load_files = mcga_load_files;
LbDataFreeAll(load_files);
ferror = 0;
i = 0;
t_lfile = &load_files[i];
// Allocate some low memory, only to be sure that
// it will be free when this function ends
mem = LbMemoryAllocLow(0x10000u);
while (t_lfile->Start != NULL)
{
// Don't allow loading flags
t_lfile->Flags = 0;
ret_val = LbDataLoad(t_lfile);
if (ret_val == -100)
{
ERRORLOG("Can't allocate memory for MCGA files element \"%s\".", t_lfile->FName);
ferror++;
} else
if ( ret_val == -101 )
{
ERRORLOG("Can't load MCGA file \"%s\".", t_lfile->FName);
ferror++;
}
i++;
t_lfile = &load_files[i];
}
if (mem != NULL)
LbMemoryFree(mem);
return (ferror == 0);
}
void frontstory_unload(void)
{
LbDataFreeAll(frontstory_load_files_640);
}
void free_testfont_fonts(void)
{
LbDataFreeAll(testfont_load_files);
}
short setup_screen_mode_minimal(unsigned short nmode)
{
unsigned int flg_mem;
TbScreenModeInfo *mdinfo;
SYNCDBG(4,"Setting up mode %d",(int)nmode);
if (!force_video_mode_reset)
{
if ((nmode == lbDisplay.ScreenMode) && (MinimalResolutionSetup))
return 1;
}
flg_mem = lbDisplay.DrawFlags;
if (LbGraphicsScreenHeight() < 200)
{
WARNLOG("Unhandled previous Screen Mode %d, Reset skipped",(int)lbDisplay.ScreenMode);
} else
if (LbGraphicsScreenHeight() < 400)
{
if (MinimalResolutionSetup)
{
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
LbScreenReset();
LbDataFreeAll(mcga_load_files_minimal);
MinimalResolutionSetup = 0;
} else
{
reset_eye_lenses();
reset_heap_manager();
reset_heap_memory();
set_pointer_graphic_none();
unload_pointer_file(0);
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
LbScreenReset();
LbDataFreeAll(mcga_load_files);
}
} else
{
if (MinimalResolutionSetup)
{
set_pointer_graphic_none();
unload_pointer_file(1);
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
LbScreenReset();
LbDataFreeAll(vres256_load_files_minimal);
MinimalResolutionSetup = 0;
} else
{
reset_eye_lenses();
reset_heap_manager();
reset_heap_memory();
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
LbScreenReset();
LbDataFreeAll(vres256_load_files);
}
}
mdinfo = LbScreenGetModeInfo(nmode);
if (mdinfo->Height < 200)
{
ERRORLOG("Unhandled Screen Mode %d, setup failed",(int)nmode);
force_video_mode_reset = true;
return 0;
} else
if (mdinfo->Height < 400)
{
SYNCDBG(17,"Preparing minimal low resolution mode");
MinimalResolutionSetup = 1;
if ( !LoadMcgaDataMinimal() )
{
ERRORLOG("Unable to load minimal MCGA files");
return 0;
}
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
{
if (LbScreenSetup((TbScreenMode)nmode, mdinfo->Width, mdinfo->Height, engine_palette, 2, 0) != 1)
{
ERRORLOG("Unable to setup screen resolution %s (mode %d)",
mdinfo->Desc,(int)nmode);
force_video_mode_reset = true;
return 0;
}
}
} else
{
SYNCDBG(17,"Preparing minimal high resolution mode");
MinimalResolutionSetup = 1;
frontend_load_data_from_cd();
if ( LbDataLoadAll(vres256_load_files_minimal) )
{
ERRORLOG("Unable to load vres256_load_files_minimal files");
force_video_mode_reset = true;
return 0;
}
frontend_load_data_reset();
if ((nmode != lbDisplay.ScreenMode) || (force_video_mode_reset))
{
if (LbScreenSetup((TbScreenMode)nmode, mdinfo->Width, mdinfo->Height, engine_palette, 1, 0) != 1)
{
ERRORLOG("Unable to setup screen resolution %s (mode %d)",
mdinfo->Desc,(int)nmode);
force_video_mode_reset = true;
return 0;
}
}
}
LbScreenClear(0);
LbScreenSwap();
update_screen_mode_data(mdinfo->Width, mdinfo->Height);
lbDisplay.DrawFlags = flg_mem;
force_video_mode_reset = false;
return 1;
}
TbBool setup_screen_mode(unsigned short nmode)
{
TbScreenModeInfo *mdinfo;
unsigned int flg_mem;
long lens_mem;
short was_minimal_res;
SYNCDBG(4,"Setting up mode %d",(int)nmode);
if (!force_video_mode_reset)
{
if ((nmode == lbDisplay.ScreenMode) && (!MinimalResolutionSetup))
{
SYNCDBG(6,"Mode %d already active, no changes.",(int)nmode);
return true;
}
}
lens_mem = game.numfield_1B;
flg_mem = lbDisplay.DrawFlags;
was_minimal_res = (MinimalResolutionSetup || force_video_mode_reset);
set_pointer_graphic_none();
if (LbGraphicsScreenHeight() < 200)
{
WARNLOG("Unhandled previous Screen Mode %d, Reset skipped",(int)lbDisplay.ScreenMode);
} else
if (LbGraphicsScreenHeight() < 400)
{
if (MinimalResolutionSetup)
{
if (lbDisplay.ScreenMode != nmode)
LbScreenReset();
LbDataFreeAll(mcga_load_files_minimal);
ERRORLOG("MCGA Minimal not allowed (Reset)");
MinimalResolutionSetup = 0;
} else
{
reset_eye_lenses();
reset_heap_manager();
reset_heap_memory();
set_pointer_graphic_none();
unload_pointer_file(0);
if (lbDisplay.ScreenMode != nmode)
LbScreenReset();
LbDataFreeAll(mcga_load_files);
}
} else
// so (LbGraphicsScreenHeight() >= 400)
{
if (MinimalResolutionSetup)
{
if ((lbDisplay.ScreenMode != nmode) || (MinimalResolutionSetup))
LbScreenReset();
LbDataFreeAll(vres256_load_files_minimal);
MinimalResolutionSetup = 0;
} else
{
reset_eye_lenses();
reset_heap_manager();
reset_heap_memory();
set_pointer_graphic_none();
unload_pointer_file(1);
if ((lbDisplay.ScreenMode != nmode) || (MinimalResolutionSetup))
LbScreenReset();
LbDataFreeAll(vres256_load_files);
}
}
mdinfo = LbScreenGetModeInfo(nmode);
if (mdinfo->Height < 200)
{
ERRORLOG("Unhandled Screen Mode %d, setup failed",(int)nmode);
force_video_mode_reset = true;
return false;
} else
if (mdinfo->Height < 400)
{
SYNCDBG(6,"Entering low-res mode %d, resolution %dx%d.",(int)nmode,(int)mdinfo->Width,(int)mdinfo->Height);
if (!LoadMcgaData())
{
ERRORLOG("Loading Mcga files failed");
force_video_mode_reset = true;
return false;
}
if ((lbDisplay.ScreenMode != nmode) || (was_minimal_res))
{
if (LbScreenSetup((TbScreenMode)nmode, mdinfo->Width, mdinfo->Height, engine_palette, 2, 0) != 1)
{
ERRORLOG("Unable to setup screen resolution %s (mode %d)",
mdinfo->Desc,(int)nmode);
force_video_mode_reset = true;
return false;
}
}
load_pointer_file(0);
} else
// so (mdinfo->Height >= 400)
{
SYNCDBG(6,"Entering hi-res mode %d, resolution %dx%d.",(int)nmode,(int)mdinfo->Width,(int)mdinfo->Height);
if (!LoadVRes256Data((long)mdinfo->Width*(long)mdinfo->Height))
{
ERRORLOG("Unable to load VRes256 data files");
force_video_mode_reset = true;
return false;
}
if ((lbDisplay.ScreenMode != nmode) || (was_minimal_res))
{
if (LbScreenSetup((TbScreenMode)nmode, mdinfo->Width, mdinfo->Height, engine_palette, 1, 0) != 1)
{
ERRORLOG("Unable to setup screen resolution %s (mode %d)",
mdinfo->Desc,(int)nmode);
force_video_mode_reset = true;
return false;
}
}
load_pointer_file(1);
}
LbScreenClear(0);
LbScreenSwap();
update_screen_mode_data(mdinfo->Width, mdinfo->Height);
if (parchment_loaded)
reload_parchment_file(mdinfo->Width >= 640);
reinitialise_eye_lens(lens_mem);
LbMouseSetPosition((MyScreenWidth/pixel_size) >> 1, (MyScreenHeight/pixel_size) >> 1);
lbDisplay.DrawFlags = flg_mem;
if (!setup_heap_memory())
{
force_video_mode_reset = true;
return false;
}
setup_heap_manager();
game.numfield_C &= ~0x0004;
force_video_mode_reset = false;
SYNCDBG(8,"Finished");
return true;
}
