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>
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.
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.
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.
36 #include <sys/types.h>
41 #include "app/globals.h"
43 #include "video/screen.h"
44 #include "app/setup.h"
45 #include "high_scores.h"
53 #include "collision.h"
55 #include "particlesystem.h"
56 #include "resources.h"
57 #include "background.h"
59 #include "app/gettext.h"
64 #include "statistics.h"
66 GameSession* GameSession::current_ = 0;
68 bool compare_last(std::string& haystack, std::string needle)
70 int haystack_size = haystack.size();
71 int needle_size = needle.size();
73 if(haystack_size < needle_size)
76 if(haystack.compare(haystack_size-needle_size, needle_size, needle) == 0)
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)
88 global_frame_counter = 0;
93 frame_timer.init(true);
94 random_timer.init(true);
95 frame_rate.set_fps(100);
97 context = new DrawingContext();
102 last_swap_point = Vector(-1, -1);
103 last_swap_stats.reset();
109 GameSession::restart_level()
112 exit_status = ES_NONE;
113 end_sequence = NO_ENDSEQUENCE;
115 fps_timer.init(true);
116 frame_timer.init(true);
117 random_timer.init(true);
121 Vector tux_pos = Vector(-1,-1);
123 { // Tux has lost a life, so we try to respawn him at the nearest reset point
124 tux_pos = currentsector->player->base;
131 level->load(levelname);
133 level->do_vertical_flip();
135 global_stats.reset();
136 global_stats.set_total_points(COINS_COLLECTED_STAT, level->get_total_coins());
137 global_stats.set_total_points(BADGUYS_KILLED_STAT, level->get_total_badguys());
138 global_stats.set_total_points(TIME_NEEDED_STAT, level->time_left);
140 currentsector = level->get_sector("main");
142 Termination::abort("Level has no main sector.", "");
143 currentsector->activate("main");
145 // Set Tux to the nearest reset point
148 tux_pos = currentsector->get_best_spawn_point(tux_pos);
150 if(last_swap_point.x > tux_pos.x)
151 tux_pos = last_swap_point;
152 else // new swap point
154 last_swap_point = tux_pos;
156 last_swap_stats += global_stats;
159 currentsector->player->base.x = tux_pos.x;
160 currentsector->player->base.y = tux_pos.y;
162 // has to reset camera on swapping
163 currentsector->camera->reset(Vector(currentsector->player->base.x,
164 currentsector->player->base.y));
167 if (st_gl_mode != ST_GL_DEMO_GAME)
169 if(st_gl_mode == ST_GL_PLAY || st_gl_mode == ST_GL_LOAD_LEVEL_FILE)
173 time_left.init(true);
175 currentsector->play_music(LEVEL_MUSIC);
178 GameSession::~GameSession()
185 GameSession::levelintro(void)
187 SoundManager::get()->halt_music();
191 DrawingContext context;
192 currentsector->background->draw(context);
194 // context.draw_text(gold_text, level->get_name(), Vector(screen->w/2, 160),
195 // CENTER_ALLIGN, LAYER_FOREGROUND1);
196 context.draw_center_text(gold_text, level->get_name(), Vector(0, 160),
199 sprintf(str, "TUX x %d", player_status.lives);
200 context.draw_text(white_text, str, Vector(screen->w/2, 210),
201 CENTER_ALLIGN, LAYER_FOREGROUND1);
203 if(level->get_author().size())
204 context.draw_text(white_small_text,
205 std::string(_("by ")) + level->get_author(),
206 Vector(screen->w/2, 350), CENTER_ALLIGN, LAYER_FOREGROUND1);
210 context.draw_text(white_text,
211 _("Level Vertically Flipped!"),
212 Vector(screen->w/2, 310), CENTER_ALLIGN, LAYER_FOREGROUND1);
214 if(best_level_statistics != NULL)
215 best_level_statistics->draw_message_info(context, _("Best Level Statistics"));
217 context.do_drawing();
220 wait_for_event(event,1000,3000,true);
225 GameSession::start_timers()
227 time_left.start(level->time_left*1000);
233 GameSession::on_escape_press()
235 if(currentsector->player->dying || end_sequence != NO_ENDSEQUENCE)
236 return; // don't let the player open the menu, when he is dying
241 if(st_gl_mode == ST_GL_TEST)
243 exit_status = ES_LEVEL_ABORT;
245 else if (!Menu::current())
247 /* Tell Tux that the keys are all down, otherwise
248 it could have nasty bugs, like going allways to the right
249 or whatever that key does */
250 Player& tux = *(currentsector->player);
251 tux.key_event((SDLKey)keymap.up, UP);
252 tux.key_event((SDLKey)keymap.down, UP);
253 tux.key_event((SDLKey)keymap.left, UP);
254 tux.key_event((SDLKey)keymap.right, UP);
255 tux.key_event((SDLKey)keymap.jump, UP);
256 tux.key_event((SDLKey)keymap.power, UP);
258 Menu::set_current(game_menu);
259 Ticks::pause_start();
264 GameSession::process_events()
266 if (end_sequence != NO_ENDSEQUENCE)
268 Player& tux = *currentsector->player;
272 tux.input.right = DOWN;
275 if (int(last_x_pos) == int(tux.base.x))
280 last_x_pos = tux.base.x;
283 while (SDL_PollEvent(&event))
285 /* Check for menu-events, if the menu is shown */
288 Menu::current()->event(event);
295 case SDL_QUIT: /* Quit event - quit: */
296 Termination::abort("Received window close", "");
299 case SDL_KEYDOWN: /* A keypress! */
301 SDLKey key = event.key.keysym.sym;
305 case SDLK_ESCAPE: /* Escape: Open/Close the menu: */
313 case SDL_JOYBUTTONDOWN:
314 if (event.jbutton.button == joystick_keymap.start_button)
322 if(!Menu::current() && !game_pause)
326 while (SDL_PollEvent(&event))
328 /* Check for menu-events, if the menu is shown */
331 Menu::current()->event(event);
337 Player& tux = *currentsector->player;
341 case SDL_QUIT: /* Quit event - quit: */
342 Termination::abort("Received window close", "");
345 case SDL_KEYDOWN: /* A keypress! */
347 SDLKey key = event.key.keysym.sym;
349 if(tux.key_event(key,DOWN))
354 case SDLK_ESCAPE: /* Escape: Open/Close the menu: */
362 case SDL_KEYUP: /* A keyrelease! */
364 SDLKey key = event.key.keysym.sym;
366 if(tux.key_event(key, UP))
375 snprintf(buf, sizeof(buf), "P: %4.1f,%4.1f",
376 tux.base.x, tux.base.y);
377 context->draw_text(white_text, buf,
378 Vector(0, screen->h - white_text->get_height()),
379 LEFT_ALLIGN, LAYER_FOREGROUND1);
380 context->do_drawing();
387 // "lifeup" cheat activates pause cause of the 'p'
388 // so work around to ignore it
389 if(compare_last(last_keys, "lifeu"))
400 Ticks::pause_start();
409 /* Check if chacrater is ASCII */
411 if((event.key.keysym.unicode & 0xFF80) == 0)
413 ch[0] = event.key.keysym.unicode & 0x7F;
416 last_keys.append(ch); // add to cheat keys
418 // Cheating words (the goal of this is really for debugging,
419 // but could be used for some cheating, nothing wrong with that)
420 if(compare_last(last_keys, "grow"))
425 if(compare_last(last_keys, "fire"))
428 tux.got_power = tux.FIRE_POWER;
431 if(compare_last(last_keys, "ice"))
434 tux.got_power = tux.ICE_POWER;
437 if(compare_last(last_keys, "lifeup"))
439 player_status.lives++;
442 if(compare_last(last_keys, "lifedown"))
444 player_status.lives--;
447 if(compare_last(last_keys, "grease"))
449 tux.physic.set_velocity_x(tux.physic.get_velocity_x()*3);
452 if(compare_last(last_keys, "invincible"))
453 { // be invincle for the rest of the level
454 tux.invincible_timer.start(time_left.get_left());
457 if(compare_last(last_keys, "shrink"))
459 tux.kill(tux.SHRINK);
462 if(compare_last(last_keys, "kill"))
463 { // kill Tux, but without losing a life
464 player_status.lives++;
468 if(compare_last(last_keys, "hover"))
469 { // toggle hover ability on/off
470 tux.enable_hover = !tux.enable_hover;
473 if(compare_last(last_keys, "gotoend"))
474 { // goes to the end of the level
475 tux.base.x = (currentsector->solids->get_width()*32) - (screen->w*2);
477 currentsector->camera->reset(Vector(tux.base.x, tux.base.y));
482 case SDL_JOYAXISMOTION:
483 if (event.jaxis.axis == joystick_keymap.x_axis)
485 if (event.jaxis.value < -joystick_keymap.dead_zone)
487 tux.input.left = DOWN;
488 tux.input.right = UP;
490 else if (event.jaxis.value > joystick_keymap.dead_zone)
493 tux.input.right = DOWN;
497 tux.input.left = DOWN;
498 tux.input.right = DOWN;
501 else if (event.jaxis.axis == joystick_keymap.y_axis)
503 if (event.jaxis.value > joystick_keymap.dead_zone)
508 else if (event.jaxis.value < -joystick_keymap.dead_zone)
511 tux.input.down = DOWN;
516 tux.input.down = DOWN;
521 case SDL_JOYHATMOTION:
522 if(event.jhat.value & SDL_HAT_UP) {
525 } else if(event.jhat.value & SDL_HAT_DOWN) {
527 tux.input.down = DOWN;
528 } else if(event.jhat.value & SDL_HAT_LEFT) {
529 tux.input.left = DOWN;
530 tux.input.right = UP;
531 } else if(event.jhat.value & SDL_HAT_RIGHT) {
533 tux.input.right = DOWN;
534 } else if(event.jhat.value == SDL_HAT_CENTERED) {
536 tux.input.right = UP;
542 case SDL_JOYBUTTONDOWN:
543 if (event.jbutton.button == joystick_keymap.a_button)
544 tux.input.jump = DOWN;
545 else if (event.jbutton.button == joystick_keymap.b_button)
546 tux.input.fire = DOWN;
547 else if (event.jbutton.button == joystick_keymap.start_button)
550 case SDL_JOYBUTTONUP:
551 if (event.jbutton.button == joystick_keymap.a_button)
553 else if (event.jbutton.button == joystick_keymap.b_button)
566 GameSession::check_end_conditions()
568 Player* tux = currentsector->player;
571 Tile* endtile = collision_goal(tux->base);
573 if(end_sequence && !endsequence_timer.check())
575 exit_status = ES_LEVEL_FINISHED;
576 global_stats += last_swap_stats; // add swap points stats
579 else if(end_sequence == ENDSEQUENCE_RUNNING && endtile && endtile->data >= 1)
581 end_sequence = ENDSEQUENCE_WAITING;
583 else if(!end_sequence && endtile && endtile->data == 0)
585 end_sequence = ENDSEQUENCE_RUNNING;
586 endsequence_timer.start(7000); // 5 seconds until we finish the map
588 SoundManager::get()->play_music(level_end_song, 0);
589 tux->invincible_timer.start(7000); //FIXME: Implement a winning timer for the end sequence (with special winning animation etc.)
591 // add left time to stats
592 global_stats.set_points(TIME_NEEDED_STAT, time_left.get_gone() / 1000);
594 random_timer.start(200); // start 1st firework
596 else if (!end_sequence && tux->is_dead())
598 player_status.bonus = PlayerStatus::NO_BONUS;
600 if (player_status.lives < 0)
602 exit_status = ES_GAME_OVER;
605 { // Still has lives, so reset Tux to the levelstart
614 GameSession::action(double frame_ratio)
616 if (exit_status == ES_NONE && !currentsector->player->growing_timer.check())
618 // Update Tux and the World
619 currentsector->action(frame_ratio);
622 // respawning in new sector?
623 if(newsector != "" && newspawnpoint != "") {
624 Sector* sector = level->get_sector(newsector);
625 currentsector = sector;
626 currentsector->activate(newspawnpoint);
627 currentsector->play_music(LEVEL_MUSIC);
628 newsector = newspawnpoint = "";
631 // on end sequence make a few fireworks
632 if(end_sequence == ENDSEQUENCE_RUNNING && !random_timer.check() &&
633 currentsector->end_sequence_animation() == FIREWORKS_ENDSEQ_ANIM)
635 Vector epicenter = currentsector->camera->get_translation();
636 epicenter.x += screen->w * ((float)rand() / RAND_MAX);
637 epicenter.y += (screen->h/2) * ((float)rand() / RAND_MAX);
639 int red = rand() % 255; // calculate firework color
640 int green = rand() % red;
641 currentsector->add_particles(epicenter, Vector(1.4,1.4), Vector(0,0),
642 45, Color(red,green,0), 3, 1300);
644 SoundManager::get()->play_sound(IDToSound(SND_FIREWORKS));
645 random_timer.start(rand() % 400 + 600); // next firework
652 currentsector->draw(*context);
653 drawstatus(*context);
657 int x = screen->h / 20;
658 for(int i = 0; i < x; ++i)
660 context->draw_filled_rect(
661 Vector(i % 2 ? (pause_menu_frame * i)%screen->w :
662 -((pause_menu_frame * i)%screen->w)
663 ,(i*20+pause_menu_frame)%screen->h),
664 Vector(screen->w,10),
665 Color(20,20,20, rand() % 20 + 1), LAYER_FOREGROUND1+1);
667 context->draw_filled_rect(
668 Vector(0,0), Vector(screen->w, screen->h),
669 Color(rand() % 50, rand() % 50, rand() % 50, 128), LAYER_FOREGROUND1);
670 context->draw_text(blue_text, _("PAUSE - Press 'P' To Play"),
671 Vector(screen->w/2, 230), CENTER_ALLIGN, LAYER_FOREGROUND1+2);
675 sprintf(str1, _("Playing: "));
676 sprintf(str2, level->name.c_str());
678 context->draw_text(blue_text, str1,
679 Vector((screen->w - (blue_text->get_text_width(str1) + white_text->get_text_width(str2)))/2, 340),
680 LEFT_ALLIGN, LAYER_FOREGROUND1+2);
681 context->draw_text(white_text, str2,
682 Vector(((screen->w - (blue_text->get_text_width(str1) + white_text->get_text_width(str2)))/2)+blue_text->get_text_width(str1), 340),
683 LEFT_ALLIGN, LAYER_FOREGROUND1+2);
688 Menu::current()->draw(*context);
689 mouse_cursor->draw(*context);
692 context->do_drawing();
696 GameSession::process_menu()
698 Menu* menu = Menu::current();
703 if(menu == game_menu)
705 switch (game_menu->check())
710 case MNID_ABORTLEVEL:
712 exit_status = ES_LEVEL_ABORT;
716 else if(menu == options_menu)
718 process_options_menu();
720 else if(menu == load_game_menu )
722 process_load_game_menu();
727 GameSession::ExitStatus
730 Menu::set_current(0);
737 // Eat unneeded events
739 while (SDL_PollEvent(&event)) {}
743 while (exit_status == ES_NONE)
745 /* Calculate the movement-factor */
746 double frame_ratio = frame_rate.get();
748 if(!frame_timer.check())
750 frame_timer.start(25);
751 ++global_frame_counter;
755 currentsector->player->input.old_fire
756 = currentsector->player->input.fire;
761 // Update the world state and all objects in the world
762 // Do that with a constante time-delta so that the game will run
763 // determistic and not different on different machines
764 if(!game_pause && !Menu::current())
767 check_end_conditions();
768 if (end_sequence == ENDSEQUENCE_RUNNING)
769 action(frame_ratio/2);
770 else if(end_sequence == NO_ENDSEQUENCE)
781 /* Time stops in pause mode */
782 if(game_pause || Menu::current())
790 if (!time_left.check() && currentsector->player->dying == DYING_NOT
792 currentsector->player->kill(Player::KILL);
795 if(currentsector->player->invincible_timer.check() && !end_sequence)
797 currentsector->play_music(HERRING_MUSIC);
799 /* are we low on time ? */
800 else if (time_left.get_left() < TIME_WARNING && !end_sequence)
802 currentsector->play_music(HURRYUP_MUSIC);
804 /* or just normal music? */
805 else if(currentsector->get_music_type() != LEVEL_MUSIC && !end_sequence)
807 currentsector->play_music(LEVEL_MUSIC);
810 /* Calculate frames per second */
814 fps_fps = (1000.0 / (float)fps_timer.get_gone()) * (float)fps_cnt;
816 if(!fps_timer.check())
818 fps_timer.start(1000);
828 GameSession::respawn(const std::string& sector, const std::string& spawnpoint)
831 newspawnpoint = spawnpoint;
834 /* Bounce a brick: */
835 void bumpbrick(float x, float y)
837 Sector::current()->add_bouncy_brick(Vector(((int)(x + 1) / 32) * 32,
838 (int)(y / 32) * 32));
840 SoundManager::get()->play_sound(IDToSound(SND_BRICK), Vector(x, y), Sector::current()->player->get_pos());
845 GameSession::drawstatus(DrawingContext& context)
849 snprintf(str, 60, " %d", global_stats.get_points(SCORE_STAT));
850 context.draw_text(white_text, _("SCORE"), Vector(0, 0), LEFT_ALLIGN, LAYER_FOREGROUND1);
851 context.draw_text(gold_text, str, Vector(96, 0), LEFT_ALLIGN, LAYER_FOREGROUND1);
853 if(st_gl_mode == ST_GL_TEST)
855 context.draw_text(white_text, _("Press ESC To Return"), Vector(0,20),
856 LEFT_ALLIGN, LAYER_FOREGROUND1);
859 if(!time_left.check()) {
860 context.draw_text(white_text, _("TIME's UP"), Vector(screen->w/2, 0),
861 CENTER_ALLIGN, LAYER_FOREGROUND1);
862 } else if (time_left.get_left() > TIME_WARNING || (global_frame_counter % 10) < 5) {
863 sprintf(str, " %d", time_left.get_left() / 1000 );
864 context.draw_text(white_text, _("TIME"),
865 Vector(screen->w/2, 0), CENTER_ALLIGN, LAYER_FOREGROUND1);
866 context.draw_text(gold_text, str,
867 Vector(screen->w/2 + 4*16, 0), CENTER_ALLIGN, LAYER_FOREGROUND1);
870 sprintf(str, " %d", player_status.distros);
871 context.draw_text(white_text, _("COINS"),
872 Vector(screen->w - white_text->get_text_width(_("COINS"))-white_text->get_text_width(" 99"), 0),
873 LEFT_ALLIGN, LAYER_FOREGROUND1);
874 context.draw_text(gold_text, str,
875 Vector(screen->w - gold_text->get_text_width(" 99"), 0),LEFT_ALLIGN, LAYER_FOREGROUND1);
877 if (player_status.lives >= 5)
879 sprintf(str, "%dx", player_status.lives);
880 float x = screen->w - gold_text->get_text_width(str) - tux_life->w;
881 context.draw_text(gold_text, str, Vector(x, 20), LEFT_ALLIGN, LAYER_FOREGROUND1);
882 context.draw_surface(tux_life, Vector(screen->w - 16, 20),
887 for(int i= 0; i < player_status.lives; ++i)
888 context.draw_surface(tux_life,
889 Vector(screen->w - tux_life->w*4 +(tux_life->w*i), 20),
893 context.draw_text(white_text, _("LIVES"),
894 Vector(screen->w - white_text->get_text_width(_("LIVES")) - white_text->get_text_width(" 99"), 20),
895 LEFT_ALLIGN, LAYER_FOREGROUND1);
899 sprintf(str, "%2.1f", fps_fps);
900 context.draw_text(white_text, "FPS",
901 Vector(screen->w - white_text->get_text_width("FPS "), 40),
902 LEFT_ALLIGN, LAYER_FOREGROUND1);
903 context.draw_text(gold_text, str,
904 Vector(screen->w-4*16, 40), LEFT_ALLIGN, LAYER_FOREGROUND1);
909 GameSession::drawresultscreen(void)
913 DrawingContext context;
914 currentsector->background->draw(context);
916 context.draw_text(blue_text, _("Result:"), Vector(screen->w/2, 200),
917 CENTER_ALLIGN, LAYER_FOREGROUND1);
919 sprintf(str, _("SCORE: %d"), global_stats.get_points(SCORE_STAT));
920 context.draw_text(gold_text, str, Vector(screen->w/2, 224), CENTER_ALLIGN, LAYER_FOREGROUND1);
922 sprintf(str, _("COINS: %d"), player_status.distros);
923 context.draw_text(gold_text, str, Vector(screen->w/2, 256), CENTER_ALLIGN, LAYER_FOREGROUND1);
925 context.do_drawing();
928 wait_for_event(event,2000,5000,true);
931 std::string slotinfo(int slot)
934 std::string slotfile;
936 std::stringstream stream;
938 slotfile = st_save_dir + "/slot" + stream.str() + ".stsg";
940 lisp_object_t* savegame = lisp_read_from_file(slotfile.c_str());
943 LispReader reader(lisp_cdr(savegame));
944 reader.read_string("title", title);
948 if (access(slotfile.c_str(), F_OK) == 0)
951 tmp = "Slot " + stream.str() + " - " + title;
953 tmp = "Slot " + stream.str() + " - Savegame";
956 tmp = std::string(_("Slot")) + " " + stream.str() + " - " + std::string(_("Free"));
961 bool process_load_game_menu()
963 int slot = load_game_menu->check();
965 if(slot != -1 && load_game_menu->get_item_by_id(slot).kind == MN_ACTION)
967 std::stringstream stream;
969 std::string slotfile = st_save_dir + "/slot" + stream.str() + ".stsg";
971 if (access(slotfile.c_str(), F_OK) != 0)
976 // shrink_fade(Point((screen->w/2),(screen->h/2)), 1000);
979 DrawingContext context;
980 context.draw_text(white_text, "Loading...",
981 Vector(screen->w/2, screen->h/2), CENTER_ALLIGN, LAYER_FOREGROUND1);
982 context.do_drawing();
984 WorldMapNS::WorldMap worldmap;
986 worldmap.set_map_filename("icyisland.stwm");
987 // Load the game or at least set the savegame_file variable
988 worldmap.loadgame(slotfile);
992 Menu::set_current(main_menu);