void ultimate_bio(WORD p_a0) { character_texture_load(p_a0,CHAR_VS,p1_heap,SYNC_LOAD); current_proc->a0=p_a0; slide_in_left(p1_heap); process_sleep(4); lm_setup(pf_bio); freeze_2_pages(); background_clear(); f_auto_erase=0; text_draw=1; mk_printf(bio_titles[p_a0]); text_draw=0; process_sleep(1); noflip=1; process_sleep(0x10); //-DHS- send_code_a3(0x25); process_sleep(0x40*10); //-DHS- send_code_a3(0x27); process_sleep(0x40*2); noflip=0; f_auto_erase=1; murder_myoinit_score(); clr_scrn(); process_sleep(10); return; }
/** * @brief Cleans up and frees memory after the backgrounds. */ void background_free (void) { /* Free the Lua. */ background_clear(); if (bkg_def_L != NULL) lua_close( bkg_def_L ); bkg_def_L = NULL; /* Free the images. */ if (bkg_image_arr_ft != NULL) { array_free( bkg_image_arr_ft ); bkg_image_arr_ft = NULL; } if (bkg_image_arr_bk != NULL) { array_free( bkg_image_arr_bk ); bkg_image_arr_bk = NULL; } /* Free the Lua. */ if (bkg_cur_L == bkg_def_L) { if (bkg_cur_L != NULL) lua_close( bkg_cur_L ); bkg_cur_L = NULL; bkg_def_L = NULL; } else { if (bkg_cur_L != NULL) lua_close( bkg_cur_L ); if (bkg_def_L != NULL) lua_close( bkg_def_L ); bkg_cur_L = NULL; bkg_def_L = NULL; } /* Free the stars. */ if (star_vertex != NULL) { free(star_vertex); star_vertex = NULL; } if (star_colour != NULL) { free(star_colour); star_colour = NULL; } nstars = 0; mstars = 0; }
/** * @brief Clears any backgrounds that may currently be displaying. * * @luafunc clear() */ static int bkgL_clear( lua_State *L ) { (void) L; background_clear(); return 0; }