dxx-rebirth/main/scores.c
Bradley Bell 9bd1ba7c47 This commit was generated by cvs2svn to compensate for changes in r2,
which included commits to RCS files with non-trunk default branches.
2001-01-19 03:30:16 +00:00

486 lines
12 KiB
C

/*
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
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
*/
#include <conf.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "error.h"
#include "pstypes.h"
#include "gr.h"
#include "mono.h"
#include "key.h"
#include "palette.h"
#include "game.h"
#include "gamefont.h"
#include "u_mem.h"
#include "songs.h"
#include "newmenu.h"
#include "menu.h"
#include "player.h"
#include "screens.h"
#include "gamefont.h"
#include "mouse.h"
#include "joy.h"
#include "timer.h"
#include "text.h"
#include "d_io.h"
#include "strutil.h"
#define VERSION_NUMBER 1
#define SCORES_FILENAME "DESCENT.HI"
#define COOL_MESSAGE_LEN 50
#define MAX_HIGH_SCORES 10
typedef struct stats_info {
char name[CALLSIGN_LEN+1];
int score;
byte starting_level;
byte ending_level;
byte diff_level;
short kill_ratio; // 0-100
short hostage_ratio; //
int seconds; // How long it took in seconds...
} stats_info;
typedef struct all_scores {
char signature[3]; // DHS
byte version; // version
char cool_saying[COOL_MESSAGE_LEN];
stats_info stats[MAX_HIGH_SCORES];
} all_scores;
static all_scores Scores;
stats_info Last_game;
char scores_filename[128];
#define XX (7)
#define YY (-3)
#define LHX(x) ((x)*(MenuHires?2:1))
#define LHY(y) ((y)*(MenuHires?2.4:1))
void scores_view(int citem);
char * get_scores_filename()
{
#ifndef RELEASE
// Only use the MINER variable for internal developement
char *p;
p=getenv( "MINER" );
if (p) {
sprintf( scores_filename, "%s\\game\\%s", p, SCORES_FILENAME );
Assert(strlen(scores_filename) < 128);
return scores_filename;
}
#endif
#ifdef MACINTOSH // put the high scores into the data folder
sprintf( scores_filename, ":Data:%s", SCORES_FILENAME );
#else
sprintf( scores_filename, "%s", SCORES_FILENAME );
#endif
return scores_filename;
}
#ifndef D2_OEM
#define COOL_SAYING TXT_REGISTER_DESCENT
#else
#define COOL_SAYING "Get all 30 levels of D2 from 1-800-INTERPLAY"
#endif
void scores_read()
{
FILE * fp;
int fsize;
// clear score array...
memset( &Scores, 0, sizeof(all_scores) );
fp = fopen( get_scores_filename(), "rb" );
if (fp==NULL) {
int i;
// No error message needed, code will work without a scores file
sprintf( Scores.cool_saying, COOL_SAYING );
sprintf( Scores.stats[0].name, "Parallax" );
sprintf( Scores.stats[1].name, "Matt" );
sprintf( Scores.stats[2].name, "Mike" );
sprintf( Scores.stats[3].name, "Adam" );
sprintf( Scores.stats[4].name, "Mark" );
sprintf( Scores.stats[5].name, "Jasen" );
sprintf( Scores.stats[6].name, "Samir" );
sprintf( Scores.stats[7].name, "Doug" );
sprintf( Scores.stats[8].name, "Dan" );
sprintf( Scores.stats[9].name, "Jason" );
for (i=0; i<10; i++)
Scores.stats[i].score = (10-i)*1000;
return;
}
fsize = filelength( fileno( fp ));
if ( fsize != sizeof(all_scores) ) {
fclose(fp);
return;
}
// Read 'em in...
fread( &Scores, sizeof(all_scores),1, fp );
fclose(fp);
if ( (Scores.version!=VERSION_NUMBER)||(Scores.signature[0]!='D')||(Scores.signature[1]!='H')||(Scores.signature[2]!='S') ) {
memset( &Scores, 0, sizeof(all_scores) );
return;
}
}
void scores_write()
{
FILE * fp;
fp = fopen( get_scores_filename(), "wb" );
if (fp==NULL) {
nm_messagebox( TXT_WARNING, 1, TXT_OK, "%s\n'%s'", TXT_UNABLE_TO_OPEN, get_scores_filename() );
return;
}
Scores.signature[0]='D';
Scores.signature[1]='H';
Scores.signature[2]='S';
Scores.version = VERSION_NUMBER;
fwrite( &Scores,sizeof(all_scores),1, fp );
fclose(fp);
}
void int_to_string( int number, char *dest )
{
int i,l,c;
char buffer[20],*p;
sprintf( buffer, "%d", number );
l = strlen(buffer);
if (l<=3) {
// Don't bother with less than 3 digits
sprintf( dest, "%d", number );
return;
}
c = 0;
p=dest;
for (i=l-1; i>=0; i-- ) {
if (c==3) {
*p++=',';
c = 0;
}
c++;
*p++ = buffer[i];
}
*p++ = '\0';
strrev(dest);
}
void scores_fill_struct(stats_info * stats)
{
strcpy( stats->name, Players[Player_num].callsign );
stats->score = Players[Player_num].score;
stats->ending_level = Players[Player_num].level;
if (Players[Player_num].num_robots_total > 0 )
stats->kill_ratio = (Players[Player_num].num_kills_total*100)/Players[Player_num].num_robots_total;
else
stats->kill_ratio = 0;
if (Players[Player_num].hostages_total > 0 )
stats->hostage_ratio = (Players[Player_num].hostages_rescued_total*100)/Players[Player_num].hostages_total;
else
stats->hostage_ratio = 0;
stats->seconds = f2i(Players[Player_num].time_total)+(Players[Player_num].hours_total*3600);
stats->diff_level = Difficulty_level;
stats->starting_level = Players[Player_num].starting_level;
}
//char * score_placement[10] = { TXT_1ST, TXT_2ND, TXT_3RD, TXT_4TH, TXT_5TH, TXT_6TH, TXT_7TH, TXT_8TH, TXT_9TH, TXT_10TH };
void scores_maybe_add_player(int abort_flag)
{
char text1[COOL_MESSAGE_LEN+10];
newmenu_item m[10];
int i,position;
#ifdef APPLE_DEMO // no high scores in apple oem version
return;
#endif
if ((Game_mode & GM_MULTI) && !(Game_mode & GM_MULTI_COOP))
return;
scores_read();
position = MAX_HIGH_SCORES;
for (i=0; i<MAX_HIGH_SCORES; i++ ) {
if ( Players[Player_num].score > Scores.stats[i].score ) {
position = i;
break;
}
}
if ( position == MAX_HIGH_SCORES ) {
if (abort_flag)
return;
scores_fill_struct( &Last_game );
} else {
//-- if ( Difficulty_level < 1 ) {
//-- nm_messagebox( "GRADUATION TIME!", 1, "Ok", "If you would had been\nplaying at a higher difficulty\nlevel, you would have placed\n#%d on the high score list.", position+1 );
//-- return;
//-- }
if ( position==0 ) {
strcpy( text1, "" );
m[0].type = NM_TYPE_TEXT; m[0].text = TXT_COOL_SAYING;
m[1].type = NM_TYPE_INPUT; m[1].text = text1; m[1].text_len = COOL_MESSAGE_LEN-5;
newmenu_do( TXT_HIGH_SCORE, TXT_YOU_PLACED_1ST, 2, m, NULL );
strncpy( Scores.cool_saying, text1, COOL_MESSAGE_LEN );
if (strlen(Scores.cool_saying)<1)
sprintf( Scores.cool_saying, "No Comment" );
} else {
nm_messagebox( TXT_HIGH_SCORE, 1, TXT_OK, "%s %s!", TXT_YOU_PLACED, *(&TXT_1ST + position) );
}
// move everyone down...
for ( i=MAX_HIGH_SCORES-1; i>position; i-- ) {
Scores.stats[i] = Scores.stats[i-1];
}
scores_fill_struct( &Scores.stats[position] );
scores_write();
}
scores_view(position);
}
void scores_rprintf(int x, int y, char * format, ... )
{
va_list args;
char buffer[128];
int w, h, aw;
char *p;
va_start(args, format );
vsprintf(buffer,format,args);
va_end(args);
//replace the digit '1' with special wider 1
for (p=buffer;*p;p++)
if (*p=='1') *p=132;
gr_get_string_size(buffer, &w, &h, &aw );
gr_string( LHX(x)-w, LHY(y), buffer );
}
void scores_draw_item( int i, stats_info * stats )
{
char buffer[20];
int y;
WIN(DDGRLOCK(dd_grd_curcanv));
y = 7+70+i*9;
if (i==0) y -= 8;
if ( i==MAX_HIGH_SCORES ) {
y += 8;
//scores_rprintf( 17+33+XX, y+YY, "" );
} else {
scores_rprintf( 17+33+XX, y+YY, "%d.", i+1 );
}
if (strlen(stats->name)==0) {
gr_printf( LHX(26+33+XX), LHY(y+YY), TXT_EMPTY );
WIN(DDGRUNLOCK(dd_grd_curcanv));
return;
}
gr_printf( LHX(26+33+XX), LHY(y+YY), "%s", stats->name );
int_to_string(stats->score, buffer);
scores_rprintf( 109+33+XX, y+YY, "%s", buffer );
gr_printf( LHX(125+33+XX), LHY(y+YY), "%s", MENU_DIFFICULTY_TEXT(stats->diff_level) );
if ( (stats->starting_level > 0 ) && (stats->ending_level > 0 ))
scores_rprintf( 192+33+XX, y+YY, "%d-%d", stats->starting_level, stats->ending_level );
else if ( (stats->starting_level < 0 ) && (stats->ending_level > 0 ))
scores_rprintf( 192+33+XX, y+YY, "S%d-%d", -stats->starting_level, stats->ending_level );
else if ( (stats->starting_level < 0 ) && (stats->ending_level < 0 ))
scores_rprintf( 192+33+XX, y+YY, "S%d-S%d", -stats->starting_level, -stats->ending_level );
else if ( (stats->starting_level > 0 ) && (stats->ending_level < 0 ))
scores_rprintf( 192+33+XX, y+YY, "%d-S%d", stats->starting_level, -stats->ending_level );
{
int h, m, s;
h = stats->seconds/3600;
s = stats->seconds%3600;
m = s / 60;
s = s % 60;
scores_rprintf( 311-42+XX, y+YY, "%d:%02d:%02d", h, m, s );
}
WIN(DDGRUNLOCK(dd_grd_curcanv));
}
void scores_view(int citem)
{
fix t1;
int i,done,looper;
int k;
byte fades[64] = { 1,1,1,2,2,3,4,4,5,6,8,9,10,12,13,15,16,17,19,20,22,23,24,26,27,28,28,29,30,30,31,31,31,31,31,30,30,29,28,28,27,26,24,23,22,20,19,17,16,15,13,12,10,9,8,6,5,4,4,3,2,2,1,1 };
ReshowScores:
scores_read();
set_screen_mode(SCREEN_MENU);
WINDOS( dd_gr_set_current_canvas(NULL),
gr_set_current_canvas(NULL)
);
nm_draw_background(0,0,grd_curcanv->cv_bitmap.bm_w, grd_curcanv->cv_bitmap.bm_h );
grd_curcanv->cv_font = MEDIUM3_FONT;
WIN(DDGRLOCK(dd_grd_curcanv));
gr_string( 0x8000, LHY(15), TXT_HIGH_SCORES );
grd_curcanv->cv_font = SMALL_FONT;
gr_set_fontcolor( BM_XRGB(31,26,5), -1 );
gr_string( LHX(31+33+XX), LHY(46+7+YY), TXT_NAME );
gr_string( LHX(82+33+XX), LHY(46+7+YY), TXT_SCORE );
gr_string( LHX(127+33+XX), LHY(46+7+YY), TXT_SKILL );
gr_string( LHX(170+33+XX), LHY(46+7+YY), TXT_LEVELS );
// gr_string( 202, 46, "Kills" );
// gr_string( 234, 46, "Rescues" );
gr_string( LHX(288-42+XX), LHY(46+7+YY), TXT_TIME );
if ( citem < 0 )
gr_string( 0x8000, LHY(175), TXT_PRESS_CTRL_R );
gr_set_fontcolor( BM_XRGB(28,28,28), -1 );
gr_printf( 0x8000, LHY(31), "%c%s%c - %s", 34, Scores.cool_saying, 34, Scores.stats[0].name );
WIN(DDGRUNLOCK(dd_grd_curcanv));
for (i=0; i<MAX_HIGH_SCORES; i++ ) {
//@@if (i==0) {
//@@ gr_set_fontcolor( BM_XRGB(28,28,28), -1 );
//@@} else {
//@@ gr_set_fontcolor( gr_fade_table[BM_XRGB(28,28,28)+((28-i*2)*256)], -1 );
//@@}
gr_set_fontcolor( BM_XRGB(28-i*2,28-i*2,28-i*2), -1 );
scores_draw_item( i, &Scores.stats[i] );
}
gr_palette_fade_in( gr_palette,32, 0);
game_flush_inputs();
done = 0;
looper = 0;
while(!done) {
if ( citem > -1 ) {
t1 = timer_get_fixed_seconds();
while ( timer_get_fixed_seconds() < t1+F1_0/128 );
//@@gr_set_fontcolor( gr_fade_table[fades[looper]*256+BM_XRGB(28,28,28)], -1 );
gr_set_fontcolor( BM_XRGB(7+fades[looper],7+fades[looper],7+fades[looper]), -1 );
looper++;
if (looper>63) looper=0;
if ( citem == MAX_HIGH_SCORES )
scores_draw_item( MAX_HIGH_SCORES, &Last_game );
else
scores_draw_item( citem, &Scores.stats[citem] );
}
for (i=0; i<4; i++ )
if (joy_get_button_down_cnt(i)>0) done=1;
for (i=0; i<3; i++ )
if (mouse_button_down_count(i)>0) done=1;
//see if redbook song needs to be restarted
songs_check_redbook_repeat();
#ifdef WINDOWS
{
MSG msg;
DoMessageStuff(&msg);
if (_RedrawScreen) {
_RedrawScreen = FALSE;
goto ReshowScores;
}
DDGRRESTORE;
}
#endif
k = key_inkey();
switch( k ) {
case KEY_CTRLED+KEY_R:
if ( citem < 0 ) {
// Reset scores...
if ( nm_messagebox( NULL, 2, TXT_NO, TXT_YES, TXT_RESET_HIGH_SCORES )==1 ) {
remove( get_scores_filename() );
gr_palette_fade_out( gr_palette, 32, 0 );
goto ReshowScores;
}
}
break;
case KEY_BACKSP: Int3(); k = 0; break;
case KEY_PRINT_SCREEN: save_screen_shot(0); k = 0; break;
case KEY_ENTER:
case KEY_SPACEBAR:
case KEY_ESC:
done=1;
break;
}
}
// Restore background and exit
gr_palette_fade_out( gr_palette, 32, 0 );
#ifdef WINDOWS
DDGRRESTORE;
#endif
WINDOS( dd_gr_set_current_canvas(NULL),
gr_set_current_canvas(NULL)
);
game_flush_inputs();
}