// seg000:1304
void __pascal far play_next_sound() {
if (next_sound >= 0) {
if (!check_sound_playing() ||
(sound_interruptible[current_sound] != 0 && sound_prio_table[next_sound] <= sound_prio_table[current_sound])
) {
current_sound = next_sound;
play_sound_from_buffer(sound_pointers[current_sound]);
}
}
next_sound = -1;
}
// seg001:09D7
void __pascal far end_sequence() {
peel_type* peel;
short bgcolor;
short color;
rect_type rect;
short hof_index;
short i;
color = 0;
bgcolor = 15;
load_intro(1, &end_sequence_anim, 1);
clear_screen_and_sounds();
load_opt_sounds(sound_56_ending_music, sound_56_ending_music); // winning theme
play_sound_from_buffer(sound_pointers[sound_56_ending_music]); // winning theme
if(offscreen_surface) free_surface(offscreen_surface); // missing in original
offscreen_surface = make_offscreen_buffer(&screen_rect);
load_title_images(0);
current_target_surface = offscreen_surface;
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, 0);
draw_image_2(3 /*The tyrant Jaffar*/, chtab_title40, 24, 25, get_text_color(15, color_15_brightwhite, 0x800));
fade_in_2(offscreen_surface, 0x800);
pop_wait(timer_0, 900);
start_timer(timer_0, 240);
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, 0);
transition_ltr();
do_wait(timer_0);
for (hof_index = 0; hof_index < hof_count; ++hof_index) {
if (hof[hof_index].min < rem_min ||
(hof[hof_index].min == rem_min && hof[hof_index].tick < rem_tick)
) break;
}
if (hof_index < MAX_HOF_COUNT && hof_index <= hof_count) {
fade_out_2(0x1000);
for (i = 5; hof_index + 1 <= i; --i) {
hof[i] = hof[i - 1];
}
hof[i].name[0] = 0;
hof[i].min = rem_min;
hof[i].tick = rem_tick;
if (hof_count < MAX_HOF_COUNT) {
++hof_count;
}
draw_image_2(0 /*story frame*/, chtab_title40, 0, 0, 0);
draw_image_2(3 /*Prince Of Persia*/, chtab_title50, 24, 24, blitters_10h_transp);
show_hof();
offset4_rect_add(&rect, &hof_rects[hof_index], -4, -1, -40, -1);
peel = read_peel_from_screen(&rect);
if (graphics_mode == gmMcgaVga) {
color = 0xBE;
bgcolor = 0xB7;
}
draw_rect(&rect, bgcolor);
fade_in_2(offscreen_surface, 0x1800);
current_target_surface = onscreen_surface_;
while(input_str(&rect, hof[hof_index].name, 24, "", 0, 4, color, bgcolor) <= 0);
restore_peel(peel);
show_hof_text(&hof_rects[hof_index], -1, 0, hof[hof_index].name);
hof_write();
pop_wait(timer_0, 120);
current_target_surface = offscreen_surface;
draw_image_2(0 /*main title image*/, chtab_title50, 0, 0, blitters_0_no_transp);
transition_ltr();
}
while (check_sound_playing() && !key_test_quit()) idle();
fade_out_2(0x1000);
start_level = 0;
start_game();
}
// seg000:09B6
void __pascal far draw_game_frame() {
short var_2;
if (need_full_redraw) {
redraw_screen(0);
need_full_redraw = 0;
} else {
if (different_room) {
drawn_room = next_room;
if (tbl_level_type[current_level]) {
gen_palace_wall_colors();
}
redraw_screen(1);
} else {
if (need_redraw_because_flipped) {
need_redraw_because_flipped = 0;
redraw_screen(0);
} else {
memset_near(&table_counts, 0, sizeof(table_counts));
draw_moving();
draw_tables();
if (is_blind_mode) {
draw_rect(&rect_top, 0);
}
if (upside_down) {
flip_screen(offscreen_surface);
}
while (drects_count--) {
copy_screen_rect(&drects[drects_count]);
}
if (upside_down) {
flip_screen(offscreen_surface);
}
drects_count = 0;
}
}
}
play_next_sound();
// Note: texts are identified by their total time!
if (text_time_remaining == 1) {
// If the text's is about to expire:
if (text_time_total == 36 || text_time_total == 288) {
// 36: died on demo/potions level
// 288: press button to continue
// In this case, restart the game.
start_level = 0;
need_quotes = 1;
start_game();
} else {
// Otherwise, just clear it.
erase_bottom_text(1);
}
} else {
if (text_time_remaining != 0 && text_time_total != 1188) {
// 1188: potions level (page/line/word) -- this one does not disappear
--text_time_remaining;
if (text_time_total == 288 && text_time_remaining < 72) {
// 288: press button to continue
// Blink the message:
var_2 = text_time_remaining % 12;
if (var_2 > 3) {
erase_bottom_text(0);
} else {
if (var_2 == 3) {
display_text_bottom("Press Button to Continue");
play_sound_from_buffer(sound_pointers[sound_38_blink]); // press button blink
}
}
}
}
}
}
// 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);
}
