fix tux jumping always full height
[supertux.git] / src / level.cpp
index 7b42e52..fd954a7 100644 (file)
@@ -18,6 +18,8 @@
 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 //  02111-1307, USA.
 
+#include <config.h>
+
 #include <map>
 #include <cstdlib>
 #include <cstdio>
 #include <fstream>
 #include <stdexcept>
 
-#include "globals.h"
-#include "setup.h"
+#include "app/globals.h"
+#include "app/setup.h"
 #include "camera.h"
-#include "screen/screen.h"
+#include "video/screen.h"
 #include "level.h"
-#include "physic.h"
+#include "math/physic.h"
 #include "scene.h"
 #include "sector.h"
 #include "tile.h"
-#include "lispreader.h"
+#include "utils/lispreader.h"
 #include "resources.h"
 #include "gameobjs.h"
-#include "lispwriter.h"
+#include "utils/lispwriter.h"
+#include "tilemap.h"
 
 using namespace std;
 
 Level::Level()
-  : name("noname"), author("mr. x"), time_left(500)
+  : name("noname"), author("mr. x"), timelimit(500),
+    end_sequence_type(NONE_ENDSEQ_ANIM) 
+{
+}
 
+void
+Level::create(const std::string& filename)
 {
+  Level level;
+  const size_t width = 25;
+  const size_t height = 19;
+  level.add_sector(Sector::create("main", width, height));
+  level.save(filename);
 }
 
 void
 Level::load(const std::string& filename)
 {
-  LispReader* level = LispReader::load(filename, "supertux-level");
+  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;
+      return;
+    }
+  }
+  
+  LispReader* level = LispReader::load(filepath, "supertux-level");
 
   int version = 1;
   level->read_int("version", version);
@@ -67,16 +92,28 @@ Level::load(const std::string& filename)
     lisp_object_t* data = lisp_car(lisp_cdr(lisp_car(cur)));
     LispReader reader(lisp_cdr(lisp_car(cur)));
 
-    if(token == "name") {
+    if(token == "version") {
+      if(lisp_integer(data) > 2) {
+        std::cerr << "Warning: level format newer than application.\n";
+      }
+    } else if(token == "name") {
       name = lisp_string(data);
     } else if(token == "author") {
       author = lisp_string(data);
     } else if(token == "time") {
-      time_left = lisp_integer(data);
+      timelimit = lisp_integer(data);
     } else if(token == "sector") {
       Sector* sector = new Sector;
       sector->parse(reader);
       add_sector(sector);
+    } else if(token == "end-sequence-animation") {
+      std::string endsequencename = lisp_string(data);
+      if(endsequencename == "fireworks") {
+        end_sequence_type = FIREWORKS_ENDSEQ_ANIM;
+      } else {
+        std::cout << "Unknown endsequence type: '" << endsequencename <<
+          "'.\n";
+      }
     } else {
       std::cerr << "Unknown token '" << token << "' in level file.\n";
       continue;
@@ -89,9 +126,9 @@ Level::load(const std::string& filename)
 void
 Level::load_old_format(LispReader& reader)
 {
-  reader.read_string("name", name);
+  reader.read_string("name", name, true);
   reader.read_string("author", author);
-  reader.read_int("time", time_left);
+  reader.read_int("time", timelimit);
 
   Sector* sector = new Sector;
   sector->parse_old_format(reader);
@@ -101,7 +138,11 @@ Level::load_old_format(LispReader& reader)
 void
 Level::save(const std::string& filename)
 {
- ofstream file(filename.c_str(), ios::out);
+ std::string filepath = "levels/" + filename;
+ int last_slash = filepath.find_last_of('/');
+ FileSystem::fcreatedir(filepath.substr(0,last_slash).c_str());
+ filepath = st_dir + "/" + filepath;
+ ofstream file(filepath.c_str(), ios::out);
  LispWriter* writer = new LispWriter(file);
 
  writer->write_comment("Level made using SuperTux's built-in Level Editor");
@@ -113,14 +154,15 @@ Level::save(const std::string& filename)
 
  writer->write_string("name", name);
  writer->write_string("author", author);
- writer->write_int("time", time_left);
+ writer->write_int("time", timelimit);
+ writer->write_string("end-sequence-animation",
+     end_sequence_type == FIREWORKS_ENDSEQ_ANIM ? "fireworks" : "none");
 
- for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
-   {
+ for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
    writer->start_list("sector");
    i->second->write(*writer);
    writer->end_list("sector");
  }
+ }
 
  writer->end_list("supertux-level");
 
@@ -157,3 +199,63 @@ Level::get_sector(const std::string& name)
   return i->second;
 }
 
+Sector*
+Level::get_next_sector(const Sector* sector)
+{
+  for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
+    {
+    if(i->second == sector)
+      {
+      i++;
+      if(i == sectors.end())
+        return NULL;
+      return i->second;
+      }
+    }
+  std::cerr << "Warning: Sector not found on level\n";
+  return NULL;
+}
+
+Sector*
+Level::get_previous_sector(const Sector* sector)
+{
+  for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
+    {
+    if(i->second == sector)
+      {
+      if(i == sectors.begin())
+        return NULL;
+      i--;
+      return i->second;
+      }
+    }
+  std::cerr << "Warning: Sector not found on level\n";
+  return NULL;
+}
+
+int
+Level::get_total_sectors()
+{
+return sectors.size();
+}
+
+int
+Level::get_total_badguys()
+{
+  int total_badguys = 0;
+  for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
+    total_badguys += i->second->get_total_badguys();
+  return total_badguys;
+}
+
+int
+Level::get_total_coins()
+{
+  int total_coins = 0;
+  for(Sectors::iterator it = sectors.begin(); it != sectors.end(); ++it)
+    for(int x = 0; static_cast<unsigned int>(x) < it->second->solids->get_width(); x++)
+      for(int y = 0; static_cast<unsigned int>(y) < it->second->solids->get_height(); y++)
+        if(it->second->solids->get_tile(x,y)->attributes & Tile::COIN)
+          total_coins++;
+  return total_coins;
+}