2006-03-20 16:43:15 +00:00
/*
THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
SOFTWARE CORPORATION ( " PARALLAX " ) . PARALLAX , IN DISTRIBUTING THE CODE TO
END - USERS , AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN , GRANTS A
ROYALTY - FREE , PERPETUAL LICENSE TO SUCH END - USERS FOR USE BY SUCH END - USERS
IN USING , DISPLAYING , AND CREATING DERIVATIVE WORKS THEREOF , SO LONG AS
SUCH USE , DISPLAY OR CREATION IS FOR NON - COMMERCIAL , ROYALTY OR REVENUE
FREE PURPOSES . IN NO EVENT SHALL THE END - USER USE THE COMPUTER CODE
CONTAINED HEREIN FOR REVENUE - BEARING PURPOSES . THE END - USER UNDERSTANDS
2006-03-27 15:23:53 +00:00
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE .
2006-03-20 16:43:15 +00:00
COPYRIGHT 1993 - 1998 PARALLAX SOFTWARE CORPORATION . ALL RIGHTS RESERVED .
*/
2006-03-27 15:23:53 +00:00
2010-03-01 07:27:51 +00:00
/*
*
* Routines to display title screens . . .
*
*/
2006-03-20 16:43:15 +00:00
# ifdef RCS
static char rcsid [ ] = " $Id: titles.c,v 1.2 2006/03/18 23:08:13 michaelstather Exp $ " ;
# endif
# include <stdlib.h>
# include <stdio.h>
# include <string.h>
2010-03-01 07:27:51 +00:00
# ifdef OGL
# include "ogl_init.h"
# endif
2008-01-02 03:37:13 +00:00
# include "pstypes.h"
2006-03-20 16:43:15 +00:00
# include "timer.h"
# include "key.h"
# include "gr.h"
# include "palette.h"
# include "iff.h"
# include "pcx.h"
# include "u_mem.h"
# include "joy.h"
# include "gamefont.h"
# include "cfile.h"
# include "error.h"
# include "polyobj.h"
# include "textures.h"
# include "screens.h"
# include "multi.h"
# include "player.h"
# include "digi.h"
# include "text.h"
# include "kmatrix.h"
# include "piggy.h"
# include "songs.h"
# include "newmenu.h"
# include "state.h"
2010-03-01 07:27:51 +00:00
# include "menu.h"
# include "mouse.h"
2008-04-06 20:23:28 +00:00
# include "console.h"
2007-03-25 21:00:14 +00:00
2006-03-20 16:43:15 +00:00
void title_save_game ( ) ;
2007-08-08 12:38:13 +00:00
void set_briefing_fontcolor ( ) ;
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
# define MAX_BRIEFING_COLORS 7
2010-03-09 02:41:34 +00:00
# define DEFAULT_BRIEFING_BKG "brief03.pcx"
2010-03-01 07:27:51 +00:00
2007-09-20 14:39:23 +00:00
int Briefing_text_colors [ MAX_BRIEFING_COLORS ] ;
2006-03-20 16:43:15 +00:00
int Current_color = 0 ;
int Erase_color ;
// added by Jan Bobrowski for variable-size menu screen
static int rescale_x ( int x )
{
return x * GWIDTH / 320 ;
}
static int rescale_y ( int y )
{
return y * GHEIGHT / 200 ;
}
2010-03-22 04:44:35 +00:00
typedef struct title_screen
2006-03-20 16:43:15 +00:00
{
2010-03-22 04:44:35 +00:00
grs_bitmap title_bm ;
fix timer ;
int allow_keys ;
} title_screen ;
2006-03-20 16:43:15 +00:00
2010-03-22 04:44:35 +00:00
int title_handler ( window * wind , d_event * event , title_screen * ts )
{
switch ( event - > type )
{
2010-03-24 07:26:52 +00:00
case EVENT_MOUSE_BUTTON_DOWN :
if ( mouse_get_button ( event ) ! = 0 )
return 0 ;
else if ( ts - > allow_keys )
{
window_close ( wind ) ;
return 1 ;
}
break ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
case EVENT_KEY_COMMAND :
2010-04-02 05:01:08 +00:00
if ( ! call_default_handler ( event ) )
if ( ts - > allow_keys )
window_close ( wind ) ;
return 1 ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
case EVENT_IDLE :
timer_delay2 ( 50 ) ;
2010-03-24 07:26:52 +00:00
if ( timer_get_fixed_seconds ( ) > ts - > timer )
2010-03-22 04:44:35 +00:00
{
window_close ( wind ) ;
return 1 ;
}
break ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
case EVENT_WINDOW_DRAW :
2010-07-15 09:45:25 +00:00
gr_set_current_canvas ( NULL ) ;
2010-03-22 04:44:35 +00:00
show_fullscr ( & ts - > title_bm ) ;
break ;
2006-03-20 16:43:15 +00:00
2010-03-22 04:44:35 +00:00
case EVENT_WINDOW_CLOSE :
gr_free_bitmap_data ( & ts - > title_bm ) ;
d_free ( ts ) ;
break ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
default :
break ;
2006-03-20 16:43:15 +00:00
}
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
return 0 ;
2006-03-20 16:43:15 +00:00
}
2010-03-01 07:27:51 +00:00
int show_title_screen ( char * filename , int allow_keys , int from_hog_only )
2006-03-20 16:43:15 +00:00
{
2010-03-22 04:44:35 +00:00
title_screen * ts ;
window * wind ;
2006-03-20 16:43:15 +00:00
int pcx_error ;
2010-03-01 07:27:51 +00:00
char new_filename [ FILENAME_LEN + 1 ] = " " ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
MALLOC ( ts , title_screen , 1 ) ;
if ( ! ts )
return 0 ;
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
ts - > allow_keys = allow_keys ;
2010-03-01 07:27:51 +00:00
# ifdef RELEASE
if ( from_hog_only )
strcpy ( new_filename , " \x01 " ) ; //only read from hog file
# endif
strcat ( new_filename , filename ) ;
filename = new_filename ;
2006-03-20 16:43:15 +00:00
2010-03-22 04:44:35 +00:00
gr_init_bitmap_data ( & ts - > title_bm ) ;
2006-03-20 16:43:15 +00:00
2010-03-22 04:44:35 +00:00
if ( ( pcx_error = pcx_read_bitmap ( filename , & ts - > title_bm , BM_LINEAR , gr_palette ) ) ! = PCX_ERROR_NONE ) {
2010-03-01 07:27:51 +00:00
Error ( " Error loading briefing screen <%s>, PCX load error: %s (%i) \n " , filename , pcx_errormsg ( pcx_error ) , pcx_error ) ;
2006-03-20 16:43:15 +00:00
}
2010-03-22 04:44:35 +00:00
ts - > timer = timer_get_fixed_seconds ( ) + i2f ( 3 ) ;
2006-03-20 16:43:15 +00:00
2007-08-27 23:01:34 +00:00
gr_palette_load ( gr_palette ) ;
2007-06-29 19:56:37 +00:00
2010-03-22 04:44:35 +00:00
wind = window_create ( & grd_curscreen - > sc_canvas , 0 , 0 , SWIDTH , SHEIGHT , ( int ( * ) ( window * , d_event * , void * ) ) title_handler , ts ) ;
if ( ! wind )
{
gr_free_bitmap_data ( & ts - > title_bm ) ;
d_free ( ts ) ;
return 0 ;
}
2010-06-19 16:24:34 +00:00
2010-03-22 04:44:35 +00:00
while ( window_exists ( wind ) )
event_process ( ) ;
2007-06-29 19:56:37 +00:00
2006-03-20 16:43:15 +00:00
return 0 ;
}
2010-03-01 07:27:51 +00:00
void show_titles ( void )
{
char publisher [ 16 ] ;
2010-06-19 16:24:34 +00:00
2010-03-01 07:27:51 +00:00
if ( GameArg . SysNoTitles )
return ;
strcpy ( publisher , " macplay.pcx " ) ; // Mac Shareware
if ( ! PHYSFS_exists ( publisher ) )
strcpy ( publisher , " mplaycd.pcx " ) ; // Mac Registered
if ( ! PHYSFS_exists ( publisher ) )
strcpy ( publisher , " iplogo1.pcx " ) ; // PC. Only down here because it's lowres ;-)
2010-06-19 16:24:34 +00:00
2010-03-01 07:27:51 +00:00
show_title_screen ( publisher , 1 , 1 ) ;
show_title_screen ( ( ( ( SWIDTH > = 640 & & SHEIGHT > = 480 ) & & cfexist ( " logoh.pcx " ) ) ? " logoh.pcx " : " logo.pcx " ) , 1 , 1 ) ;
show_title_screen ( ( ( ( SWIDTH > = 640 & & SHEIGHT > = 480 ) & & cfexist ( " descenth.pcx " ) ) ? " descenth.pcx " : " descent.pcx " ) , 1 , 1 ) ;
}
2010-03-18 04:31:47 +00:00
void show_order_form ( )
{
char exit_screen [ 16 ] ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
strcpy ( exit_screen , " warning.pcx " ) ; // D1 Registered
if ( ! cfexist ( exit_screen ) )
strcpy ( exit_screen , " apple.pcx " ) ; // D1 Mac OEM Demo
if ( ! cfexist ( exit_screen ) )
strcpy ( exit_screen , " order01.pcx " ) ; // D1 Demo
show_title_screen ( exit_screen , 1 , 1 ) ;
}
//-----------------------------------------------------------------------------
2006-03-20 16:43:15 +00:00
typedef struct {
2010-03-25 23:37:19 +00:00
char bs_name [ 16 ] ; // filename, eg merc01. Assumes .lbm suffix.
2010-03-01 07:27:51 +00:00
sbyte level_num ;
sbyte message_num ;
short text_ulx , text_uly ; // upper left x,y of text window
short text_width , text_height ; // width and height of text window
2006-03-20 16:43:15 +00:00
} briefing_screen ;
2010-03-01 07:27:51 +00:00
# define BRIEFING_SECRET_NUM 31 // This must correspond to the first secret level which must come at the end of the list.
# define BRIEFING_OFFSET_NUM 4 // This must correspond to the first level screen (ie, past the bald guy briefing screens)
2010-03-25 23:37:19 +00:00
# define ENDING_LEVEL_NUM_OEMSHARE 0x7f
# define ENDING_LEVEL_NUM_REGISTER 0x7e
2008-02-24 14:41:27 +00:00
# define Briefing_screens_LH ((SWIDTH >= 640 && SHEIGHT >= 480 && cfexist( "brief01h.pcx"))?Briefing_screens_h:Briefing_screens)
2006-03-20 16:43:15 +00:00
briefing_screen Briefing_screens [ ] = {
2010-03-01 07:27:51 +00:00
{ " brief01.pcx " , 0 , 1 , 13 , 140 , 290 , 59 } ,
{ " brief02.pcx " , 0 , 2 , 27 , 34 , 257 , 177 } ,
{ " brief03.pcx " , 0 , 3 , 20 , 22 , 257 , 177 } ,
{ " brief02.pcx " , 0 , 4 , 27 , 34 , 257 , 177 } ,
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
{ " moon01.pcx " , 1 , 5 , 10 , 10 , 300 , 170 } , // level 1
{ " moon01.pcx " , 2 , 6 , 10 , 10 , 300 , 170 } , // level 2
{ " moon01.pcx " , 3 , 7 , 10 , 10 , 300 , 170 } , // level 3
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
{ " venus01.pcx " , 4 , 8 , 15 , 15 , 300 , 200 } , // level 4
{ " venus01.pcx " , 5 , 9 , 15 , 15 , 300 , 200 } , // level 5
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
{ " brief03.pcx " , 6 , 10 , 20 , 22 , 257 , 177 } ,
{ " merc01.pcx " , 6 , 11 , 10 , 15 , 300 , 200 } , // level 6
{ " merc01.pcx " , 7 , 12 , 10 , 15 , 300 , 200 } , // level 7
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
{ " brief03.pcx " , 8 , 13 , 20 , 22 , 257 , 177 } ,
{ " mars01.pcx " , 8 , 14 , 10 , 100 , 300 , 200 } , // level 8
{ " mars01.pcx " , 9 , 15 , 10 , 100 , 300 , 200 } , // level 9
{ " brief03.pcx " , 10 , 16 , 20 , 22 , 257 , 177 } ,
{ " mars01.pcx " , 10 , 17 , 10 , 100 , 300 , 200 } , // level 10
{ " jup01.pcx " , 11 , 18 , 10 , 40 , 300 , 200 } , // level 11
{ " jup01.pcx " , 12 , 19 , 10 , 40 , 300 , 200 } , // level 12
{ " brief03.pcx " , 13 , 20 , 20 , 22 , 257 , 177 } ,
{ " jup01.pcx " , 13 , 21 , 10 , 40 , 300 , 200 } , // level 13
{ " jup01.pcx " , 14 , 22 , 10 , 40 , 300 , 200 } , // level 14
{ " saturn01.pcx " , 15 , 23 , 10 , 40 , 300 , 200 } , // level 15
{ " brief03.pcx " , 16 , 24 , 20 , 22 , 257 , 177 } ,
{ " saturn01.pcx " , 16 , 25 , 10 , 40 , 300 , 200 } , // level 16
{ " brief03.pcx " , 17 , 26 , 20 , 22 , 257 , 177 } ,
{ " saturn01.pcx " , 17 , 27 , 10 , 40 , 300 , 200 } , // level 17
{ " uranus01.pcx " , 18 , 28 , 100 , 100 , 300 , 200 } , // level 18
{ " uranus01.pcx " , 19 , 29 , 100 , 100 , 300 , 200 } , // level 19
{ " uranus01.pcx " , 20 , 30 , 100 , 100 , 300 , 200 } , // level 20
{ " uranus01.pcx " , 21 , 31 , 100 , 100 , 300 , 200 } , // level 21
{ " neptun01.pcx " , 22 , 32 , 10 , 20 , 300 , 200 } , // level 22
{ " neptun01.pcx " , 23 , 33 , 10 , 20 , 300 , 200 } , // level 23
{ " neptun01.pcx " , 24 , 34 , 10 , 20 , 300 , 200 } , // level 24
{ " pluto01.pcx " , 25 , 35 , 10 , 20 , 300 , 200 } , // level 25
{ " pluto01.pcx " , 26 , 36 , 10 , 20 , 300 , 200 } , // level 26
{ " pluto01.pcx " , 27 , 37 , 10 , 20 , 300 , 200 } , // level 27
{ " aster01.pcx " , - 1 , 38 , 10 , 90 , 300 , 200 } , // secret level -1
{ " aster01.pcx " , - 2 , 39 , 10 , 90 , 300 , 200 } , // secret level -2
{ " aster01.pcx " , - 3 , 40 , 10 , 90 , 300 , 200 } , // secret level -3
2006-03-20 16:43:15 +00:00
2010-03-25 23:37:19 +00:00
{ " end01.pcx " , ENDING_LEVEL_NUM_OEMSHARE , 1 , 23 , 40 , 320 , 200 } , // OEM and shareware end
{ " end02.pcx " , ENDING_LEVEL_NUM_REGISTER , 1 , 5 , 5 , 300 , 200 } , // registered end
{ " end01.pcx " , ENDING_LEVEL_NUM_REGISTER , 2 , 23 , 40 , 320 , 200 } , // registered end
{ " end03.pcx " , ENDING_LEVEL_NUM_REGISTER , 3 , 5 , 5 , 300 , 200 } , // registered end
2006-03-20 16:43:15 +00:00
} ;
2007-08-08 12:38:13 +00:00
briefing_screen Briefing_screens_h [ ] = { // hires screens
2010-03-25 23:37:19 +00:00
{ " brief01h.pcx " , 0 , 1 , 13 , 140 , 290 , 59 } ,
{ " brief02h.pcx " , 0 , 2 , 27 , 34 , 257 , 177 } ,
{ " brief03h.pcx " , 0 , 3 , 20 , 22 , 257 , 177 } ,
{ " brief02h.pcx " , 0 , 4 , 27 , 34 , 257 , 177 } ,
{ " moon01h.pcx " , 1 , 5 , 10 , 10 , 300 , 170 } , // level 1
{ " moon01h.pcx " , 2 , 6 , 10 , 10 , 300 , 170 } , // level 2
{ " moon01h.pcx " , 3 , 7 , 10 , 10 , 300 , 170 } , // level 3
{ " venus01h.pcx " , 4 , 8 , 15 , 15 , 300 , 200 } , // level 4
{ " venus01h.pcx " , 5 , 9 , 15 , 15 , 300 , 200 } , // level 5
{ " brief03h.pcx " , 6 , 10 , 20 , 22 , 257 , 177 } ,
{ " merc01h.pcx " , 6 , 11 , 10 , 15 , 300 , 200 } , // level 6
{ " merc01h.pcx " , 7 , 12 , 10 , 15 , 300 , 200 } , // level 7
{ " brief03h.pcx " , 8 , 13 , 20 , 22 , 257 , 177 } ,
{ " mars01h.pcx " , 8 , 14 , 10 , 100 , 300 , 200 } , // level 8
{ " mars01h.pcx " , 9 , 15 , 10 , 100 , 300 , 200 } , // level 9
{ " brief03h.pcx " , 10 , 16 , 20 , 22 , 257 , 177 } ,
{ " mars01h.pcx " , 10 , 17 , 10 , 100 , 300 , 200 } , // level 10
{ " jup01h.pcx " , 11 , 18 , 10 , 40 , 300 , 200 } , // level 11
{ " jup01h.pcx " , 12 , 19 , 10 , 40 , 300 , 200 } , // level 12
{ " brief03h.pcx " , 13 , 20 , 20 , 22 , 257 , 177 } ,
{ " jup01h.pcx " , 13 , 21 , 10 , 40 , 300 , 200 } , // level 13
{ " jup01h.pcx " , 14 , 22 , 10 , 40 , 300 , 200 } , // level 14
{ " saturn01h.pcx " , 15 , 23 , 10 , 40 , 300 , 200 } , // level 15
{ " brief03h.pcx " , 16 , 24 , 20 , 22 , 257 , 177 } ,
{ " saturn01h.pcx " , 16 , 25 , 10 , 40 , 300 , 200 } , // level 16
{ " brief03h.pcx " , 17 , 26 , 20 , 22 , 257 , 177 } ,
{ " saturn01h.pcx " , 17 , 27 , 10 , 40 , 300 , 200 } , // level 17
{ " uranus01h.pcx " , 18 , 28 , 100 , 100 , 300 , 200 } , // level 18
{ " uranus01h.pcx " , 19 , 29 , 100 , 100 , 300 , 200 } , // level 19
{ " uranus01h.pcx " , 20 , 30 , 100 , 100 , 300 , 200 } , // level 20
{ " uranus01h.pcx " , 21 , 31 , 100 , 100 , 300 , 200 } , // level 21
{ " neptun01h.pcx " , 22 , 32 , 10 , 20 , 300 , 200 } , // level 22
{ " neptun01h.pcx " , 23 , 33 , 10 , 20 , 300 , 200 } , // level 23
{ " neptun01h.pcx " , 24 , 34 , 10 , 20 , 300 , 200 } , // level 24
{ " pluto01h.pcx " , 25 , 35 , 10 , 20 , 300 , 200 } , // level 25
{ " pluto01h.pcx " , 26 , 36 , 10 , 20 , 300 , 200 } , // level 26
{ " pluto01h.pcx " , 27 , 37 , 10 , 20 , 300 , 200 } , // level 27
{ " aster01h.pcx " , - 1 , 38 , 10 , 90 , 300 , 200 } , // secret level -1
{ " aster01h.pcx " , - 2 , 39 , 10 , 90 , 300 , 200 } , // secret level -2
{ " aster01h.pcx " , - 3 , 40 , 10 , 90 , 300 , 200 } , // secret level -3
{ " end01h.pcx " , ENDING_LEVEL_NUM_OEMSHARE , 1 , 23 , 40 , 320 , 200 } , // OEM and shareware end
{ " end02h.pcx " , ENDING_LEVEL_NUM_REGISTER , 1 , 5 , 5 , 300 , 200 } , // registered end
{ " end01h.pcx " , ENDING_LEVEL_NUM_REGISTER , 2 , 23 , 40 , 320 , 200 } , // registered end
{ " end03h.pcx " , ENDING_LEVEL_NUM_REGISTER , 3 , 5 , 5 , 300 , 200 } , // registered end
2006-03-20 16:43:15 +00:00
} ;
2006-03-27 15:23:53 +00:00
# define MAX_BRIEFING_SCREEN (sizeof(Briefing_screens) / sizeof(Briefing_screens[0]))
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
typedef struct msgstream
2006-03-20 16:43:15 +00:00
{
2010-03-09 02:41:34 +00:00
int x ;
int y ;
int color ;
int ch ;
} __pack__ msgstream ;
2006-03-20 16:43:15 +00:00
2010-03-09 02:41:34 +00:00
typedef struct briefing
2006-03-20 16:43:15 +00:00
{
2010-03-09 04:59:14 +00:00
short level_num ;
short cur_screen ;
2010-03-10 08:43:47 +00:00
briefing_screen * screen ;
2010-03-09 02:41:34 +00:00
grs_bitmap background ;
char background_name [ 16 ] ;
char * text ;
2010-03-09 04:59:14 +00:00
char * message ;
2010-03-09 02:41:34 +00:00
int text_x , text_y ;
msgstream messagestream [ 2048 ] ;
2010-03-10 08:43:47 +00:00
int streamcount ;
short tab_stop ;
ubyte flashing_cursor ;
ubyte new_page ;
2010-03-18 04:31:47 +00:00
int new_screen ;
fix start_time ;
fix delay_count ;
2010-03-10 08:43:47 +00:00
int robot_num ;
2010-03-09 02:41:34 +00:00
grs_canvas * robot_canv ;
vms_angvec robot_angles ;
char bitmap_name [ 32 ] ;
2010-03-10 08:43:47 +00:00
grs_bitmap guy_bitmap ;
sbyte guy_bitmap_show ;
2010-03-09 02:41:34 +00:00
sbyte door_dir , door_div_count , animating_bitmap_type ;
2010-03-10 08:43:47 +00:00
sbyte prev_ch ;
2010-03-09 02:41:34 +00:00
} briefing ;
2010-03-09 04:59:14 +00:00
void briefing_init ( briefing * br , short level_num )
2010-03-09 02:41:34 +00:00
{
2010-03-09 04:59:14 +00:00
br - > level_num = level_num ;
2010-03-18 04:31:47 +00:00
if ( br - > level_num = = 1 )
br - > level_num = 0 ; // for start of game stuff
2010-03-09 04:59:14 +00:00
br - > cur_screen = 0 ;
2010-03-18 04:31:47 +00:00
br - > screen = NULL ;
gr_init_bitmap_data ( & br - > background ) ;
2010-03-25 23:37:19 +00:00
strncpy ( br - > background_name , DEFAULT_BRIEFING_BKG , sizeof ( br - > background_name ) ) ;
2010-03-09 02:41:34 +00:00
br - > robot_canv = NULL ;
br - > bitmap_name [ 0 ] = ' \0 ' ;
br - > door_dir = 1 ;
br - > door_div_count = 0 ;
br - > animating_bitmap_type = 0 ;
2006-03-20 16:43:15 +00:00
}
2010-03-18 04:31:47 +00:00
//-----------------------------------------------------------------------------
// Load Descent briefing text.
int load_screen_text ( char * filename , char * * buf )
{
CFILE * tfile ;
CFILE * ifile ;
int len ;
int have_binary = 0 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( ( tfile = cfopen ( filename , " rb " ) ) = = NULL ) {
char nfilename [ 30 ] , * ptr ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
strcpy ( nfilename , filename ) ;
if ( ( ptr = strrchr ( nfilename , ' . ' ) ) )
* ptr = ' \0 ' ;
strcat ( nfilename , " .txb " ) ;
if ( ( ifile = cfopen ( nfilename , " rb " ) ) = = NULL ) {
return ( 0 ) ;
//Error("Cannot open file %s or %s", filename, nfilename);
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
have_binary = 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
len = cfilelength ( ifile ) ;
MALLOC ( * buf , char , len + 1 ) ;
cfread ( * buf , 1 , len , ifile ) ;
cfclose ( ifile ) ;
} else {
len = cfilelength ( tfile ) ;
MALLOC ( * buf , char , len + 1 ) ;
cfread ( * buf , 1 , len , tfile ) ;
cfclose ( tfile ) ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( have_binary )
decode_text ( * buf , len ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
* ( * buf + len ) = ' \0 ' ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return ( 1 ) ;
}
int get_message_num ( char * * message )
{
int num = 0 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( strlen ( * message ) > 0 & & * * message = = ' ' )
( * message ) + + ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( strlen ( * message ) > 0 & & ( * * message > = ' 0 ' ) & & ( * * message < = ' 9 ' ) ) {
num = 10 * num + * * message - ' 0 ' ;
( * message ) + + ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( strlen ( * message ) > 0 & & * ( * message ) + + ! = 10 ) // Get and drop eoln
;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return num ;
}
void get_message_name ( char * * message , char * result )
{
while ( strlen ( * message ) > 0 & & * * message = = ' ' )
( * message ) + + ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( strlen ( * message ) > 0 & & ( * * message ! = ' ' ) & & ( * * message ! = 10 ) ) {
if ( * * message ! = ' \n ' )
* result + + = * * message ;
( * message ) + + ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( * * message ! = 10 )
while ( strlen ( * message ) > 0 & & * ( * message ) + + ! = 10 ) // Get and drop eoln
;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
* result = 0 ;
}
// Return a pointer to the start of text for screen #screen_num.
char * get_briefing_message ( briefing * br , int screen_num )
{
char * tptr = br - > text ;
int cur_screen = 0 ;
int ch ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
Assert ( screen_num > = 0 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( ( * tptr ! = 0 ) & & ( screen_num ! = cur_screen ) ) {
ch = * tptr + + ;
if ( ch = = ' $ ' ) {
ch = * tptr + + ;
if ( ch = = ' S ' )
cur_screen = get_message_num ( & tptr ) ;
}
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( screen_num ! = cur_screen )
return ( NULL ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return tptr ;
}
2010-03-09 02:41:34 +00:00
void init_char_pos ( briefing * br , int x , int y )
{
br - > text_x = x ;
br - > text_y = y ;
}
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
// Make sure the text stays on the screen
// Return 1 if new page required
// 0 otherwise
int check_text_pos ( briefing * br )
{
if ( br - > text_x > br - > screen - > text_ulx + br - > screen - > text_width )
{
br - > text_x = br - > screen - > text_ulx ;
br - > text_y + = br - > screen - > text_uly ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > text_y > br - > screen - > text_uly + br - > screen - > text_height )
{
br - > new_page = 1 ;
return 1 ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return 0 ;
}
void put_char_delay ( briefing * br , int ch )
{
char str [ ] = { ch , ' \0 ' } ;
int w , h , aw ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > delay_count & & ( timer_get_fixed_seconds ( ) < br - > start_time + br - > delay_count ) )
{
br - > message - - ; // Go back to same character
return ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
br - > messagestream [ br - > streamcount ] . x = br - > text_x ;
br - > messagestream [ br - > streamcount ] . y = br - > text_y ;
br - > messagestream [ br - > streamcount ] . color = Briefing_text_colors [ Current_color ] ;
br - > messagestream [ br - > streamcount ] . ch = ch ;
br - > streamcount + + ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
br - > prev_ch = ch ;
gr_get_string_size ( str , & w , & h , & aw ) ;
br - > text_x + = w ;
br - > start_time = timer_get_fixed_seconds ( ) ;
}
void init_spinning_robot ( briefing * br ) ;
int load_briefing_screen ( briefing * br , char * fname ) ;
// Process a character for the briefing,
// including special characters preceded by a '$'.
// Return 1 when page is finished, 0 otherwise
int briefing_process_char ( briefing * br )
{
int ch ;
2010-06-19 16:24:34 +00:00
2010-06-21 21:43:10 +00:00
gr_set_curfont ( GAME_FONT ) ;
2010-03-18 04:31:47 +00:00
ch = * br - > message + + ;
if ( ch = = ' $ ' ) {
ch = * br - > message + + ;
if ( ch = = ' C ' ) {
Current_color = get_message_num ( & br - > message ) - 1 ;
2010-07-19 17:30:25 +00:00
if ( Current_color < 0 )
Current_color = 0 ;
else if ( Current_color > MAX_BRIEFING_COLORS - 1 )
Current_color = MAX_BRIEFING_COLORS - 1 ;
2010-03-18 04:31:47 +00:00
br - > prev_ch = 10 ;
} else if ( ch = = ' F ' ) { // toggle flashing cursor
br - > flashing_cursor = ! br - > flashing_cursor ;
br - > prev_ch = 10 ;
while ( * br - > message + + ! = 10 )
;
} else if ( ch = = ' T ' ) {
br - > tab_stop = get_message_num ( & br - > message ) ;
2010-07-15 09:22:33 +00:00
br - > tab_stop * = FSPACX ( 1 + HIRESMODE ) ;
2010-03-18 04:31:47 +00:00
br - > prev_ch = 10 ; // read to eoln
} else if ( ch = = ' R ' ) {
if ( br - > robot_canv ! = NULL )
{
d_free ( br - > robot_canv ) ;
br - > robot_canv = NULL ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
init_spinning_robot ( br ) ;
br - > robot_num = get_message_num ( & br - > message ) ;
while ( * br - > message + + ! = 10 )
;
br - > prev_ch = 10 ; // read to eoln
} else if ( ch = = ' N ' ) {
if ( br - > robot_canv ! = NULL )
{
d_free ( br - > robot_canv ) ;
br - > robot_canv = NULL ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
get_message_name ( & br - > message , br - > bitmap_name ) ;
strcat ( br - > bitmap_name , " #0 " ) ;
br - > animating_bitmap_type = 0 ;
br - > prev_ch = 10 ;
} else if ( ch = = ' O ' ) {
if ( br - > robot_canv ! = NULL )
{
d_free ( br - > robot_canv ) ;
br - > robot_canv = NULL ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
get_message_name ( & br - > message , br - > bitmap_name ) ;
strcat ( br - > bitmap_name , " #0 " ) ;
br - > animating_bitmap_type = 1 ;
br - > prev_ch = 10 ;
} else if ( ch = = ' B ' ) {
char bitmap_name [ 32 ] ;
ubyte temp_palette [ 768 ] ;
int iff_error ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > robot_canv ! = NULL )
{
d_free ( br - > robot_canv ) ;
br - > robot_canv = NULL ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
get_message_name ( & br - > message , bitmap_name ) ;
strcat ( bitmap_name , " .bbm " ) ;
gr_init_bitmap_data ( & br - > guy_bitmap ) ;
iff_error = iff_read_bitmap ( bitmap_name , & br - > guy_bitmap , BM_LINEAR , temp_palette ) ;
Assert ( iff_error = = IFF_NO_ERROR ) ;
gr_remap_bitmap_good ( & br - > guy_bitmap , temp_palette , - 1 , - 1 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
br - > guy_bitmap_show = 1 ;
br - > prev_ch = 10 ;
} else if ( ch = = ' S ' ) {
br - > new_screen = 1 ;
return 1 ;
} else if ( ch = = ' P ' ) { // New page.
br - > new_page = 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( * br - > message ! = 10 ) {
br - > message + + ; // drop carriage return after special escape sequence
}
br - > message + + ;
br - > prev_ch = 10 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return 1 ;
} else if ( ch = = ' $ ' | | ch = = ' ; ' ) // Print a $/;
put_char_delay ( br , ch ) ;
} else if ( ch = = ' \t ' ) { // Tab
if ( br - > text_x - br - > screen - > text_ulx < br - > tab_stop )
br - > text_x = br - > screen - > text_ulx + br - > tab_stop ;
} else if ( ( ch = = ' ; ' ) & & ( br - > prev_ch = = 10 ) ) {
while ( * br - > message + + ! = 10 )
;
br - > prev_ch = 10 ;
} else if ( ch = = ' \\ ' ) {
br - > prev_ch = ch ;
} else if ( ch = = 10 ) {
if ( br - > prev_ch ! = ' \\ ' ) {
br - > prev_ch = ch ;
br - > text_y + = FSPACY ( 5 ) + FSPACY ( 5 ) * 3 / 5 ;
br - > text_x = br - > screen - > text_ulx ;
if ( br - > text_y > br - > screen - > text_uly + br - > screen - > text_height ) {
load_briefing_screen ( br , Briefing_screens [ br - > cur_screen ] . bs_name ) ;
br - > text_x = br - > screen - > text_ulx ;
br - > text_y = br - > screen - > text_uly ;
}
} else {
if ( ch = = 13 ) //Can this happen? Above says ch==10
Int3 ( ) ;
br - > prev_ch = ch ;
}
} else
put_char_delay ( br , ch ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return 0 ;
}
void set_briefing_fontcolor ( )
{
Briefing_text_colors [ 0 ] = gr_find_closest_color_current ( 0 , 40 , 0 ) ;
Briefing_text_colors [ 1 ] = gr_find_closest_color_current ( 40 , 33 , 35 ) ;
Briefing_text_colors [ 2 ] = gr_find_closest_color_current ( 8 , 31 , 54 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
//green
Briefing_text_colors [ 0 ] = gr_find_closest_color_current ( 0 , 54 , 0 ) ;
//white
Briefing_text_colors [ 1 ] = gr_find_closest_color_current ( 42 , 38 , 32 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
//Begin D1X addition
//red
Briefing_text_colors [ 2 ] = gr_find_closest_color_current ( 63 , 0 , 0 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
//blue
Briefing_text_colors [ 3 ] = gr_find_closest_color_current ( 0 , 0 , 54 ) ;
//gray
Briefing_text_colors [ 4 ] = gr_find_closest_color_current ( 14 , 14 , 14 ) ;
//yellow
Briefing_text_colors [ 5 ] = gr_find_closest_color_current ( 54 , 54 , 0 ) ;
//purple
Briefing_text_colors [ 6 ] = gr_find_closest_color_current ( 0 , 54 , 54 ) ;
//End D1X addition
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
Erase_color = gr_find_closest_color_current ( 0 , 0 , 0 ) ;
}
void redraw_messagestream ( msgstream * stream , int count )
{
char msgbuf [ 2 ] ;
int i ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
for ( i = 0 ; i < count ; i + + ) {
msgbuf [ 0 ] = stream [ i ] . ch ;
msgbuf [ 1 ] = 0 ;
if ( stream [ i - 1 ] . color ! = stream [ i ] . color )
gr_set_fontcolor ( stream [ i ] . color , - 1 ) ;
gr_printf ( stream [ i ] . x + 1 , stream [ i ] . y , " %s " , msgbuf ) ;
}
}
void flash_cursor ( briefing * br , int cursor_flag )
{
if ( cursor_flag = = 0 )
return ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( ( timer_get_fixed_seconds ( ) % ( F1_0 / 2 ) ) > ( F1_0 / 4 ) )
gr_set_fontcolor ( Briefing_text_colors [ Current_color ] , - 1 ) ;
else
gr_set_fontcolor ( Erase_color , - 1 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
gr_printf ( br - > text_x , br - > text_y , " _ " ) ;
}
2010-03-01 07:27:51 +00:00
# define EXIT_DOOR_MAX 14
# define OTHER_THING_MAX 10 // Adam: This is the number of frames in your new animating thing.
# define DOOR_DIV_INIT 6
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
//-----------------------------------------------------------------------------
2010-03-09 02:41:34 +00:00
void show_animated_bitmap ( briefing * br )
2006-03-20 16:43:15 +00:00
{
2010-03-09 02:41:34 +00:00
grs_canvas * curcanv_save , * bitmap_canv = 0 ;
2006-03-20 16:43:15 +00:00
grs_bitmap * bitmap_ptr ;
2010-06-19 16:24:34 +00:00
float scale = 1.0 ;
if ( ( ( float ) SWIDTH / 320 ) < ( ( float ) SHEIGHT / 200 ) )
scale = ( ( float ) SWIDTH / 320 ) ;
else
scale = ( ( float ) SHEIGHT / 200 ) ;
2006-03-20 16:43:15 +00:00
2006-03-27 15:23:53 +00:00
// Only plot every nth frame.
2010-03-09 02:41:34 +00:00
if ( br - > door_div_count ) {
if ( br - > bitmap_name [ 0 ] ! = 0 ) {
2007-03-22 11:32:22 +00:00
bitmap_index bi ;
2010-03-09 02:41:34 +00:00
bi = piggy_find_bitmap ( br - > bitmap_name ) ;
2007-03-22 11:32:22 +00:00
bitmap_ptr = & GameBitmaps [ bi . index ] ;
PIGGY_PAGE_IN ( bi ) ;
2008-03-20 23:23:46 +00:00
# ifdef OGL
2010-06-19 16:24:34 +00:00
ogl_ubitmapm_cs ( rescale_x ( 220 ) , rescale_y ( 45 ) , bitmap_ptr - > bm_w * scale , bitmap_ptr - > bm_h * scale , bitmap_ptr , 255 , F1_0 ) ;
2008-03-20 23:23:46 +00:00
# else
gr_bitmapm ( rescale_x ( 220 ) , rescale_y ( 45 ) , bitmap_ptr ) ;
2007-03-22 11:32:22 +00:00
# endif
2008-03-20 23:23:46 +00:00
}
2010-03-09 02:41:34 +00:00
br - > door_div_count - - ;
2006-03-20 16:43:15 +00:00
return ;
}
2010-03-09 02:41:34 +00:00
br - > door_div_count = DOOR_DIV_INIT ;
2006-03-20 16:43:15 +00:00
2010-03-09 02:41:34 +00:00
if ( br - > bitmap_name [ 0 ] ! = 0 ) {
2006-03-20 16:43:15 +00:00
char * pound_signp ;
int num , dig1 , dig2 ;
2008-04-24 14:27:54 +00:00
bitmap_index bi ;
2006-03-20 16:43:15 +00:00
2010-03-09 02:41:34 +00:00
switch ( br - > animating_bitmap_type ) {
2007-03-22 11:32:22 +00:00
case 0 : bitmap_canv = gr_create_sub_canvas ( grd_curcanv , rescale_x ( 220 ) , rescale_y ( 45 ) , 64 , 64 ) ; break ;
case 1 : bitmap_canv = gr_create_sub_canvas ( grd_curcanv , rescale_x ( 220 ) , rescale_y ( 45 ) , 94 , 94 ) ; break ; // Adam: Change here for your new animating bitmap thing. 94, 94 are bitmap size.
2010-03-09 02:41:34 +00:00
default : Int3 ( ) ; // Impossible, illegal value for br->animating_bitmap_type
2006-03-27 15:23:53 +00:00
}
2006-03-20 16:43:15 +00:00
curcanv_save = grd_curcanv ;
grd_curcanv = bitmap_canv ;
2010-03-09 02:41:34 +00:00
pound_signp = strchr ( br - > bitmap_name , ' # ' ) ;
2006-03-20 16:43:15 +00:00
Assert ( pound_signp ! = NULL ) ;
dig1 = * ( pound_signp + 1 ) ;
dig2 = * ( pound_signp + 2 ) ;
if ( dig2 = = 0 )
num = dig1 - ' 0 ' ;
else
num = ( dig1 - ' 0 ' ) * 10 + ( dig2 - ' 0 ' ) ;
2010-03-09 02:41:34 +00:00
switch ( br - > animating_bitmap_type ) {
2006-03-20 16:43:15 +00:00
case 0 :
2010-03-09 02:41:34 +00:00
num + = br - > door_dir ;
2006-03-20 16:43:15 +00:00
if ( num > EXIT_DOOR_MAX ) {
num = EXIT_DOOR_MAX ;
2010-03-09 02:41:34 +00:00
br - > door_dir = - 1 ;
2006-03-20 16:43:15 +00:00
} else if ( num < 0 ) {
num = 0 ;
2010-03-09 02:41:34 +00:00
br - > door_dir = 1 ;
2006-03-20 16:43:15 +00:00
}
break ;
case 1 :
num + + ;
if ( num > OTHER_THING_MAX )
num = 0 ;
break ;
}
Assert ( num < 100 ) ;
if ( num > = 10 ) {
* ( pound_signp + 1 ) = ( num / 10 ) + ' 0 ' ;
* ( pound_signp + 2 ) = ( num % 10 ) + ' 0 ' ;
* ( pound_signp + 3 ) = 0 ;
} else {
* ( pound_signp + 1 ) = ( num % 10 ) + ' 0 ' ;
* ( pound_signp + 2 ) = 0 ;
}
2010-03-09 02:41:34 +00:00
bi = piggy_find_bitmap ( br - > bitmap_name ) ;
2006-03-27 15:23:53 +00:00
bitmap_ptr = & GameBitmaps [ bi . index ] ;
PIGGY_PAGE_IN ( bi ) ;
2006-10-07 21:43:55 +00:00
# ifdef OGL
2010-06-19 16:24:34 +00:00
ogl_ubitmapm_cs ( 0 , 0 , bitmap_ptr - > bm_w * scale , bitmap_ptr - > bm_h * scale , bitmap_ptr , 255 , F1_0 ) ;
2006-10-07 21:43:55 +00:00
# else
2006-03-20 16:43:15 +00:00
gr_bitmapm ( 0 , 0 , bitmap_ptr ) ;
2006-10-07 21:43:55 +00:00
# endif
2006-03-20 16:43:15 +00:00
grd_curcanv = curcanv_save ;
2008-01-23 17:25:09 +00:00
d_free ( bitmap_canv ) ;
2006-03-20 16:43:15 +00:00
2010-03-09 02:41:34 +00:00
switch ( br - > animating_bitmap_type ) {
2006-03-20 16:43:15 +00:00
case 0 :
if ( num = = EXIT_DOOR_MAX ) {
2010-03-09 02:41:34 +00:00
br - > door_dir = - 1 ;
br - > door_div_count = 64 ;
2006-03-20 16:43:15 +00:00
} else if ( num = = 0 ) {
2010-03-09 02:41:34 +00:00
br - > door_dir = 1 ;
br - > door_div_count = 64 ;
2006-03-20 16:43:15 +00:00
}
break ;
case 1 :
break ;
}
}
}
2010-03-01 07:27:51 +00:00
//-----------------------------------------------------------------------------
2006-03-20 16:43:15 +00:00
void show_briefing_bitmap ( grs_bitmap * bmp )
{
grs_canvas * curcanv_save , * bitmap_canv ;
2010-06-19 16:24:34 +00:00
float scale = 1.0 ;
2008-03-25 12:25:19 +00:00
2010-03-25 23:37:19 +00:00
bitmap_canv = gr_create_sub_canvas ( grd_curcanv , rescale_x ( 220 ) , rescale_y ( 55 ) , ( bmp - > bm_w * ( SWIDTH / ( HIRESMODE ? 640 : 320 ) ) ) , ( bmp - > bm_h * ( SHEIGHT / ( HIRESMODE ? 480 : 200 ) ) ) ) ;
2007-03-22 11:32:22 +00:00
curcanv_save = grd_curcanv ;
2010-03-01 07:27:51 +00:00
gr_set_current_canvas ( bitmap_canv ) ;
2010-06-19 16:24:34 +00:00
if ( ( ( float ) SWIDTH / ( HIRESMODE ? 640 : 320 ) ) < ( ( float ) SHEIGHT / ( HIRESMODE ? 480 : 200 ) ) )
scale = ( ( float ) SWIDTH / ( HIRESMODE ? 640 : 320 ) ) ;
else
scale = ( ( float ) SHEIGHT / ( HIRESMODE ? 480 : 200 ) ) ;
2008-03-25 12:25:19 +00:00
# ifdef OGL
2010-06-19 16:24:34 +00:00
ogl_ubitmapm_cs ( 0 , 0 , bmp - > bm_w * scale , bmp - > bm_h * scale , bmp , 255 , F1_0 ) ;
2008-03-25 12:25:19 +00:00
# else
2007-03-22 11:32:22 +00:00
gr_bitmapm ( 0 , 0 , bmp ) ;
2008-03-25 12:25:19 +00:00
# endif
2010-03-01 07:27:51 +00:00
gr_set_current_canvas ( curcanv_save ) ;
2008-01-23 17:25:09 +00:00
d_free ( bitmap_canv ) ;
2006-03-20 16:43:15 +00:00
}
2010-03-01 07:27:51 +00:00
//-----------------------------------------------------------------------------
2010-03-18 04:31:47 +00:00
void init_spinning_robot ( briefing * br ) //(int x,int y,int w,int h)
{
int x = rescale_x ( 138 ) ;
int y = rescale_y ( 55 ) ;
int w = rescale_x ( 166 ) ;
int h = rescale_y ( 138 ) ;
br - > robot_canv = gr_create_sub_canvas ( grd_curcanv , x , y , w , h ) ;
}
2010-03-09 02:41:34 +00:00
void show_spinning_robot_frame ( briefing * br , int robot_num )
2006-03-20 16:43:15 +00:00
{
grs_canvas * curcanv_save ;
if ( robot_num ! = - 1 ) {
2010-03-26 21:27:55 +00:00
br - > robot_angles . p = br - > robot_angles . b = 0 ;
2010-03-09 02:41:34 +00:00
br - > robot_angles . h + = 150 ;
2010-03-01 07:27:51 +00:00
2006-03-20 16:43:15 +00:00
curcanv_save = grd_curcanv ;
2010-03-09 02:41:34 +00:00
grd_curcanv = br - > robot_canv ;
2006-03-20 16:43:15 +00:00
Assert ( Robot_info [ robot_num ] . model_num ! = - 1 ) ;
2010-03-09 02:41:34 +00:00
draw_model_picture ( Robot_info [ robot_num ] . model_num , & br - > robot_angles ) ;
2006-03-20 16:43:15 +00:00
grd_curcanv = curcanv_save ;
}
}
2010-03-01 07:27:51 +00:00
//-----------------------------------------------------------------------------
2010-03-18 04:31:47 +00:00
# define KEY_DELAY_DEFAULT ((F1_0*20) / 1000)
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
void init_new_page ( briefing * br )
{
br - > new_page = 0 ;
br - > robot_num = - 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
load_briefing_screen ( br , br - > background_name ) ;
br - > text_x = br - > screen - > text_ulx ;
br - > text_y = br - > screen - > text_uly ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
br - > streamcount = 0 ;
if ( br - > guy_bitmap_show ) {
gr_free_bitmap_data ( & br - > guy_bitmap ) ;
br - > guy_bitmap_show = 0 ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
br - > start_time = 0 ;
br - > delay_count = KEY_DELAY_DEFAULT ;
2006-03-20 16:43:15 +00:00
}
2010-03-18 04:31:47 +00:00
// -----------------------------------------------------------------------------
2008-07-15 12:50:27 +00:00
ubyte baldguy_cheat = 0 ;
static ubyte bald_guy_cheat_index = 0 ;
char new_baldguy_pcx [ ] = " btexture.xxx " ;
# define BALD_GUY_CHEAT_SIZE 7
# define NEW_END_GUY1 1
# define NEW_END_GUY2 3
2010-06-19 16:24:34 +00:00
ubyte bald_guy_cheat_1 [ BALD_GUY_CHEAT_SIZE ] = { KEY_B ^ 0xF0 ^ 0xab ,
KEY_A ^ 0xE0 ^ 0xab ,
KEY_L ^ 0xD0 ^ 0xab ,
KEY_D ^ 0xC0 ^ 0xab ,
KEY_G ^ 0xB0 ^ 0xab ,
2008-07-15 12:50:27 +00:00
KEY_U ^ 0xA0 ^ 0xab ,
KEY_Y ^ 0x90 ^ 0xab } ;
void bald_guy_cheat ( int key )
{
if ( key = = ( bald_guy_cheat_1 [ bald_guy_cheat_index ] ^ ( 0xf0 - ( bald_guy_cheat_index < < 4 ) ) ^ 0xab ) ) {
bald_guy_cheat_index + + ;
if ( bald_guy_cheat_index = = BALD_GUY_CHEAT_SIZE ) {
baldguy_cheat = 1 ;
bald_guy_cheat_index = 0 ;
}
} else
bald_guy_cheat_index = 0 ;
}
2010-03-18 04:31:47 +00:00
void free_briefing_screen ( briefing * br ) ;
2010-03-30 03:37:29 +00:00
extern void swap_0_255 ( grs_bitmap * bmp ) ;
2010-03-18 04:31:47 +00:00
2008-03-20 23:23:46 +00:00
// loads a briefing screen
2010-03-09 02:41:34 +00:00
int load_briefing_screen ( briefing * br , char * fname )
2006-03-20 16:43:15 +00:00
{
2010-03-01 07:27:51 +00:00
int pcx_error ;
2008-03-25 12:25:19 +00:00
2010-03-18 04:31:47 +00:00
free_briefing_screen ( br ) ;
2008-03-25 12:25:19 +00:00
2010-03-09 02:41:34 +00:00
gr_init_bitmap_data ( & br - > background ) ;
2010-03-25 23:37:19 +00:00
if ( stricmp ( br - > background_name , fname ) )
strncpy ( br - > background_name , fname , sizeof ( br - > background_name ) ) ;
2010-03-01 07:27:51 +00:00
if ( ! stricmp ( fname , " brief02h.pcx " ) & & baldguy_cheat )
2010-03-09 02:41:34 +00:00
if ( bald_guy_load ( new_baldguy_pcx , & br - > background , BM_LINEAR , gr_palette ) = = 0 )
2008-07-15 12:50:27 +00:00
return 0 ;
2010-03-01 07:27:51 +00:00
2010-03-09 02:41:34 +00:00
if ( ( pcx_error = pcx_read_bitmap ( fname , & br - > background , BM_LINEAR , gr_palette ) ) ! = PCX_ERROR_NONE )
2010-03-01 07:27:51 +00:00
Error ( " Error loading briefing screen <%s>, PCX load error: %s (%i) \n " , fname , pcx_errormsg ( pcx_error ) , pcx_error ) ;
2010-06-19 16:24:34 +00:00
2010-03-30 03:37:29 +00:00
// Hack: Make sure black parts of robot are shown black
2010-06-19 16:24:34 +00:00
if ( MacPig & & gr_palette [ 0 ] = = 63 & &
( ! stricmp ( fname , " brief03.pcx " ) | |
2010-03-30 03:37:29 +00:00
! stricmp ( fname , " end01.pcx " ) ) )
{
swap_0_255 ( & br - > background ) ;
gr_palette [ 0 ] = gr_palette [ 1 ] = gr_palette [ 2 ] = 0 ;
gr_palette [ 765 ] = gr_palette [ 766 ] = gr_palette [ 767 ] = 63 ;
}
2006-08-21 23:59:24 +00:00
2010-03-09 02:41:34 +00:00
show_fullscr ( & br - > background ) ;
2007-08-27 23:01:34 +00:00
2007-08-08 12:38:13 +00:00
gr_palette_load ( gr_palette ) ;
set_briefing_fontcolor ( ) ;
2010-03-18 04:31:47 +00:00
MALLOC ( br - > screen , briefing_screen , 1 ) ;
if ( ! br - > screen )
return 0 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
memcpy ( br - > screen , & Briefing_screens [ br - > cur_screen ] , sizeof ( briefing_screen ) ) ;
br - > screen - > text_ulx = rescale_x ( br - > screen - > text_ulx ) ;
br - > screen - > text_uly = rescale_y ( br - > screen - > text_uly ) ;
br - > screen - > text_width = rescale_x ( br - > screen - > text_width ) ;
br - > screen - > text_height = rescale_y ( br - > screen - > text_height ) ;
init_char_pos ( br , br - > screen - > text_ulx , br - > screen - > text_uly ) ;
2010-06-19 16:24:34 +00:00
2010-03-01 07:27:51 +00:00
return 1 ;
2006-03-20 16:43:15 +00:00
}
2010-03-18 04:31:47 +00:00
void free_briefing_screen ( briefing * br )
{
if ( br - > robot_canv ! = NULL )
d_free ( br - > robot_canv ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > screen ! = NULL )
d_free ( br - > screen ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > background . bm_data ! = NULL )
gr_free_bitmap_data ( & br - > background ) ;
}
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
2010-03-18 04:31:47 +00:00
int new_briefing_screen ( briefing * br , int first )
2006-03-20 16:43:15 +00:00
{
2010-03-18 04:31:47 +00:00
br - > new_screen = 0 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( ! first )
br - > cur_screen + + ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
while ( ( br - > cur_screen < MAX_BRIEFING_SCREEN ) & & ( Briefing_screens [ br - > cur_screen ] . level_num ! = br - > level_num ) )
{
br - > cur_screen + + ;
if ( ( br - > cur_screen = = MAX_BRIEFING_SCREEN ) & & ( br - > level_num = = 0 ) )
{
// Showed the pre-game briefing, now show level 1 briefing
br - > level_num + + ;
br - > cur_screen = 0 ;
}
2006-03-20 16:43:15 +00:00
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > cur_screen = = MAX_BRIEFING_SCREEN )
return 0 ; // finished
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
if ( ! load_briefing_screen ( br , Briefing_screens_LH [ br - > cur_screen ] . bs_name ) )
return 0 ;
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
br - > message = get_briefing_message ( br , Briefing_screens [ br - > cur_screen ] . message_num ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > message = = NULL )
return 0 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
Current_color = 0 ;
br - > streamcount = 0 ;
br - > tab_stop = 0 ;
br - > flashing_cursor = 0 ;
br - > new_page = 0 ;
br - > start_time = 0 ;
br - > delay_count = KEY_DELAY_DEFAULT ;
br - > robot_num = - 1 ;
br - > bitmap_name [ 0 ] = 0 ;
br - > guy_bitmap_show = 0 ;
br - > prev_ch = - 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return 1 ;
2006-03-20 16:43:15 +00:00
}
2010-03-18 04:31:47 +00:00
//-----------------------------------------------------------------------------
2006-03-20 16:43:15 +00:00
void title_save_game ( )
{
grs_canvas * save_canv ;
grs_canvas * save_canv_data ;
grs_font * save_font ;
ubyte palette [ 768 ] ;
2010-06-19 16:24:34 +00:00
2006-03-20 16:43:15 +00:00
if ( Next_level_num = = 0 ) return ;
2010-06-19 16:24:34 +00:00
2006-03-20 16:43:15 +00:00
save_canv = grd_curcanv ;
save_font = grd_curcanv - > cv_font ;
2010-06-19 16:24:34 +00:00
2006-03-20 16:43:15 +00:00
save_canv_data = gr_create_canvas ( grd_curcanv - > cv_bitmap . bm_w , grd_curcanv - > cv_bitmap . bm_h ) ;
gr_set_current_canvas ( save_canv_data ) ;
gr_ubitmap ( 0 , 0 , & save_canv - > cv_bitmap ) ;
gr_set_current_canvas ( save_canv ) ;
gr_clear_canvas ( gr_find_closest_color_current ( 0 , 0 , 0 ) ) ;
gr_palette_read ( palette ) ;
gr_palette_load ( gr_palette ) ;
# ifndef SHAREWARE
2010-02-25 03:08:10 +00:00
state_save_all ( 1 , 0 ) ;
2006-03-20 16:43:15 +00:00
# endif
2010-06-19 16:24:34 +00:00
2006-03-20 16:43:15 +00:00
gr_set_current_canvas ( save_canv ) ;
gr_ubitmap ( 0 , 0 , & save_canv_data - > cv_bitmap ) ;
gr_palette_load ( palette ) ;
gr_set_curfont ( save_font ) ;
}
2010-03-01 07:27:51 +00:00
//-----------------------------------------------------------------------------
2010-03-18 04:31:47 +00:00
int briefing_handler ( window * wind , d_event * event , briefing * br )
2006-03-20 16:43:15 +00:00
{
2010-03-18 04:31:47 +00:00
switch ( event - > type )
{
case EVENT_WINDOW_ACTIVATED :
case EVENT_WINDOW_DEACTIVATED :
key_flush ( ) ;
break ;
2010-06-19 16:24:34 +00:00
2010-03-24 07:26:52 +00:00
case EVENT_MOUSE_BUTTON_DOWN :
if ( mouse_get_button ( event ) = = 0 )
{
if ( br - > new_screen )
{
if ( ! new_briefing_screen ( br , 0 ) )
{
window_close ( wind ) ;
return 1 ;
}
}
else if ( br - > new_page )
init_new_page ( br ) ;
else
br - > delay_count = 0 ;
return 1 ;
}
break ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
case EVENT_KEY_COMMAND :
{
int key = ( ( d_event_keycommand * ) event ) - > keycode ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
switch ( key )
{
case KEY_ALTED + KEY_F2 :
title_save_game ( ) ;
return 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
case KEY_ESC :
window_close ( wind ) ;
return 1 ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
case KEY_SPACEBAR :
case KEY_ENTER :
br - > delay_count = 0 ;
// fall through
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
default :
2010-04-02 05:01:08 +00:00
if ( call_default_handler ( event ) )
return 1 ;
else if ( br - > new_screen )
2010-03-18 04:31:47 +00:00
{
if ( ! new_briefing_screen ( br , 0 ) )
{
window_close ( wind ) ;
return 1 ;
}
}
else if ( br - > new_page )
init_new_page ( br ) ;
break ;
}
break ;
}
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
case EVENT_IDLE :
timer_delay2 ( 50 ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( ! ( br - > new_screen | | br - > new_page ) )
while ( ! briefing_process_char ( br ) & & ! br - > delay_count )
2010-03-01 07:27:51 +00:00
{
2010-03-18 04:31:47 +00:00
check_text_pos ( br ) ;
if ( br - > new_page )
break ;
2010-03-01 07:27:51 +00:00
}
2010-03-18 04:31:47 +00:00
check_text_pos ( br ) ;
break ;
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
case EVENT_WINDOW_DRAW :
2010-07-15 09:45:25 +00:00
gr_set_current_canvas ( NULL ) ;
2010-03-24 13:59:42 +00:00
if ( br - > background . bm_data )
show_fullscr ( & br - > background ) ;
2010-03-01 07:27:51 +00:00
2010-03-10 08:43:47 +00:00
if ( br - > guy_bitmap_show )
show_briefing_bitmap ( & br - > guy_bitmap ) ;
2010-03-18 04:31:47 +00:00
if ( br - > bitmap_name [ 0 ] ! = 0 )
show_animated_bitmap ( br ) ;
if ( br - > robot_num ! = - 1 )
show_spinning_robot_frame ( br , br - > robot_num ) ;
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
gr_set_curfont ( GAME_FONT ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
gr_set_fontcolor ( Briefing_text_colors [ Current_color ] , - 1 ) ;
redraw_messagestream ( br - > messagestream , br - > streamcount ) ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
if ( br - > new_page | | br - > new_screen )
2010-03-10 08:43:47 +00:00
flash_cursor ( br , br - > flashing_cursor ) ;
2010-03-18 04:31:47 +00:00
else if ( br - > flashing_cursor )
gr_printf ( br - > text_x , br - > text_y , " _ " ) ;
break ;
2006-03-20 16:43:15 +00:00
2010-03-18 04:31:47 +00:00
case EVENT_WINDOW_CLOSE :
free_briefing_screen ( br ) ;
d_free ( br - > text ) ;
d_free ( br ) ;
break ;
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
default :
break ;
2006-03-20 16:43:15 +00:00
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
return 0 ;
2006-03-20 16:43:15 +00:00
}
2010-03-01 07:27:51 +00:00
void do_briefing_screens ( char * filename , int level_num )
2006-03-20 16:43:15 +00:00
{
2010-03-09 02:41:34 +00:00
briefing * br ;
2010-03-18 04:31:47 +00:00
window * wind ;
2006-03-20 16:43:15 +00:00
2010-03-01 07:27:51 +00:00
if ( ! filename | | ! * filename )
return ;
2010-03-09 02:41:34 +00:00
MALLOC ( br , briefing , 1 ) ;
if ( ! br )
2006-03-20 16:43:15 +00:00
return ;
2010-03-09 04:59:14 +00:00
briefing_init ( br , level_num ) ;
2010-06-19 16:24:34 +00:00
2010-03-09 02:41:34 +00:00
if ( ! load_screen_text ( filename , & br - > text ) )
{
d_free ( br ) ;
return ;
}
2010-06-19 16:24:34 +00:00
2010-03-18 04:31:47 +00:00
wind = window_create ( & grd_curscreen - > sc_canvas , 0 , 0 , SWIDTH , SHEIGHT , ( int ( * ) ( window * , d_event * , void * ) ) briefing_handler , br ) ;
if ( ! wind )
{
d_free ( br - > text ) ;
d_free ( br ) ;
return ;
}
2010-03-09 02:41:34 +00:00
2010-04-05 11:54:23 +00:00
if ( ( songs_is_playing ( ) ! = SONG_BRIEFING ) & & ( songs_is_playing ( ) ! = SONG_ENDGAME ) )
songs_play_song ( SONG_BRIEFING , 1 ) ;
2006-03-20 16:43:15 +00:00
set_screen_mode ( SCREEN_MENU ) ;
gr_set_current_canvas ( NULL ) ;
2010-03-18 04:31:47 +00:00
if ( ! new_briefing_screen ( br , 1 ) )
{
window_close ( wind ) ;
return ;
2006-03-20 16:43:15 +00:00
}
2010-03-18 04:31:47 +00:00
// Stay where we are in the stack frame until briefing done
// Too complicated otherwise
while ( window_exists ( wind ) )
event_process ( ) ;
2006-03-20 16:43:15 +00:00
}
2010-03-25 23:37:19 +00:00
void do_end_briefing_screens ( char * filename )
2006-03-20 16:43:15 +00:00
{
2010-03-25 23:37:19 +00:00
int level_num_screen = Current_level_num , showorder = 0 ;
2010-06-19 16:24:34 +00:00
2010-03-25 23:37:19 +00:00
if ( ! strlen ( filename ) )
return ; // no filename, no ending
2006-03-20 16:43:15 +00:00
2010-03-25 23:37:19 +00:00
if ( stricmp ( filename , BIMD1_ENDING_FILE_OEM ) = = 0 )
2006-03-20 16:43:15 +00:00
{
2010-03-25 23:37:19 +00:00
songs_play_song ( SONG_ENDGAME , 0 ) ;
level_num_screen = ENDING_LEVEL_NUM_OEMSHARE ;
showorder = 1 ;
2006-03-20 16:43:15 +00:00
}
2010-03-25 23:37:19 +00:00
else if ( stricmp ( filename , BIMD1_ENDING_FILE_SHARE ) = = 0 )
2010-03-18 04:31:47 +00:00
{
2010-03-25 23:37:19 +00:00
songs_play_song ( SONG_BRIEFING , 1 ) ;
level_num_screen = ENDING_LEVEL_NUM_OEMSHARE ;
showorder = 1 ;
2010-03-18 04:31:47 +00:00
}
2010-03-25 23:37:19 +00:00
else
2010-03-18 04:31:47 +00:00
{
2010-03-25 23:37:19 +00:00
songs_play_song ( SONG_ENDGAME , 0 ) ;
level_num_screen = ENDING_LEVEL_NUM_REGISTER ;
2010-03-18 04:31:47 +00:00
}
2006-03-20 16:43:15 +00:00
2010-03-25 23:37:19 +00:00
do_briefing_screens ( filename , level_num_screen ) ;
if ( showorder )
show_order_form ( ) ;
2006-03-20 16:43:15 +00:00
}