src/gameloop.cpp

   1 //  $Id$
   2 //
   3 //  SuperTux
   4 //  Copyright (C) 2000 Bill Kendrick <bill@newbreedsoftware.com>
   5 //  Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
   6 //  Copyright (C) 2004 Ingo Ruhnke <grumbel@gmx.de>
   7 //
   8 //  This program is free software; you can redistribute it and/or
   9 //  modify it under the terms of the GNU General Public License
  10 //  as published by the Free Software Foundation; either version 2
  11 //  of the License, or (at your option) any later version.
  12 //
  13 //  This program is distributed in the hope that it will be useful,
  14 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 //  GNU General Public License for more details.
  17 //
  18 //  You should have received a copy of the GNU General Public License
  19 //  along with this program; if not, write to the Free Software
  20 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  21
  22 #include <iostream>
  23 #include <sstream>
  24 #include <cassert>
  25 #include <cstdio>
  26 #include <cstdlib>
  27 #include <cmath>
  28 #include <cstring>
  29 #include <cerrno>
  30 #include <unistd.h>
  31 #include <ctime>
  32
  33 #include "SDL.h"
  34
  35 #ifndef WIN32
  36 #include <sys/types.h>
  37 #include <ctype.h>
  38 #endif
  39
  40 #include "defines.h"
  41 #include "app/globals.h"
  42 #include "gameloop.h"
  43 #include "video/screen.h"
  44 #include "app/setup.h"
  45 #include "high_scores.h"
  46 #include "gui/menu.h"
  47 #include "badguy.h"
  48 #include "sector.h"
  49 #include "special.h"
  50 #include "player.h"
  51 #include "level.h"
  52 #include "scene.h"
  53 #include "collision.h"
  54 #include "tile.h"
  55 #include "particlesystem.h"
  56 #include "resources.h"
  57 #include "background.h"
  58 #include "tilemap.h"
  59 #include "app/gettext.h"
  60 #include "worldmap.h"
  61 #include "intro.h"
  62 #include "misc.h"
  63 #include "camera.h"
  64 #include "statistics.h"
  65
  66 GameSession* GameSession::current_ = 0;
  67
  68 bool compare_last(std::string& haystack, std::string needle)
  69 {
  70 int haystack_size = haystack.size();
  71 int needle_size = needle.size();
  72
  73 if(haystack_size < needle_size)
  74   return false;
  75
  76 if(haystack.compare(haystack_size-needle_size, needle_size, needle) == 0)
  77   return true;
  78 return false;
  79 }
  80
  81 GameSession::GameSession(const std::string& levelname_, int mode, bool flip_level_, Statistics* statistics)
  82   : level(0), currentsector(0), st_gl_mode(mode),
  83     end_sequence(NO_ENDSEQUENCE), levelname(levelname_), flip_level(flip_level_),
  84     best_level_statistics(statistics)
  85 {
  86   current_ = this;
  87
  88   global_frame_counter = 0;
  89   game_pause = false;
  90   fps_fps = 0;
  91
  92   fps_timer.init(true);
  93   frame_timer.init(true);
  94   random_timer.init(true);
  95   frame_rate.set_fps(100);
  96
  97   context = new DrawingContext();
  98
  99   if(flip_levels_mode)
 100     flip_level = true;
 101
 102   restart_level();
 103 }
 104
 105 void
 106 GameSession::restart_level()
 107 {
 108   game_pause   = false;
 109   exit_status  = ES_NONE;
 110   end_sequence = NO_ENDSEQUENCE;
 111
 112   fps_timer.init(true);
 113   frame_timer.init(true);
 114   random_timer.init(true);
 115
 116   last_keys.clear();
 117
 118   Vector tux_pos = Vector(-1,-1);
 119   if (currentsector)
 120     { // Tux has lost a life, so we try to respawn him at the nearest reset point
 121       tux_pos = currentsector->player->base;
 122     }
 123
 124   delete level;
 125   currentsector = 0;
 126
 127   level = new Level;
 128   level->load(levelname);
 129   if(flip_level)
 130     level->do_vertical_flip();
 131
 132   currentsector = level->get_sector("main");
 133   if(!currentsector)
 134     Termination::abort("Level has no main sector.", "");
 135   currentsector->activate("main");
 136
 137   // Set Tux to the nearest reset point
 138   if(tux_pos.x != -1)
 139     {
 140     tux_pos = currentsector->get_best_spawn_point(tux_pos);
 141     currentsector->player->base.x = tux_pos.x;
 142     currentsector->player->base.y = tux_pos.y;
 143
 144     // has to reset camera on swapping
 145     currentsector->camera->reset(Vector(currentsector->player->base.x,
 146                                         currentsector->player->base.y));
 147     }
 148
 149   if (st_gl_mode != ST_GL_DEMO_GAME)
 150     {
 151       if(st_gl_mode == ST_GL_PLAY || st_gl_mode == ST_GL_LOAD_LEVEL_FILE)
 152         levelintro();
 153     }
 154
 155   global_stats.reset();
 156
 157   time_left.init(true);
 158   start_timers();
 159   currentsector->play_music(LEVEL_MUSIC);
 160 }
 161
 162 GameSession::~GameSession()
 163 {
 164   delete level;
 165   delete context;
 166 }
 167
 168 void
 169 GameSession::levelintro(void)
 170 {
 171   SoundManager::get()->halt_music();
 172
 173   char str[60];
 174
 175   DrawingContext context;
 176   currentsector->background->draw(context);
 177
 178   context.draw_text(gold_text, level->get_name(), Vector(screen->w/2, 160),
 179       CENTER_ALLIGN, LAYER_FOREGROUND1);
 180
 181   sprintf(str, "TUX x %d", player_status.lives);
 182   context.draw_text(white_text, str, Vector(screen->w/2, 210),
 183       CENTER_ALLIGN, LAYER_FOREGROUND1);
 184
 185   if(level->get_author().size())
 186     context.draw_text(white_small_text,
 187       std::string(_("by ")) + level->get_author(),
 188       Vector(screen->w/2, 350), CENTER_ALLIGN, LAYER_FOREGROUND1);
 189
 190
 191   if(flip_level)
 192     context.draw_text(white_text,
 193       _("Level Vertically Flipped!"),
 194       Vector(screen->w/2, 310), CENTER_ALLIGN, LAYER_FOREGROUND1);
 195
 196   if(best_level_statistics != NULL)
 197     best_level_statistics->draw_message_info(context, _("Best Level Statistics"));
 198
 199   context.do_drawing();
 200
 201   SDL_Event event;
 202   wait_for_event(event,1000,3000,true);
 203 }
 204
 205 /* Reset Timers */
 206 void
 207 GameSession::start_timers()
 208 {
 209   time_left.start(level->time_left*1000);
 210   Ticks::pause_init();
 211   frame_rate.start();
 212 }
 213
 214 void
 215 GameSession::on_escape_press()
 216 {
 217   if(currentsector->player->dying || end_sequence != NO_ENDSEQUENCE)
 218     return;   // don't let the player open the menu, when he is dying
 219
 220   if(game_pause)
 221     return;
 222
 223   if(st_gl_mode == ST_GL_TEST)
 224     {
 225       exit_status = ES_LEVEL_ABORT;
 226     }
 227   else if (!Menu::current())
 228     {
 229       /* Tell Tux that the keys are all down, otherwise
 230         it could have nasty bugs, like going allways to the right
 231         or whatever that key does */
 232       Player& tux = *(currentsector->player);
 233       tux.key_event((SDLKey)keymap.jump, UP);
 234       tux.key_event((SDLKey)keymap.duck, UP);
 235       tux.key_event((SDLKey)keymap.left, UP);
 236       tux.key_event((SDLKey)keymap.right, UP);
 237       tux.key_event((SDLKey)keymap.fire, UP);
 238
 239       Menu::set_current(game_menu);
 240       Ticks::pause_start();
 241     }
 242 }
 243
 244 void
 245 GameSession::process_events()
 246 {
 247   if (end_sequence != NO_ENDSEQUENCE)
 248     {
 249       Player& tux = *currentsector->player;
 250
 251       tux.input.fire  = UP;
 252       tux.input.left  = UP;
 253       tux.input.right = DOWN;
 254       tux.input.down  = UP;
 255
 256       if (int(last_x_pos) == int(tux.base.x))
 257         tux.input.up    = DOWN;
 258       else
 259         tux.input.up    = UP;
 260
 261       last_x_pos = tux.base.x;
 262
 263       SDL_Event event;
 264       while (SDL_PollEvent(&event))
 265         {
 266           /* Check for menu-events, if the menu is shown */
 267           if (Menu::current())
 268             {
 269               Menu::current()->event(event);
 270               if(!Menu::current())
 271               Ticks::pause_stop();
 272             }
 273
 274           switch(event.type)
 275             {
 276             case SDL_QUIT:        /* Quit event - quit: */
 277               Termination::abort("Received window close", "");
 278               break;
 279
 280             case SDL_KEYDOWN:     /* A keypress! */
 281               {
 282                 SDLKey key = event.key.keysym.sym;
 283
 284                 switch(key)
 285                   {
 286                   case SDLK_ESCAPE:    /* Escape: Open/Close the menu: */
 287                     on_escape_press();
 288                     break;
 289                   default:
 290                     break;
 291                   }
 292               }
 293
 294             case SDL_JOYBUTTONDOWN:
 295               if (event.jbutton.button == joystick_keymap.start_button)
 296                 on_escape_press();
 297               break;
 298             }
 299         }
 300     }
 301   else // normal mode
 302     {
 303       if(!Menu::current() && !game_pause)
 304         Ticks::pause_stop();
 305
 306       SDL_Event event;
 307       while (SDL_PollEvent(&event))
 308         {
 309           /* Check for menu-events, if the menu is shown */
 310           if (Menu::current())
 311             {
 312               Menu::current()->event(event);
 313               if(!Menu::current())
 314                 Ticks::pause_stop();
 315             }
 316           else
 317             {
 318               Player& tux = *currentsector->player;
 319
 320               switch(event.type)
 321                 {
 322                 case SDL_QUIT:        /* Quit event - quit: */
 323                   Termination::abort("Received window close", "");
 324                   break;
 325
 326                 case SDL_KEYDOWN:     /* A keypress! */
 327                   {
 328                     SDLKey key = event.key.keysym.sym;
 329
 330                     if(tux.key_event(key,DOWN))
 331                       break;
 332
 333                     switch(key)
 334                       {
 335                       case SDLK_ESCAPE:    /* Escape: Open/Close the menu: */
 336                         on_escape_press();
 337                         break;
 338                       default:
 339                         break;
 340                       }
 341                   }
 342                   break;
 343                 case SDL_KEYUP:      /* A keyrelease! */
 344                   {
 345                     SDLKey key = event.key.keysym.sym;
 346
 347                     if(tux.key_event(key, UP))
 348                       break;
 349
 350                     switch(key)
 351                       {
 352                       case SDLK_a:
 353                         if(debug_mode)
 354                         {
 355                           char buf[160];
 356                           snprintf(buf, sizeof(buf), "P: %4.1f,%4.1f",
 357                               tux.base.x, tux.base.y);
 358                           context->draw_text(white_text, buf,
 359                               Vector(0, screen->h - white_text->get_height()),
 360                               LEFT_ALLIGN, LAYER_FOREGROUND1);
 361                           context->do_drawing();
 362                           SDL_Delay(1000);
 363                         }
 364                         break;
 365                       case SDLK_p:
 366                         if(!Menu::current())
 367                           {
 368                           // "lifeup" cheat activates pause cause of the 'p'
 369                           // so work around to ignore it
 370                             if(compare_last(last_keys, "lifeu"))
 371                               break;
 372
 373                             if(game_pause)
 374                               {
 375                                 game_pause = false;
 376                                 Ticks::pause_stop();
 377                               }
 378                             else
 379                               {
 380                                 game_pause = true;
 381                                 Ticks::pause_start();
 382                               }
 383                           }
 384                         break;
 385                       default:
 386                         break;
 387                       }
 388                   }
 389
 390                         /* Check if chacrater is ASCII */
 391                         char ch[2];
 392                         if((event.key.keysym.unicode & 0xFF80) == 0)
 393                           {
 394                           ch[0] = event.key.keysym.unicode & 0x7F;
 395                           ch[1] = '\0';
 396                           }
 397                         last_keys.append(ch);  // add to cheat keys
 398
 399                         // Cheating words (the goal of this is really for debugging,
 400                         // but could be used for some cheating, nothing wrong with that)
 401                         if(compare_last(last_keys, "grow"))
 402                           {
 403                           tux.grow(false);
 404                           last_keys.clear();
 405                           }
 406                         if(compare_last(last_keys, "fire"))
 407                           {
 408                           tux.grow(false);
 409                           tux.got_power = tux.FIRE_POWER;
 410                           last_keys.clear();
 411                           }
 412                         if(compare_last(last_keys, "ice"))
 413                           {
 414                           tux.grow(false);
 415                           tux.got_power = tux.ICE_POWER;
 416                           last_keys.clear();
 417                           }
 418                         if(compare_last(last_keys, "lifeup"))
 419                           {
 420                           player_status.lives++;
 421                           last_keys.clear();
 422                           }
 423                         if(compare_last(last_keys, "lifedown"))
 424                           {
 425                           player_status.lives--;
 426                           last_keys.clear();
 427                           }
 428                         if(compare_last(last_keys, "invincible"))
 429                           {    // be invincle for the rest of the level
 430                           tux.invincible_timer.start(time_left.get_left());
 431                           last_keys.clear();
 432                           }
 433                         if(compare_last(last_keys, "shrink"))
 434                           {    // remove powerups
 435                           tux.kill(tux.SHRINK);
 436                           last_keys.clear();
 437                           }
 438                         if(compare_last(last_keys, "kill"))
 439                           {    // kill Tux
 440                           tux.kill(tux.KILL);
 441                           last_keys.clear();
 442                           }
 443                         if(compare_last(last_keys, "hover"))
 444                           {    // toggle hover ability on/off
 445                           tux.enable_hover = !tux.enable_hover;
 446                           last_keys.clear();
 447                           }
 448                         if(compare_last(last_keys, "gotoend"))
 449                           {    // goes to the end of the level
 450                           tux.base.x = (currentsector->solids->get_width()*32) - (screen->w*2);
 451                           tux.base.y = 0;
 452                           currentsector->camera->reset(Vector(tux.base.x, tux.base.y));
 453                           last_keys.clear();
 454                           }
 455                   break;
 456
 457                 case SDL_JOYAXISMOTION:
 458                   if (event.jaxis.axis == joystick_keymap.x_axis)
 459                     {
 460                       if (event.jaxis.value < -joystick_keymap.dead_zone)
 461                         {
 462                           tux.input.left  = DOWN;
 463                           tux.input.right = UP;
 464                         }
 465                       else if (event.jaxis.value > joystick_keymap.dead_zone)
 466                         {
 467                           tux.input.left  = UP;
 468                           tux.input.right = DOWN;
 469                         }
 470                       else
 471                         {
 472                           tux.input.left  = DOWN;
 473                           tux.input.right = DOWN;
 474                         }
 475                     }
 476                   else if (event.jaxis.axis == joystick_keymap.y_axis)
 477                     {
 478                       if (event.jaxis.value > joystick_keymap.dead_zone)
 479                         tux.input.down = DOWN;
 480                       else if (event.jaxis.value < -joystick_keymap.dead_zone)
 481                         tux.input.down = UP;
 482                       else
 483                         tux.input.down = UP;
 484                     }
 485                   break;
 486
 487                 case SDL_JOYHATMOTION:
 488                   if(event.jhat.value & SDL_HAT_UP) {
 489                     tux.input.up = DOWN;
 490                     tux.input.down = UP;
 491                   } else if(event.jhat.value & SDL_HAT_DOWN) {
 492                     tux.input.up = UP;
 493                     tux.input.down = DOWN;
 494                   } else if(event.jhat.value & SDL_HAT_LEFT) {
 495                     tux.input.left = DOWN;
 496                     tux.input.right = UP;
 497                   } else if(event.jhat.value & SDL_HAT_RIGHT) {
 498                     tux.input.left = UP;
 499                     tux.input.right = DOWN;
 500                   } else if(event.jhat.value == SDL_HAT_CENTERED) {
 501                     tux.input.left = UP;
 502                     tux.input.right = UP;
 503                     tux.input.up = UP;
 504                     tux.input.down = UP;
 505                   }
 506                   break;
 507
 508                 case SDL_JOYBUTTONDOWN:
 509                   if (event.jbutton.button == joystick_keymap.a_button)
 510                     tux.input.up = DOWN;
 511                   else if (event.jbutton.button == joystick_keymap.b_button)
 512                     tux.input.fire = DOWN;
 513                   else if (event.jbutton.button == joystick_keymap.start_button)
 514                     on_escape_press();
 515                   break;
 516                 case SDL_JOYBUTTONUP:
 517                   if (event.jbutton.button == joystick_keymap.a_button)
 518                     tux.input.up = UP;
 519                   else if (event.jbutton.button == joystick_keymap.b_button)
 520                     tux.input.fire = UP;
 521                   break;
 522
 523                 default:
 524                   break;
 525                 }  /* switch */
 526             }
 527         } /* while */
 528     }
 529 }
 530
 531 void
 532 GameSession::check_end_conditions()
 533 {
 534   Player* tux = currentsector->player;
 535
 536   /* End of level? */
 537   Tile* endtile = collision_goal(tux->base);
 538
 539   if(end_sequence && !endsequence_timer.check())
 540     {
 541       exit_status = ES_LEVEL_FINISHED;
 542       return;
 543     }
 544   else if(end_sequence == ENDSEQUENCE_RUNNING && endtile && endtile->data >= 1)
 545     {
 546       end_sequence = ENDSEQUENCE_WAITING;
 547     }
 548   else if(!end_sequence && endtile && endtile->data == 0)
 549     {
 550       end_sequence = ENDSEQUENCE_RUNNING;
 551       endsequence_timer.start(7000); // 5 seconds until we finish the map
 552       last_x_pos = -1;
 553       SoundManager::get()->play_music(level_end_song, 0);
 554       tux->invincible_timer.start(7000); //FIXME: Implement a winning timer for the end sequence (with special winning animation etc.)
 555
 556       // add left time to stats
 557       global_stats.set_points(TIME_NEEDED_STAT, time_left.get_gone() / 1000);
 558
 559       random_timer.start(200);  // start 1st firework
 560     }
 561   else if (!end_sequence && tux->is_dead())
 562     {
 563       player_status.bonus = PlayerStatus::NO_BONUS;
 564
 565       if (player_status.lives < 0)
 566         { // No more lives!?
 567           exit_status = ES_GAME_OVER;
 568         }
 569       else
 570         { // Still has lives, so reset Tux to the levelstart
 571           restart_level();
 572         }
 573
 574       return;
 575     }
 576 }
 577
 578 void
 579 GameSession::action(double frame_ratio)
 580 {
 581   if (exit_status == ES_NONE && !currentsector->player->growing_timer.check())
 582     {
 583       // Update Tux and the World
 584       currentsector->action(frame_ratio);
 585     }
 586
 587   // respawning in new sector?
 588   if(newsector != "" && newspawnpoint != "") {
 589     Sector* sector = level->get_sector(newsector);
 590     currentsector = sector;
 591     currentsector->activate(newspawnpoint);
 592     currentsector->play_music(LEVEL_MUSIC);
 593     newsector = newspawnpoint = "";
 594   }
 595
 596   // on end sequence make a few fireworks
 597   if(end_sequence == ENDSEQUENCE_RUNNING && !random_timer.check() &&
 598      currentsector->end_sequence_animation() == FIREWORKS_ENDSEQ_ANIM)
 599     {
 600     Vector epicenter = currentsector->camera->get_translation();
 601     epicenter.x += screen->w * ((float)rand() / RAND_MAX);
 602     epicenter.y += (screen->h/2) * ((float)rand() / RAND_MAX);
 603
 604     int red = rand() % 255;  // calculate firework color
 605     int green = rand() % red;
 606     currentsector->add_particles(epicenter, Vector(1.4,1.4), Vector(0,0),
 607                                  45, Color(red,green,0), 3, 1300);
 608
 609     SoundManager::get()->play_sound(IDToSound(SND_FIREWORKS));
 610     random_timer.start(rand() % 400 + 600);  // next firework
 611     }
 612 }
 613
 614 void
 615 GameSession::draw()
 616 {
 617   currentsector->draw(*context);
 618   drawstatus(*context);
 619
 620   if(game_pause)
 621     {
 622       int x = screen->h / 20;
 623       for(int i = 0; i < x; ++i)
 624         {
 625           context->draw_filled_rect(
 626               Vector(i % 2 ? (pause_menu_frame * i)%screen->w :
 627                 -((pause_menu_frame * i)%screen->w)
 628                 ,(i*20+pause_menu_frame)%screen->h),
 629               Vector(screen->w,10),
 630               Color(20,20,20, rand() % 20 + 1), LAYER_FOREGROUND1+1);
 631         }
 632       context->draw_filled_rect(
 633           Vector(0,0), Vector(screen->w, screen->h),
 634           Color(rand() % 50, rand() % 50, rand() % 50, 128), LAYER_FOREGROUND1);
 635       context->draw_text(blue_text, _("PAUSE - Press 'P' To Play"),
 636           Vector(screen->w/2, 230), CENTER_ALLIGN, LAYER_FOREGROUND1+2);
 637
 638       char str1[60];
 639       char str2[124];
 640       sprintf(str1, _("Playing: "));
 641       sprintf(str2, level->name.c_str());
 642
 643       context->draw_text(blue_text, str1,
 644           Vector((screen->w - (blue_text->get_text_width(str1) + white_text->get_text_width(str2)))/2, 340),
 645           LEFT_ALLIGN, LAYER_FOREGROUND1+2);
 646       context->draw_text(white_text, str2,
 647           Vector(((screen->w - (blue_text->get_text_width(str1) + white_text->get_text_width(str2)))/2)+blue_text->get_text_width(str1), 340),
 648           LEFT_ALLIGN, LAYER_FOREGROUND1+2);
 649     }
 650
 651   if(Menu::current())
 652     {
 653       Menu::current()->draw(*context);
 654       mouse_cursor->draw(*context);
 655     }
 656
 657   context->do_drawing();
 658 }
 659
 660 void
 661 GameSession::process_menu()
 662 {
 663   Menu* menu = Menu::current();
 664   if(menu)
 665     {
 666       menu->action();
 667
 668       if(menu == game_menu)
 669         {
 670           switch (game_menu->check())
 671             {
 672             case MNID_CONTINUE:
 673               Ticks::pause_stop();
 674               break;
 675             case MNID_ABORTLEVEL:
 676               Ticks::pause_stop();
 677               exit_status = ES_LEVEL_ABORT;
 678               break;
 679             }
 680         }
 681       else if(menu == options_menu)
 682         {
 683           process_options_menu();
 684         }
 685       else if(menu == load_game_menu )
 686         {
 687           process_load_game_menu();
 688         }
 689     }
 690 }
 691
 692 GameSession::ExitStatus
 693 GameSession::run()
 694 {
 695   Menu::set_current(0);
 696   current_ = this;
 697
 698   int fps_cnt = 0;
 699
 700   frame_rate.start();
 701
 702   // Eat unneeded events
 703   SDL_Event event;
 704   while (SDL_PollEvent(&event)) {}
 705
 706   draw();
 707
 708   while (exit_status == ES_NONE)
 709     {
 710       /* Calculate the movement-factor */
 711       double frame_ratio = frame_rate.get();
 712
 713       if(!frame_timer.check())
 714         {
 715           frame_timer.start(25);
 716           ++global_frame_counter;
 717         }
 718
 719       /* Handle events: */
 720       currentsector->player->input.old_fire
 721         = currentsector->player->input.fire;
 722
 723       process_events();
 724       process_menu();
 725
 726       // Update the world state and all objects in the world
 727       // Do that with a constante time-delta so that the game will run
 728       // determistic and not different on different machines
 729       if(!game_pause && !Menu::current())
 730         {
 731           // Update the world
 732           check_end_conditions();
 733           if (end_sequence == ENDSEQUENCE_RUNNING)
 734              action(frame_ratio/2);
 735           else if(end_sequence == NO_ENDSEQUENCE)
 736              action(frame_ratio);
 737         }
 738       else
 739         {
 740           ++pause_menu_frame;
 741           SDL_Delay(50);
 742         }
 743
 744       draw();
 745
 746       /* Time stops in pause mode */
 747       if(game_pause || Menu::current())
 748         {
 749           continue;
 750         }
 751
 752       frame_rate.update();
 753
 754       /* Handle time: */
 755       if (!time_left.check() && currentsector->player->dying == DYING_NOT
 756               && !end_sequence)
 757         currentsector->player->kill(Player::KILL);
 758
 759       /* Handle music: */
 760       if(currentsector->player->invincible_timer.check() && !end_sequence)
 761         {
 762           currentsector->play_music(HERRING_MUSIC);
 763         }
 764       /* are we low on time ? */
 765       else if (time_left.get_left() < TIME_WARNING && !end_sequence)
 766         {
 767           currentsector->play_music(HURRYUP_MUSIC);
 768         }
 769       /* or just normal music? */
 770       else if(currentsector->get_music_type() != LEVEL_MUSIC && !end_sequence)
 771         {
 772           currentsector->play_music(LEVEL_MUSIC);
 773         }
 774
 775       /* Calculate frames per second */
 776       if(show_fps)
 777         {
 778           ++fps_cnt;
 779           fps_fps = (1000.0 / (float)fps_timer.get_gone()) * (float)fps_cnt;
 780
 781           if(!fps_timer.check())
 782             {
 783               fps_timer.start(1000);
 784               fps_cnt = 0;
 785             }
 786         }
 787     }
 788
 789   return exit_status;
 790 }
 791
 792 void
 793 GameSession::respawn(const std::string& sector, const std::string& spawnpoint)
 794 {
 795   newsector = sector;
 796   newspawnpoint = spawnpoint;
 797 }
 798
 799 /* Bounce a brick: */
 800 void bumpbrick(float x, float y)
 801 {
 802   Sector::current()->add_bouncy_brick(Vector(((int)(x + 1) / 32) * 32,
 803                          (int)(y / 32) * 32));
 804
 805   SoundManager::get()->play_sound(IDToSound(SND_BRICK), Vector(x, y), Sector::current()->player->get_pos());
 806 }
 807
 808 /* (Status): */
 809 void
 810 GameSession::drawstatus(DrawingContext& context)
 811 {
 812   char str[60];
 813
 814   snprintf(str, 60, " %d", global_stats.get_points(SCORE_STAT));
 815   context.draw_text(white_text, _("SCORE"), Vector(0, 0), LEFT_ALLIGN, LAYER_FOREGROUND1);
 816   context.draw_text(gold_text, str, Vector(96, 0), LEFT_ALLIGN, LAYER_FOREGROUND1);
 817
 818   if(st_gl_mode == ST_GL_TEST)
 819     {
 820       context.draw_text(white_text, _("Press ESC To Return"), Vector(0,20),
 821           LEFT_ALLIGN, LAYER_FOREGROUND1);
 822     }
 823
 824   if(!time_left.check()) {
 825     context.draw_text(white_text, _("TIME's UP"), Vector(screen->w/2, 0),
 826         CENTER_ALLIGN, LAYER_FOREGROUND1);
 827   } else if (time_left.get_left() > TIME_WARNING || (global_frame_counter % 10) < 5) {
 828     sprintf(str, " %d", time_left.get_left() / 1000 );
 829     context.draw_text(white_text, _("TIME"),
 830         Vector(screen->w/2, 0), CENTER_ALLIGN, LAYER_FOREGROUND1);
 831     context.draw_text(gold_text, str,
 832         Vector(screen->w/2 + 4*16, 0), CENTER_ALLIGN, LAYER_FOREGROUND1);
 833   }
 834
 835   sprintf(str, " %d", player_status.distros);
 836   context.draw_text(white_text, _("COINS"),
 837       Vector(screen->w - white_text->get_text_width(_("COINS"))-white_text->get_text_width("   99"), 0),
 838         LEFT_ALLIGN, LAYER_FOREGROUND1);
 839   context.draw_text(gold_text, str,
 840       Vector(screen->w - gold_text->get_text_width(" 99"), 0),LEFT_ALLIGN, LAYER_FOREGROUND1);
 841
 842   if (player_status.lives >= 5)
 843     {
 844       sprintf(str, "%dx", player_status.lives);
 845       float x = screen->w - gold_text->get_text_width(str) - tux_life->w;
 846       context.draw_text(gold_text, str, Vector(x, 20), LEFT_ALLIGN, LAYER_FOREGROUND1);
 847       context.draw_surface(tux_life, Vector(screen->w - 16, 20),
 848           LAYER_FOREGROUND1);
 849     }
 850   else
 851     {
 852       for(int i= 0; i < player_status.lives; ++i)
 853         context.draw_surface(tux_life,
 854             Vector(screen->w - tux_life->w*4 +(tux_life->w*i), 20),
 855             LAYER_FOREGROUND1);
 856     }
 857
 858   context.draw_text(white_text, _("LIVES"),
 859       Vector(screen->w - white_text->get_text_width(_("LIVES")) - white_text->get_text_width("   99"), 20),
 860       LEFT_ALLIGN, LAYER_FOREGROUND1);
 861
 862   if(show_fps)
 863     {
 864       sprintf(str, "%2.1f", fps_fps);
 865       context.draw_text(white_text, "FPS",
 866           Vector(screen->w - white_text->get_text_width("FPS     "), 40),
 867           LEFT_ALLIGN, LAYER_FOREGROUND1);
 868       context.draw_text(gold_text, str,
 869           Vector(screen->w-4*16, 40), LEFT_ALLIGN, LAYER_FOREGROUND1);
 870     }
 871 }
 872
 873 void
 874 GameSession::drawresultscreen(void)
 875 {
 876   char str[80];
 877
 878   DrawingContext context;
 879   currentsector->background->draw(context);
 880
 881   context.draw_text(blue_text, _("Result:"), Vector(screen->w/2, 200),
 882       CENTER_ALLIGN, LAYER_FOREGROUND1);
 883
 884   sprintf(str, _("SCORE: %d"), global_stats.get_points(SCORE_STAT));
 885   context.draw_text(gold_text, str, Vector(screen->w/2, 224), CENTER_ALLIGN, LAYER_FOREGROUND1);
 886
 887   sprintf(str, _("COINS: %d"), player_status.distros);
 888   context.draw_text(gold_text, str, Vector(screen->w/2, 256), CENTER_ALLIGN, LAYER_FOREGROUND1);
 889
 890   context.do_drawing();
 891
 892   SDL_Event event;
 893   wait_for_event(event,2000,5000,true);
 894 }
 895
 896 std::string slotinfo(int slot)
 897 {
 898   std::string tmp;
 899   std::string slotfile;
 900   std::string title;
 901   std::stringstream stream;
 902   stream << slot;
 903   slotfile = st_save_dir + "/slot" + stream.str() + ".stsg";
 904
 905   lisp_object_t* savegame = lisp_read_from_file(slotfile.c_str());
 906   if (savegame)
 907     {
 908       LispReader reader(lisp_cdr(savegame));
 909       reader.read_string("title", title);
 910       lisp_free(savegame);
 911     }
 912
 913   if (access(slotfile.c_str(), F_OK) == 0)
 914     {
 915       if (!title.empty())
 916         tmp = "Slot " + stream.str() + " - " + title;
 917       else
 918         tmp = "Slot " + stream.str() + " - Savegame";
 919     }
 920   else
 921     tmp = std::string(_("Slot")) + " " + stream.str() + " - " + std::string(_("Free"));
 922
 923   return tmp;
 924 }
 925
 926 bool process_load_game_menu()
 927 {
 928   int slot = load_game_menu->check();
 929
 930   if(slot != -1 && load_game_menu->get_item_by_id(slot).kind == MN_ACTION)
 931     {
 932       std::stringstream stream;
 933       stream << slot;
 934       std::string slotfile = st_save_dir + "/slot" + stream.str() + ".stsg";
 935
 936       if (access(slotfile.c_str(), F_OK) != 0)
 937         {
 938           draw_intro();
 939         }
 940
 941       // shrink_fade(Point((screen->w/2),(screen->h/2)), 1000);
 942       fadeout(256);
 943
 944       DrawingContext context;
 945       context.draw_text(white_text, "Loading...",
 946                         Vector(screen->w/2, screen->h/2), CENTER_ALLIGN, LAYER_FOREGROUND1);
 947       context.do_drawing();
 948
 949       WorldMapNS::WorldMap worldmap;
 950
 951       // Load the game or at least set the savegame_file variable
 952       worldmap.loadgame(slotfile);
 953
 954       worldmap.display();
 955
 956       Menu::set_current(main_menu);
 957
 958       Ticks::pause_stop();
 959       return true;
 960     }
 961   else
 962     {
 963       return false;
 964     }
 965 }