void play(void)
{
//dac_enable_dma();
//iprintf("f_open: %i\n", f_open(&file, "/04TUYY~1.MP3", FA_OPEN_EXISTING|FA_READ));
//infile_type = MP3;
next();
state = STOPPED;
//mp3_alloc();
// clear command buffer
get_command();
while(1)
{
switch(state) {
case STOPPED:
do_stopped();
break;
case PLAYING:
do_playing();
break;
case PAUSED:
do_paused();
break;
}
}
}
// seg001:04D3
void __pascal far time_expired() {
disable_keys = 1;
set_hourglass_state(7);
hourglass_sandflow = -1;
play_sound(sound_36_out_of_time); // time over
if (fade_in_1()) return;
if (proc_cutscene_frame(2)) return;
if (proc_cutscene_frame(100)) return;
fade_out_1();
while (check_sound_playing()) {
idle();
do_paused();
}
}
// seg001:0004
int __pascal far proc_cutscene_frame(int wait_frames) {
cutscene_wait_frames = wait_frames;
reset_timer(timer_0);
do {
set_timer_length(timer_0, cutscene_frame_time);
play_both_seq();
draw_proom_drects(); // changed order of drects and flash
if (flash_time) {
do_flash(flash_color);
}
if (flash_time) {
--flash_time;
remove_flash();
}
if (!check_sound_playing()) {
play_next_sound();
}
do {
if (!disable_keys && do_paused()) {
stop_sounds();
draw_rect(&screen_rect, 0);
#ifdef USE_FADE
if (is_global_fading) {
fade_palette_buffer->proc_restore_free(fade_palette_buffer);
is_global_fading = 0;
}
#endif
return 1;
}
#ifdef USE_FADE
if (is_global_fading) {
if (fade_palette_buffer->proc_fade_frame(fade_palette_buffer)) {
fade_palette_buffer->proc_restore_free(fade_palette_buffer);
is_global_fading = 0;
return 2;
}
} else {
idle();
delay_ticks(1);
}
#else
idle();
#endif
} while(!has_timer_stopped(timer_0)); // busy waiting?
} while(--cutscene_wait_frames);
return 0;
}
// seg001:0CCD
void __pascal far load_intro(int which_imgs,cutscene_ptr_type func,int free_sounds) {
short current_star;
draw_rect(&screen_rect, 0);
if (free_sounds) {
free_optional_sounds();
}
free_all_chtabs_from(id_chtab_3_princessinstory);
load_chtab_from_file(id_chtab_8_princessroom, 950, "PV.DAT", 1<<13);
load_chtab_from_file(id_chtab_9_princessbed, 980, "PV.DAT", 1<<14);
current_target_surface = offscreen_surface;
method_6_blit_img_to_scr(get_image(id_chtab_8_princessroom, 0), 0, 0, 0);
method_6_blit_img_to_scr(get_image(id_chtab_9_princessbed, 0), 0, 142, blitters_2_or);
// Free the images that are not needed anymore.
free_all_chtabs_from(id_chtab_9_princessbed);
SDL_FreeSurface(get_image(id_chtab_8_princessroom, 0));
if (NULL != chtab_addrs[id_chtab_8_princessroom]) chtab_addrs[id_chtab_8_princessroom]->images[0] = NULL;
load_chtab_from_file(id_chtab_3_princessinstory, 800, "PV.DAT", 1<<9);
load_chtab_from_file(id_chtab_4_jaffarinstory_princessincutscenes,
50*which_imgs + 850, "PV.DAT", 1<<10);
for (current_star = 0; current_star < N_STARS; ++current_star) {
draw_star(current_star, 0);
}
current_target_surface = onscreen_surface_;
while (check_sound_playing()) {
idle();
do_paused();
delay_ticks(1);
}
need_drects = 1;
reset_cutscene();
is_cutscene = 1;
func();
is_cutscene = 0;
free_all_chtabs_from(3);
draw_rect(&screen_rect, 0);
}
// seg000:17E6
void __pascal far show_title() {
word textcolor;
load_opt_sounds(sound_50_story_2_princess, sound_55_story_1_absence); // main theme, story, princess door
textcolor = get_text_color(15, color_15_white, 0x800);
dont_reset_time = 0;
if(offscreen_surface) free_surface(offscreen_surface); // missing in original
offscreen_surface = make_offscreen_buffer(&screen_rect);
load_title_images(1);
current_target_surface = offscreen_surface;
do_wait(timer_0);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
fade_in_2(offscreen_surface, 0x1000); //STUB
method_1_blit_rect(onscreen_surface_, offscreen_surface, &screen_rect, &screen_rect, blitters_0_no_transp);
play_sound_from_buffer(sound_pointers[54]); // main theme
start_timer(timer_0, 0x82);
draw_image_2(1 /*Broderbund Software presents*/, chtab_title50, 96, 106, blitters_0_no_transp);
do_wait(timer_0);
start_timer(timer_0,0xCD);
method_1_blit_rect(onscreen_surface_, offscreen_surface, &rect_titles, &rect_titles, blitters_0_no_transp);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
do_wait(timer_0);
start_timer(timer_0,0x41);
method_1_blit_rect(onscreen_surface_, offscreen_surface, &rect_titles, &rect_titles, blitters_0_no_transp);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
draw_image_2(2 /*a game by Jordan Mechner*/, chtab_title50, 96, 122, blitters_0_no_transp);
do_wait(timer_0);
start_timer(timer_0,0x10E);
method_1_blit_rect(onscreen_surface_, offscreen_surface, &rect_titles, &rect_titles, blitters_0_no_transp);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
do_wait(timer_0);
start_timer(timer_0,0xEB);
method_1_blit_rect(onscreen_surface_, offscreen_surface, &rect_titles, &rect_titles, blitters_0_no_transp);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
draw_image_2(3 /*Prince Of Persia*/, chtab_title50, 24, 107, blitters_10h_transp);
draw_image_2(4 /*Copyright 1990 Jordan Mechner*/, chtab_title50, 48, 184, blitters_0_no_transp);
do_wait(timer_0);
method_1_blit_rect(onscreen_surface_, offscreen_surface, &rect_titles, &rect_titles, blitters_0_no_transp);
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, blitters_0_no_transp);
draw_image_2(1 /*In the Sultan's absence*/, chtab_title40, 24, 25, textcolor);
current_target_surface = onscreen_surface_;
while (check_sound_playing()) {
idle();
do_paused();
}
// method_1_blit_rect(onscreen_surface_, offscreen_surface, &screen_rect, &screen_rect, blitters_0_no_transp);
play_sound_from_buffer(sound_pointers[sound_55_story_1_absence]); // story 1: In the absence
transition_ltr();
pop_wait(timer_0, 0x258);
fade_out_2(0x800);
release_title_images();
load_intro(0, &pv_scene, 0);
load_title_images(1);
current_target_surface = offscreen_surface;
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, blitters_0_no_transp);
draw_image_2(2 /*Marry Jaffar*/, chtab_title40, 24, 25, textcolor);
fade_in_2(offscreen_surface, 0x800);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
draw_image_2(3 /*Prince Of Persia*/, chtab_title50, 24, 107, blitters_10h_transp);
draw_image_2(4 /*Copyright 1990 Jordan Mechner*/, chtab_title50, 48, 184, blitters_0_no_transp);
while (check_sound_playing()) {
idle();
do_paused();
}
transition_ltr();
pop_wait(timer_0, 0x78);
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, blitters_0_no_transp);
draw_image_2(4 /*credits*/, chtab_title40, 24, 26, textcolor);
transition_ltr();
pop_wait(timer_0, 0x168);
if (hof_count) {
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, blitters_0_no_transp);
draw_image_2(3 /*Prince Of Persia*/, chtab_title50, 24, 24, blitters_10h_transp);
show_hof();
transition_ltr();
pop_wait(timer_0, 0xF0);
}
current_target_surface = onscreen_surface_;
while (check_sound_playing()) {
idle();
do_paused();
}
fade_out_2(0x1800);
free_surface(offscreen_surface);
offscreen_surface = NULL; // added
release_title_images();
init_game(0);
}
