main/scores.c

   1 /*
   2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   3 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   6 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   8 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
   9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  12 */
  13
  14 /*
  15  *
  16  * Inferno High Scores and Statistics System
  17  *
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #include <conf.h>
  22 #endif
  23
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <ctype.h>
  28
  29 #include "scores.h"
  30 #include "dxxerror.h"
  31 #include "gr.h"
  32 #include "vid.h"
  33 #include "mono.h"
  34 #include "key.h"
  35 #include "inferno.h"
  36 #include "u_mem.h"
  37 #include "mouse.h"
  38 #include "joy.h"
  39 #include "timer.h"
  40 #include "strutil.h"
  41
  42
  43 #define VERSION_NUMBER          1
  44 #define SCORES_FILENAME         "descent.hi"
  45 #define COOL_MESSAGE_LEN        50
  46 #define MAX_HIGH_SCORES         10
  47
  48 typedef struct stats_info {
  49         char    name[CALLSIGN_LEN+1];
  50         int             score;
  51         sbyte   starting_level;
  52         sbyte   ending_level;
  53         sbyte   diff_level;
  54         short   kill_ratio;             // 0-100
  55         short   hostage_ratio;  //
  56         int             seconds;                // How long it took in seconds...
  57 } stats_info;
  58
  59 typedef struct all_scores {
  60         char                    signature[3];                   // DHS
  61         sbyte           version;                                // version
  62         char                    cool_saying[COOL_MESSAGE_LEN];
  63         stats_info      stats[MAX_HIGH_SCORES];
  64 } all_scores;
  65
  66 static all_scores Scores;
  67
  68 stats_info Last_game;
  69
  70 char scores_filename[128];
  71
  72 #define XX  (7)
  73 #define YY  (-3)
  74
  75 #define LHX(x)          ((x)*(MenuHires?2:1))
  76 #define LHY(y)          ((y)*(MenuHires?2.4:1))
  77
  78
  79 char * get_scores_filename()
  80 {
  81 #ifndef RELEASE
  82         // Only use the MINER variable for internal developement
  83         char *p;
  84         p=getenv( "MINER" );
  85         if (p)  {
  86                 sprintf( scores_filename, "%s\\game\\%s", p, SCORES_FILENAME );
  87                 Assert(strlen(scores_filename) < 128);
  88                 return scores_filename;
  89         }
  90 #endif
  91         sprintf( scores_filename, "%s", SCORES_FILENAME );
  92         return scores_filename;
  93 }
  94
  95 #ifndef D2_OEM
  96 #define COOL_SAYING TXT_REGISTER_DESCENT
  97 #else
  98 #define COOL_SAYING "Get all 30 levels of D2 from 1-800-INTERPLAY"
  99 #endif
 100
 101 void scores_read()
 102 {
 103         PHYSFS_file *fp;
 104         int fsize;
 105
 106         // clear score array...
 107         memset( &Scores, 0, sizeof(all_scores) );
 108
 109         fp = PHYSFS_openRead(get_scores_filename());
 110         if (fp==NULL) {
 111                 int i;
 112
 113                 // No error message needed, code will work without a scores file
 114                 sprintf( Scores.cool_saying, "%s", COOL_SAYING );
 115                 sprintf( Scores.stats[0].name, "Parallax" );
 116                 sprintf( Scores.stats[1].name, "Matt" );
 117                 sprintf( Scores.stats[2].name, "Mike" );
 118                 sprintf( Scores.stats[3].name, "Adam" );
 119                 sprintf( Scores.stats[4].name, "Mark" );
 120                 sprintf( Scores.stats[5].name, "Jasen" );
 121                 sprintf( Scores.stats[6].name, "Samir" );
 122                 sprintf( Scores.stats[7].name, "Doug" );
 123                 sprintf( Scores.stats[8].name, "Dan" );
 124                 sprintf( Scores.stats[9].name, "Jason" );
 125
 126                 for (i=0; i<10; i++)
 127                         Scores.stats[i].score = (10-i)*1000;
 128                 return;
 129         }
 130
 131         fsize = (int)PHYSFS_fileLength(fp);
 132
 133         if ( fsize != sizeof(all_scores) )      {
 134                 PHYSFS_close(fp);
 135                 return;
 136         }
 137         // Read 'em in...
 138         PHYSFS_read(fp, &Scores, sizeof(all_scores), 1);
 139         PHYSFS_close(fp);
 140
 141         if ( (Scores.version!=VERSION_NUMBER)||(Scores.signature[0]!='D')||(Scores.signature[1]!='H')||(Scores.signature[2]!='S') )     {
 142                 memset( &Scores, 0, sizeof(all_scores) );
 143                 return;
 144         }
 145 }
 146
 147 void scores_write()
 148 {
 149         PHYSFS_file *fp;
 150
 151         fp = PHYSFS_openWrite(get_scores_filename());
 152         if (fp==NULL) {
 153                 nm_messagebox( TXT_WARNING, 1, TXT_OK, "%s\n'%s'", TXT_UNABLE_TO_OPEN, get_scores_filename()  );
 154                 return;
 155         }
 156
 157         Scores.signature[0]='D';
 158         Scores.signature[1]='H';
 159         Scores.signature[2]='S';
 160         Scores.version = VERSION_NUMBER;
 161         PHYSFS_write(fp, &Scores,sizeof(all_scores), 1);
 162         PHYSFS_close(fp);
 163 }
 164
 165 void int_to_string( int number, char *dest )
 166 {
 167         int i,l,c;
 168         char buffer[20],*p;
 169
 170         sprintf( buffer, "%d", number );
 171
 172         l = (int)strlen(buffer);
 173         if (l<=3) {
 174                 // Don't bother with less than 3 digits
 175                 sprintf( dest, "%d", number );
 176                 return;
 177         }
 178
 179         c = 0;
 180         p=dest;
 181         for (i=l-1; i>=0; i-- ) {
 182                 if (c==3) {
 183                         *p++=',';
 184                         c = 0;
 185                 }
 186                 c++;
 187                 *p++ = buffer[i];
 188         }
 189         *p++ = '\0';
 190         strrev(dest);
 191 }
 192
 193 void scores_fill_struct(stats_info * stats)
 194 {
 195                 strcpy( stats->name, Players[Player_num].callsign );
 196                 stats->score = Players[Player_num].score;
 197                 stats->ending_level = Players[Player_num].level;
 198                 if (Players[Player_num].num_robots_total > 0 )
 199                         stats->kill_ratio = (Players[Player_num].num_kills_total*100)/Players[Player_num].num_robots_total;
 200                 else
 201                         stats->kill_ratio = 0;
 202
 203                 if (Players[Player_num].hostages_total > 0 )
 204                         stats->hostage_ratio = (Players[Player_num].hostages_rescued_total*100)/Players[Player_num].hostages_total;
 205                 else
 206                         stats->hostage_ratio = 0;
 207
 208                 stats->seconds = f2i(Players[Player_num].time_total)+(Players[Player_num].hours_total*3600);
 209
 210                 stats->diff_level = Difficulty_level;
 211                 stats->starting_level = Players[Player_num].starting_level;
 212 }
 213
 214 //char * score_placement[10] = { TXT_1ST, TXT_2ND, TXT_3RD, TXT_4TH, TXT_5TH, TXT_6TH, TXT_7TH, TXT_8TH, TXT_9TH, TXT_10TH };
 215
 216 void scores_maybe_add_player(int abort_flag)
 217 {
 218         char text1[COOL_MESSAGE_LEN+10];
 219         newmenu_item m[10];
 220         int i,position;
 221
 222         #ifdef APPLE_DEMO               // no high scores in apple oem version
 223         return;
 224         #endif
 225
 226         if ((Game_mode & GM_MULTI) && !(Game_mode & GM_MULTI_COOP))
 227                 return;
 228
 229         scores_read();
 230
 231         position = MAX_HIGH_SCORES;
 232         for (i=0; i<MAX_HIGH_SCORES; i++ )      {
 233                 if ( Players[Player_num].score > Scores.stats[i].score )        {
 234                         position = i;
 235                         break;
 236                 }
 237         }
 238
 239         if ( position == MAX_HIGH_SCORES ) {
 240                 if (abort_flag)
 241                         return;
 242                 scores_fill_struct( &Last_game );
 243         } else {
 244 //--            if ( Difficulty_level < 1 )     {
 245 //--                    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 );
 246 //--                    return;
 247 //--            }
 248
 249                 if ( position==0 )      {
 250                         strcpy( text1,  "" );
 251                         m[0].type = NM_TYPE_TEXT; m[0].text = TXT_COOL_SAYING;
 252                         m[1].type = NM_TYPE_INPUT; m[1].text = text1; m[1].text_len = COOL_MESSAGE_LEN-5;
 253                         newmenu_do( TXT_HIGH_SCORE, TXT_YOU_PLACED_1ST, 2, m, NULL );
 254                         strncpy( Scores.cool_saying, text1, COOL_MESSAGE_LEN );
 255                         if (strlen(Scores.cool_saying)<1)
 256                                 sprintf( Scores.cool_saying, "No Comment" );
 257                 } else {
 258                         nm_messagebox( TXT_HIGH_SCORE, 1, TXT_OK, "%s %s!", TXT_YOU_PLACED, *(&TXT_1ST + position) );
 259                 }
 260
 261                 // move everyone down...
 262                 for ( i=MAX_HIGH_SCORES-1; i>position; i-- )    {
 263                         Scores.stats[i] = Scores.stats[i-1];
 264                 }
 265
 266                 scores_fill_struct( &Scores.stats[position] );
 267
 268                 scores_write();
 269
 270         }
 271         scores_view(position);
 272 }
 273
 274 void scores_rprintf(int x, int y, char * format, ... )
 275 {
 276         va_list args;
 277         char buffer[128];
 278         int w, h, aw;
 279         char *p;
 280
 281         va_start(args, format );
 282         vsprintf(buffer,format,args);
 283         va_end(args);
 284
 285         //replace the digit '1' with special wider 1
 286         for (p=buffer;*p;p++)
 287                 if (*p=='1') *p = (char)132;
 288
 289         gr_get_string_size(buffer, &w, &h, &aw );
 290
 291         gr_string( LHX(x)-w, LHY(y), buffer );
 292 }
 293
 294
 295 void scores_draw_item( int  i, stats_info * stats )
 296 {
 297         char buffer[20];
 298
 299                 int y;
 300
 301                 y = 7+70+i*9;
 302
 303                 if (i==0) y -= 8;
 304
 305                 if ( i==MAX_HIGH_SCORES )       {
 306                         y += 8;
 307                         //scores_rprintf( 17+33+XX, y+YY, "" );
 308                 } else {
 309                         scores_rprintf( 17+33+XX, y+YY, "%d.", i+1 );
 310                 }
 311
 312                 if (strlen(stats->name)==0) {
 313                         gr_printf( LHX(26+33+XX), LHY(y+YY), TXT_EMPTY );
 314                         return;
 315                 }
 316                 gr_printf( LHX(26+33+XX), LHY(y+YY), "%s", stats->name );
 317                 int_to_string(stats->score, buffer);
 318                 scores_rprintf( 109+33+XX, y+YY, "%s", buffer );
 319
 320                 gr_printf( LHX(125+33+XX), LHY(y+YY), "%s", MENU_DIFFICULTY_TEXT(stats->diff_level) );
 321
 322                 if ( (stats->starting_level > 0 ) && (stats->ending_level > 0 ))
 323                         scores_rprintf( 192+33+XX, y+YY, "%d-%d", stats->starting_level, stats->ending_level );
 324                 else if ( (stats->starting_level < 0 ) && (stats->ending_level > 0 ))
 325                         scores_rprintf( 192+33+XX, y+YY, "S%d-%d", -stats->starting_level, stats->ending_level );
 326                 else if ( (stats->starting_level < 0 ) && (stats->ending_level < 0 ))
 327                         scores_rprintf( 192+33+XX, y+YY, "S%d-S%d", -stats->starting_level, -stats->ending_level );
 328                 else if ( (stats->starting_level > 0 ) && (stats->ending_level < 0 ))
 329                         scores_rprintf( 192+33+XX, y+YY, "%d-S%d", stats->starting_level, -stats->ending_level );
 330
 331                 {
 332                         int h, m, s;
 333                         h = stats->seconds/3600;
 334                         s = stats->seconds%3600;
 335                         m = s / 60;
 336                         s = s % 60;
 337                         scores_rprintf( 311-42+XX, y+YY, "%d:%02d:%02d", h, m, s );
 338                 }
 339 }
 340
 341 void scores_view(int citem)
 342 {
 343         grs_canvas *center_canv;
 344         fix t1;
 345         int i,done,looper;
 346         int k;
 347         sbyte 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 };
 348
 349 ReshowScores:
 350         scores_read();
 351
 352         set_screen_mode(SCREEN_MENU);
 353
 354         gr_set_current_canvas(NULL);
 355
 356         nm_draw_background(0, 0, GWIDTH-1, GHEIGHT-1); // args are x,y,x2,y2 NOT x,y,w,h
 357
 358         center_canv = gr_create_sub_canvas(grd_curcanv, GWIDTH/2-LHX(160), 0, LHX(320), GHEIGHT);
 359         gr_set_current_canvas(center_canv);
 360
 361         grd_curcanv->cv_font = MEDIUM3_FONT;
 362
 363         gr_string( 0x8000, LHY(15), TXT_HIGH_SCORES );
 364
 365         grd_curcanv->cv_font = SMALL_FONT;
 366
 367         gr_set_fontcolor( BM_XRGB(31,26,5), -1 );
 368         gr_string(  LHX(31+33+XX), LHY(46+7+YY), TXT_NAME );
 369         gr_string(  LHX(82+33+XX), LHY(46+7+YY), TXT_SCORE );
 370         gr_string( LHX(127+33+XX), LHY(46+7+YY), TXT_SKILL );
 371         gr_string( LHX(170+33+XX), LHY(46+7+YY), TXT_LEVELS );
 372 //      gr_string( 202, 46, "Kills" );
 373 //      gr_string( 234, 46, "Rescues" );
 374         gr_string( LHX(288-42+XX), LHY(46+7+YY), TXT_TIME );
 375
 376         if ( citem < 0 )
 377                 gr_string( 0x8000, LHY(175), TXT_PRESS_CTRL_R );
 378
 379         gr_set_fontcolor( BM_XRGB(28,28,28), -1 );
 380
 381         gr_printf( 0x8000, LHY(31), "%c%s%c  - %s", 34, Scores.cool_saying, 34, Scores.stats[0].name );
 382
 383         for (i=0; i<MAX_HIGH_SCORES; i++ )              {
 384                 //@@if (i==0)   {
 385                 //@@    gr_set_fontcolor( BM_XRGB(28,28,28), -1 );
 386                 //@@} else {
 387                 //@@    gr_set_fontcolor( gr_fade_table[BM_XRGB(28,28,28)+((28-i*2)*256)], -1 );
 388                 //@@}
 389
 390                 gr_set_fontcolor( BM_XRGB(28-i*2,28-i*2,28-i*2), -1 );
 391                 scores_draw_item( i, &Scores.stats[i] );
 392         }
 393
 394         gr_palette_fade_in( gr_palette,32, 0);
 395
 396 #ifdef OGL
 397         vid_update();
 398 #endif
 399
 400         game_flush_inputs();
 401
 402         done = 0;
 403         looper = 0;
 404
 405         while(!done)    {
 406                 if ( citem > -1 )       {
 407
 408                         t1      = timer_get_fixed_seconds();
 409                         while ( timer_get_fixed_seconds() < t1+F1_0/128 );
 410
 411                         //@@gr_set_fontcolor( gr_fade_table[fades[looper]*256+BM_XRGB(28,28,28)], -1 );
 412                         gr_set_fontcolor( BM_XRGB(7+fades[looper],7+fades[looper],7+fades[looper]), -1 );
 413                         looper++;
 414                         if (looper>63) looper=0;
 415                         if ( citem ==  MAX_HIGH_SCORES )
 416                                 scores_draw_item( MAX_HIGH_SCORES, &Last_game );
 417                         else
 418                                 scores_draw_item( citem, &Scores.stats[citem] );
 419                         vid_update();
 420                 }
 421
 422                 for (i=0; i<4; i++ )
 423                         if (joy_get_button_down_cnt(i)>0) done=1;
 424                 for (i=0; i<3; i++ )
 425                         if (mouse_button_down_count(i)>0) done=1;
 426
 427                 //see if redbook song needs to be restarted
 428                 songs_check_redbook_repeat();
 429
 430                 k = newmenu_inkey();
 431                 switch( k )     {
 432                 case KEY_CTRLED+KEY_R:
 433                         if ( citem < 0 )                {
 434                                 // Reset scores...
 435                                 if ( nm_messagebox( NULL, 2,  TXT_NO, TXT_YES, TXT_RESET_HIGH_SCORES )==1 )     {
 436                                         PHYSFS_delete(get_scores_filename());
 437                                         gr_palette_fade_out( gr_palette, 32, 0 );
 438                                         goto ReshowScores;
 439                                 }
 440                         }
 441                         break;
 442                 case KEY_BACKSP:                                Int3(); k = 0; break;
 443                 case KEY_PRINT_SCREEN:          save_screen_shot(0); k = 0; break;
 444
 445                 case KEY_ENTER:
 446                 case KEY_SPACEBAR:
 447                 case KEY_ESC:
 448                         done=1;
 449                         break;
 450                 }
 451         }
 452
 453 // Restore background and exit
 454         gr_palette_fade_out( gr_palette, 32, 0 );
 455
 456         gr_set_current_canvas(NULL);
 457         gr_free_sub_canvas(center_canv);
 458
 459         game_flush_inputs();
 460
 461 }