fix some more timings and the long standing gradient software bug (which was function...
[supertux.git] / src / title.cpp
index deddd5a..e150112 100644 (file)
@@ -1,20 +1,33 @@
-/*
-  title.c
-  
-  Super Tux - Title Screen
-  
-  by Bill Kendrick
-  bill@newbreedsoftware.com
-  http://www.newbreedsoftware.com/supertux/
-  
-  April 11, 2000 - March 15, 2004
-*/
-
+//  $Id$
+// 
+//  SuperTux
+//  Copyright (C) 2000 Bill Kendrick <bill@newbreedsoftware.com>
+//  Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
+//
+//  This program is free software; you can redistribute it and/or
+//  modify it under the terms of the GNU General Public License
+//  as published by the Free Software Foundation; either version 2
+//  of the License, or (at your option) any later version.
+//
+//  This program is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+//  GNU General Public License for more details.
+// 
+//  You should have received a copy of the GNU General Public License
+//  along with this program; if not, write to the Free Software
+//  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+//  02111-1307, USA.
+#include <config.h>
+
+#include <iostream>
+#include <sstream>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
 #include <errno.h>
 #include <unistd.h>
+#include <cmath>
 #include <SDL.h>
 #include <SDL_image.h>
 
 #endif
 
 #include "defines.h"
-#include "globals.h"
+#include "app/globals.h"
 #include "title.h"
-#include "screen.h"
+#include "video/screen.h"
+#include "video/surface.h"
 #include "high_scores.h"
-#include "menu.h"
-#include "texture.h"
+#include "gui/menu.h"
 #include "timer.h"
-#include "setup.h"
+#include "special/frame_rate.h"
+#include "app/setup.h"
 #include "level.h"
+#include "level_subset.h"
 #include "gameloop.h"
+#include "worldmap.h"
 #include "leveleditor.h"
 #include "scene.h"
 #include "player.h"
-#include "math.h"
 #include "tile.h"
+#include "sector.h"
+#include "tilemap.h"
 #include "resources.h"
+#include "app/gettext.h"
+#include "misc.h"
+#include "camera.h"
 
-static texture_type bkg_title;
-static texture_type logo;
-static texture_type img_choose_subset;
+static Surface* bkg_title;
+static Surface* logo;
+static Surface* img_choose_subset;
 
 static bool walking;
-static Timer random_timer;
+static Timer2 random_timer;
+
+static int frame;
 
-static SDL_Event event;
-static SDLKey key;
-static int frame, i;
-static unsigned int last_update_time;
-static unsigned int update_time;
+static GameSession* titlesession;
 
-void display_credits();
+static std::vector<LevelSubset*> contrib_subsets;
+static LevelSubset* current_contrib_subset = 0;
+static int first_level_index;
 
-void draw_background()
+static std::set<std::string> worldmap_list;
+
+static FrameRate frame_rate(100);  
+
+/* If the demo was stopped - because game started, level
+   editor was excuted, etc - call this when you get back
+   to the title code.
+ */
+void resume_demo()
 {
-  /* Draw the title background: */
+  // FIXME: shouldn't be needed if GameSession
+  // didn't relay on global variables
+  titlesession->get_current_sector()->activate();
+  titlesession->set_current();
 
-  texture_draw_bg(&bkg_title);
+  frame_rate.update();
 }
 
-void draw_demo(GameSession* session, double frame_ratio)
+void update_load_save_game_menu(Menu* pmenu)
 {
-  World::set_current(session->get_world());
-  //World* world  = session->get_world();
-  Level* plevel = session->get_level();
-  Player* tux = session->get_world()->get_tux();
-  
-  /* FIXME:
-  // update particle systems
-  std::vector<ParticleSystem*>::iterator p;
-  for(p = particle_systems.begin(); p != particle_systems.end(); ++p)
+  for(int i = 2; i < 7; ++i)
     {
-      (*p)->simulate(frame_ratio);
+      // FIXME: Insert a real savegame struct/class here instead of
+      // doing string vodoo
+      std::string tmp = slotinfo(i - 1);
+      pmenu->item[i].kind = MN_ACTION;
+      pmenu->item[i].change_text(tmp.c_str());
     }
+}
 
-  // Draw particle systems (background)
-  for(p = particle_systems.begin(); p != particle_systems.end(); ++p)
+void free_contrib_menu()
+{
+  for(std::vector<LevelSubset*>::iterator i = contrib_subsets.begin();
+      i != contrib_subsets.end(); ++i)
+    delete *i;
+
+  contrib_subsets.clear();
+  contrib_menu->clear();
+}
+
+void generate_contrib_menu()
+{
+  /** Generating contrib levels list by making use of Level Subset  */
+  std::set<std::string> level_subsets = FileSystem::dsubdirs("/levels", "info");
+
+  free_contrib_menu();
+
+  contrib_menu->additem(MN_LABEL,_("Contrib Levels"),0,0);
+  contrib_menu->additem(MN_HL,"",0,0);
+  int i = 0;
+
+  for(std::set<std::string>::iterator it = worldmap_list.begin(); it != worldmap_list.end(); ++it)
     {
-      (*p)->draw(scroll_x, 0, 0);
+    WorldMapNS::WorldMap worldmap;
+    worldmap.loadmap((*it).c_str());
+    contrib_menu->additem(MN_ACTION, worldmap.get_world_title(),0,0, i);
+    ++i;
     }
-  */
 
-  // Draw interactive tiles:
-  for (int y = 0; y < 15; ++y)
+  contrib_menu->additem(MN_HL,"",0,0);
+
+  first_level_index = i;
+  for (std::set<std::string>::iterator it = level_subsets.begin(); it != level_subsets.end(); ++it)
     {
-      for (int x = 0; x < 21; ++x)
+      LevelSubset* subset = new LevelSubset();
+      subset->load(*it);
+      if(subset->hide_from_contribs)
         {
-          Tile::draw(32*x - fmodf(scroll_x, 32), y * 32,
-                     plevel->ia_tiles[(int)y][(int)x + (int)(scroll_x / 32)]);
+        delete subset;
+        continue;
         }
+      contrib_menu->additem(MN_GOTO, subset->title, 0, contrib_subset_menu, i);
+      contrib_subsets.push_back(subset);
+      ++i;
     }
 
-  global_frame_counter++;
-  tux->key_event(SDLK_RIGHT,DOWN);
-  
-  if(random_timer.check())
+  contrib_menu->additem(MN_HL,"",0,0);
+  contrib_menu->additem(MN_BACK,_("Back"),0,0);
+
+  level_subsets.clear();
+}
+
+void check_levels_contrib_menu()
+{
+  static int current_subset = -1;
+
+  int index = contrib_menu->check();
+  if (index == -1)
+    return;
+
+  if((unsigned)index < worldmap_list.size())
     {
-      if(walking)
-        tux->key_event(SDLK_UP,UP);
-      else
-        tux->key_event(SDLK_UP,DOWN);
+    WorldMapNS::WorldMap worldmap;
+    std::set<std::string>::iterator it = worldmap_list.begin();
+    for(int i = index; i > 0; --i)
+    ++it;
+
+    std::string map_filename = *it;
+
+    // some fading
+    fadeout(256);
+    DrawingContext context;
+      context.draw_text(white_text, "Loading...",
+                        Vector(screen->w/2, screen->h/2), CENTER_ALLIGN, LAYER_FOREGROUND1);
+      context.do_drawing();
+
+    worldmap.set_map_filename(map_filename);
+
+    // hack to erase the extension
+    unsigned int ext_pos = it->find_last_of(".");
+    if(ext_pos != std::string::npos)
+      map_filename.erase(ext_pos, map_filename.size() - ext_pos);
+
+    // TODO: slots should be available for contrib maps
+    worldmap.loadgame(st_save_dir + "/" + map_filename + "-slot1.stsg");
+
+    worldmap.display();  // run the map
+
+    Menu::set_current(main_menu);
+    resume_demo();
     }
-  else
+  else if (index < (int)contrib_subsets.size() + first_level_index)
     {
-      random_timer.start(rand() % 3000 + 3000);
-      walking = !walking;
+    index -= first_level_index;
+    if (current_subset != index)
+      {
+      current_subset = index;
+      // FIXME: This shouln't be busy looping
+      LevelSubset& subset = * (contrib_subsets[index]);
+
+      current_contrib_subset = &subset;
+
+      contrib_subset_menu->clear();
+
+      contrib_subset_menu->additem(MN_LABEL, subset.title, 0,0);
+      contrib_subset_menu->additem(MN_HL,"",0,0);
+
+      for (int i = 0; i < subset.get_num_levels(); ++i)
+        {
+        /** get level's title */
+        std::string level_title = "<no title>";
+
+        std::string filename = subset.get_level_filename(i);
+        std::string filepath;
+        filepath = st_dir + "/levels/" + filename;
+        if (access(filepath.c_str(), R_OK) != 0)
+        {
+          filepath = datadir + "/levels/" + filename;
+          if (access(filepath.c_str(), R_OK) != 0)
+          {
+            std::cerr << "Error: Level: couldn't find level: " << filename << std::endl;
+            continue;
+          }
+        }
+        
+        LispReader* reader = LispReader::load(filepath, "supertux-level");
+        if(!reader)
+          {
+          std::cerr << "Error: Could not open level file. Ignoring...\n";
+          continue;
+          }
+
+        reader->read_string("name", level_title, true);
+        delete reader;
+
+        contrib_subset_menu->additem(MN_ACTION, level_title, 0, 0, i);
+        }
+
+      contrib_subset_menu->additem(MN_HL,"",0,0);      
+      contrib_subset_menu->additem(MN_BACK, _("Back"), 0, 0);
+
+      titlesession->get_current_sector()->activate();
+      titlesession->set_current();
+      }
     }
+}
+
+void check_contrib_subset_menu()
+{
+  int index = contrib_subset_menu->check();
+  if (index != -1)
+    {
+      if (contrib_subset_menu->get_item_by_id(index).kind == MN_ACTION)
+        {
+          std::cout << "Starting level: " << index << std::endl;
+          
+          GameSession session(
+              current_contrib_subset->get_level_filename(index), ST_GL_PLAY);
+          session.run();
+          player_status.reset();
+          Menu::set_current(main_menu);
+          resume_demo();
+        }
+    }  
+}
+
+void draw_demo(float elapsed_time)
+{
+  Sector* world  = titlesession->get_current_sector();
+  Player* tux = world->player;
+
+  world->play_music(LEVEL_MUSIC);
   
+  tux->key_event((SDLKey) keymap.right,DOWN);
+  
+  if(random_timer.check()) {
+    random_timer.start(float(rand() % 3000 + 3000) / 1000.);
+    walking = !walking;
+  } else {
+      if(walking)
+        tux->key_event((SDLKey) keymap.jump,UP);
+      else
+        tux->key_event((SDLKey) keymap.jump,DOWN);
+  }
+
   // Wrap around at the end of the level back to the beginnig
-  if(plevel->width * 32 - 320 < tux->base.x)
+  if(world->solids->get_width() * 32 - 320 < tux->get_pos().x)
     {
-      tux->base.x = tux->base.x - (plevel->width * 32 - 640);
-      scroll_x = tux->base.x - 320;
+      tux->level_begin();
+      world->camera->reset(tux->get_pos());
     }
 
+  tux->can_jump = true;
+  float last_tux_x_pos = tux->get_pos().x;
+  world->action(elapsed_time);
+  
 
-
-  float last_tux_x_pos = tux->base.x;
-  tux->action(frame_ratio);
-
+  // disabled for now, since with the new jump code we easily get deadlocks
   // Jump if tux stays in the same position for one loop, ie. if he is
   // stuck behind a wall
-  if (last_tux_x_pos == tux->base.x)
-    walking = false;
-
-  tux->draw();
+  if (last_tux_x_pos == tux->get_pos().x)
+    {
+      walking = false;
+    }
 
-  /* DEMO end */
+  world->draw(*titlesession->context);
 }
 
 /* --- TITLE SCREEN --- */
-bool title(void)
+void title(void)
 {
-  string_list_type level_subsets;
-  st_subset subset;
-  level_subsets = dsubdirs("/levels", "info");
-  random_timer.init(true);
-
   walking = true;
+  LevelEditor* leveleditor;
 
-  st_pause_ticks_init();
-
-  GameSession session(datadir + "/levels/misc/menu.stl");
-  loadshared();
-
-  //FIXME:activate_particle_systems();
-
-  /* Reset menu variables */
-  menu_reset();
-  Menu::set_current(main_menu);
+  Ticks::pause_init();
 
-  clearscreen(0, 0, 0);
-  updatescreen();
+  titlesession = new GameSession("misc/menu.stl", ST_GL_DEMO_GAME);
 
   /* Load images: */
+  bkg_title = new Surface(datadir + "/images/background/arctis.jpg", false);
+  logo = new Surface(datadir + "/images/title/logo.png", true);
+  img_choose_subset = new Surface(datadir + "/images/status/choose-level-subset.png", true);
+
+  /* Generating contrib maps by only using a string_list */
+  worldmap_list = FileSystem::dfiles("levels/worldmap", "", "icyisland.stwm");
 
-  texture_load(&bkg_title,datadir + "/images/title/background.jpg", IGNORE_ALPHA);
-  texture_load(&logo,datadir + "/images/title/logo.png", USE_ALPHA);
-  texture_load(&img_choose_subset,datadir + "/images/status/choose-level-subset.png", USE_ALPHA);
+  titlesession->get_current_sector()->activate();
+  titlesession->set_current();
 
   /* --- Main title loop: --- */
-  bool done = 0;
-  show_menu = 1;
   frame = 0;
 
-  /* Draw the title background: */
-  texture_draw_bg(&bkg_title);
-  load_hs();
-
-  update_time = st_get_ticks();
-  random_timer.start(rand() % 2000 + 2000);
+  random_timer.start(float(rand() % 2000 + 2000) / 1000.0);
 
-  while (!done)
+  Uint32 lastticks = SDL_GetTicks();
+  
+  Menu::set_current(main_menu);
+  DrawingContext& context = *titlesession->context;
+  while (Menu::current())
     {
-      /* Calculate the movement-factor */
-      double frame_ratio = ((double)(update_time-last_update_time))/((double)FRAME_RATE);
-      if(frame_ratio > 1.5) /* Quick hack to correct the unprecise CPU clocks a little bit. */
-        frame_ratio = 1.5 + (frame_ratio - 1.5) * 0.85;
-      /* Lower the frame_ratio that Tux doesn't jump to hectically throught the demo. */
-      frame_ratio /= 2;
-
-      /* Handle events: */
+      // Calculate the movement-factor
+      Uint32 ticks = SDL_GetTicks();
+      float elapsed_time = float(ticks - lastticks) / 1000.;
+      global_time += elapsed_time;
+      lastticks = ticks;
+      // 40fps is minimum
+      if(elapsed_time > .04)
+        elapsed_time = .04;
+      
+      /* Lower the speed so that Tux doesn't jump too hectically throught
+         the demo. */
+      elapsed_time /= 2;
 
+      SDL_Event event;
       while (SDL_PollEvent(&event))
         {
-          menu_event(event);
-          if (event.type == SDL_QUIT)
+          if (Menu::current())
             {
-              done = true;
-            }
-          else if (event.type == SDL_KEYDOWN)
-            {
-              /* Keypress... */
-              key = event.key.keysym.sym;
-
-              /* Check for menu events */
-              //menu_event(event);
-
-              if (key == SDLK_ESCAPE)
-                {
-                  /* Escape: Quit: */
-                  done = true;
-                }
+              Menu::current()->event(event);
             }
+         // FIXME: QUIT signal should be handled more generic, not locally
+          if (event.type == SDL_QUIT)
+            Menu::set_current(0);
         }
-
+  
       /* Draw the background: */
-      draw_background();
-      draw_demo(&session, frame_ratio);
+      draw_demo(elapsed_time);
       
-      if (current_menu == main_menu)
-        texture_draw(&logo, 160, 30);
-
-      text_draw(&white_small_text, 
-                " SuperTux " VERSION "\n"
-                "Copyright (c) 2003 SuperTux Devel Team\n"
-                "This game comes with ABSOLUTELY NO WARRANTY. This is free software, and you\n"
-                "are welcome to redistribute it under certain conditions; see the file COPYING\n"
-                "for details.\n",
-                0, 420, 0);
-
-      /* Draw the high score: */
-      /*
-        sprintf(str, "High score: %d", hs_score);
-        text_drawf(&gold_text, str, 0, -40, A_HMIDDLE, A_BOTTOM, 1);
-        sprintf(str, "by %s", hs_name);
-        text_drawf(&gold_text, str, 0, -20, A_HMIDDLE, A_BOTTOM, 1);
-      */
+      
+      if (Menu::current() == main_menu)
+        context.draw_surface(logo, Vector(screen->w/2 - logo->w/2, 30),
+            LAYER_FOREGROUND1+1);
+
+      context.draw_text(white_small_text, " SuperTux " PACKAGE_VERSION "\n",
+              Vector(0, screen->h - 70), LEFT_ALLIGN, LAYER_FOREGROUND1);
+      context.draw_text(white_small_text,
+        _("Copyright (c) 2003 SuperTux Devel Team\n"
+          "This game comes with ABSOLUTELY NO WARRANTY. This is free software, and you\n"
+          "are welcome to redistribute it under certain conditions; see the file COPYING\n"
+          "for details.\n"), Vector(0, screen->h - 70 + white_small_text->get_height()), LEFT_ALLIGN, LAYER_FOREGROUND1);
 
       /* Don't draw menu, if quit is true */
-      if(show_menu && !done)
-        menu_process_current();
-
-      if(current_menu == main_menu)
+      Menu* menu = Menu::current();
+      if(menu)
         {
-          switch (main_menu->check())
+          menu->draw(context);
+          menu->action();
+         
+          if(menu == main_menu)
             {
-#if 0
-            case 0:
-              // Quick Play
-              // FIXME: obsolete
-              done = 0;
-              i = 0;
-              if(level_subsets.num_items != 0)
+              switch (main_menu->check())
                 {
-                  subset.load(level_subsets.item[0]);
-                  while(!done)
-                    {
-                      texture_draw(&img_choose_subset,(screen->w - img_choose_subset.w) / 2, 0);
-                      if(level_subsets.num_items != 0)
-                        {
-                          texture_draw(&subset.image,(screen->w - subset.image.w) / 2 + 25,78);
-                          if(level_subsets.num_items > 1)
-                            {
-                              if(i > 0)
-                                texture_draw(&arrow_left,(screen->w / 2) - ((subset.title.length()+2)*16)/2,20);
-                              if(i < level_subsets.num_items-1)
-                                texture_draw(&arrow_right,(screen->w / 2) + ((subset.description.length())*16)/2,20);
-                            }
-                          text_drawf(&gold_text, subset.title.c_str(), 0, 20, A_HMIDDLE, A_TOP, 1);
-                          text_drawf(&gold_text, subset.description.c_str(), 20, -20, A_HMIDDLE, A_BOTTOM, 1);
-                        }
-                      updatescreen();
-                      SDL_Delay(50);
-                      while(SDL_PollEvent(&event) && !done)
-                        {
-                          switch(event.type)
-                            {
-                            case SDL_QUIT:
-                              done = true;
-                              break;
-                            case SDL_KEYDOWN:          // key pressed
-                              // Keypress...
-                              key = event.key.keysym.sym;
-
-                              if(key == SDLK_LEFT)
-                                {
-                                  if(i > 0)
-                                    {
-                                      --i;
-                                      subset.free();
-                                      subset.load(level_subsets.item[i]);
-                                    }
-                                }
-                              else if(key == SDLK_RIGHT)
-                                {
-                                  if(i < level_subsets.num_items -1)
-                                    {
-                                      ++i;
-                                      subset.free();
-                                      subset.load(level_subsets.item[i]);
-                                    }
-                                }
-                              else if(key == SDLK_SPACE || key == SDLK_RETURN)
-                                {
-                                  done = true;
-                                  quit = gameloop(subset.name.c_str(),1,ST_GL_PLAY);
-                                  subset.free();
-                                }
-                              else if(key == SDLK_ESCAPE)
-                                {
-                                  done = true;
-                                }
-                              break;
-                            default:
-                              break;
-                            }
-                        }
-                    }
+                case MNID_STARTGAME:
+                  // Start Game, ie. goto the slots menu
+                  update_load_save_game_menu(load_game_menu);
+                  break;
+                case MNID_LEVELS_CONTRIB:
+                  // Contrib Menu
+                  puts("Entering contrib menu");
+                  generate_contrib_menu();
+                  break;
+                case MNID_LEVELEDITOR:
+                  leveleditor = new LevelEditor();
+                  leveleditor->run();
+                  delete leveleditor;
+                  Menu::set_current(main_menu);
+                  resume_demo();
+                  break;
+                case MNID_CREDITS:
+                  fadeout(500);
+                  display_text_file("credits.txt", SCROLL_SPEED_CREDITS, white_big_text , white_text, white_small_text, blue_text );
+                  fadeout(500);
+                  Menu::set_current(main_menu);
+                  break;
+                case MNID_QUITMAINMENU:
+                  Menu::set_current(0);
+                  break;
                 }
-              // reset tux
-              scroll_x = 0;
-              titletux.level_begin();
-              update_time = st_get_ticks();
-              break;
-#endif
-            case 0:
-              // Start Game, ie. goto the slots menu
-              update_load_save_game_menu(load_game_menu, true);
-              break;
-            case 1:
-              // Contrib Menu
-              break;
-            case 3:
-              done = 1;
-              done = leveleditor(1);
-              break;
-            case 4:
-              display_credits();
-              break;
-            case 5:
-              done = true;
-              break;
             }
-        }
-      else if(current_menu == options_menu)
-        {
-          process_options_menu();
-        }
-      else if(current_menu == load_game_menu)
-        {
-          if (process_load_game_menu())
+          else if(menu == options_menu)
             {
-              // FIXME: shouldn't be needed if GameSession doesn't relay on global variables
-              // reset tux
-              scroll_x = 0;
-              //titletux.level_begin();
-              update_time = st_get_ticks();
+              process_options_menu();
+            }
+          else if(menu == load_game_menu)
+            {
+              if(event.key.keysym.sym == SDLK_DELETE)
+                {
+                int slot = menu->get_active_item_id();
+                std::stringstream stream;
+                stream << slot;
+                std::string str = _("Are you sure you want to delete slot") + stream.str() + "?";
+                
+                if(confirm_dialog(bkg_title, str.c_str()))
+                  {
+                  str = st_save_dir + "/slot" + stream.str() + ".stsg";
+                  printf("Removing: %s\n",str.c_str());
+                  remove(str.c_str());
+                  }
+
+                update_load_save_game_menu(load_game_menu);
+                Menu::set_current(main_menu);
+                resume_demo();
+                }
+              else if (process_load_game_menu())
+                {
+                  resume_demo();
+                }
+            }
+          else if(menu == contrib_menu)
+            {
+              check_levels_contrib_menu();
+            }
+          else if (menu == contrib_subset_menu)
+            {
+              check_contrib_subset_menu();
             }
-        }
-      else if(current_menu == contrib_menu)
-        {
-          
         }
 
-      mouse_cursor->draw();
-      
-      flipscreen();
+      mouse_cursor->draw(context);
+     
+      context.do_drawing();
 
-      /* Set the time of the last update and the time of the current update */
-      last_update_time = update_time;
-      update_time = st_get_ticks();
+      frame_rate.update();
 
       /* Pause: */
       frame++;
-      SDL_Delay(25);
-
     }
   /* Free surfaces: */
 
-  texture_free(&bkg_title);
-  texture_free(&logo);
-  string_list_free(&level_subsets);
-
-  /* Return to main! */
-  return done;
+  free_contrib_menu();
+  worldmap_list.clear();
+  delete titlesession;
+  delete bkg_title;
+  delete logo;
+  delete img_choose_subset;
 }
 
-#define MAX_VEL 10
-#define SPEED   1
-#define SCROLL  60
-
-void display_credits()
-{
-  int done;
-  int scroll, speed;
-  Timer timer;
-  int n,d;
-  int length;
-  FILE* fi;
-  char temp[1024];
-  string_list_type names;
-  char filename[1024];
-  string_list_init(&names);
-  sprintf(filename,"%s/CREDITS", datadir.c_str());
-  if((fi = fopen(filename,"r")) != NULL)
-    {
-      while(fgets(temp, sizeof(temp), fi) != NULL)
-        {
-          temp[strlen(temp)-1]='\0';
-          string_list_add_item(&names,temp);
-        }
-      fclose(fi);
-    }
-  else
-    {
-      string_list_add_item(&names,"Credits were not found!");
-      string_list_add_item(&names,"Shame on the guy, who");
-      string_list_add_item(&names,"forgot to include them");
-      string_list_add_item(&names,"in your SuperTux distribution.");
-    }
-
-
-  timer.init(SDL_GetTicks());
-  timer.start(50);
-
-  scroll = 0;
-  speed = 2;
-  done = 0;
-
-  n = d = 0;
-
-  length = names.num_items;
-
-  SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
-
-  while(done == 0)
-    {
-      /* in case of input, exit */
-      while(SDL_PollEvent(&event))
-        switch(event.type)
-          {
-          case SDL_KEYDOWN:
-            switch(event.key.keysym.sym)
-              {
-              case SDLK_UP:
-                speed -= SPEED;
-                break;
-              case SDLK_DOWN:
-                speed += SPEED;
-                break;
-              case SDLK_SPACE:
-              case SDLK_RETURN:
-                if(speed >= 0)
-                  scroll += SCROLL;
-                break;
-              case SDLK_ESCAPE:
-                done = 1;
-                break;
-              default:
-                break;
-              }
-            break;
-          case SDL_QUIT:
-            done = 1;
-            break;
-          default:
-            break;
-          }
-
-      if(speed > MAX_VEL)
-        speed = MAX_VEL;
-      else if(speed < -MAX_VEL)
-        speed = -MAX_VEL;
-
-      /* draw the credits */
-
-      draw_background();
-
-      text_drawf(&white_big_text, "- Credits -", 0, screen->h-scroll, A_HMIDDLE, A_TOP, 2);
-
-      for(i = 0, n = 0, d = 0; i < length; i++,n++,d++)
-        {
-          if(names.item[i] == "")
-            n--;
-          else
-            {
-              if(names.item[i][0] == ' ')
-                text_drawf(&white_small_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll-10, A_HMIDDLE, A_TOP, 1);
-              else if(names.item[i][0] == '    ')
-                text_drawf(&white_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 1);
-              else if(names.item[i+1][0] == '-' || names.item[i][0] == '-')
-                text_drawf(&white_big_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 3);
-              else
-                text_drawf(&blue_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 1);
-            }
-        }
 
-      flipscreen();
+// EOF //
 
-      if(60+screen->h+(n*18)+(d*18)-scroll < 0 && 20+60+screen->h+(n*18)+(d*18)-scroll < 0)
-        done = 1;
-
-      scroll += speed;
-      if(scroll < 0)
-        scroll = 0;
-
-      SDL_Delay(35);
-
-      if(timer.get_left() < 0)
-        {
-          frame++;
-          timer.start(50);
-        }
-    }
-  string_list_free(&names);
-
-  SDL_EnableKeyRepeat(0, 0);    // disables key repeating
-  show_menu = 1;
-  Menu::set_current(main_menu);
-}