4 // Copyright (C) 2004 SuperTux Development Team, see AUTHORS for details
6 // This program is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU General Public License
8 // as published by the Free Software Foundation; either version 2
9 // of the License, or (at your option) any later version.
11 // This program is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 // GNU General Public License for more details.
16 // You should have received a copy of the GNU General Public License
17 // along with this program; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
32 #include "video/screen.h"
33 #include "lisp/parser.h"
34 #include "lisp/lisp.h"
35 #include "lisp/list_iterator.h"
36 #include "lisp/writer.h"
41 #include "resources.h"
42 #include "file_system.h"
43 #include "object/gameobjs.h"
44 #include "object/camera.h"
45 #include "object/tilemap.h"
46 #include "object/coin.h"
49 #include "flip_level_transformer.h"
54 : name("noname"), author("Mr. X")
59 Level::load(const std::string& filepath)
63 std::auto_ptr<lisp::Lisp> root (parser.parse(filepath));
65 const lisp::Lisp* level = root->get_lisp("supertux-level");
67 throw std::runtime_error("file is not a supertux-level file.");
70 level->get("version", version);
72 load_old_format(*level);
76 FlipLevelTransformer* transformer = new FlipLevelTransformer();
77 transformer->transform(this);
83 lisp::ListIterator iter(level);
85 const std::string& token = iter.item();
86 if(token == "version") {
87 iter.value()->get(version);
89 std::cerr << "Warning: level format newer than application.\n";
91 } else if(token == "name") {
92 iter.value()->get(name);
93 } else if(token == "author") {
94 iter.value()->get(author);
95 } else if(token == "sector") {
96 Sector* sector = new Sector;
97 sector->parse(*(iter.lisp()));
100 std::cerr << "Unknown token '" << token << "' in level file.\n";
105 } catch(std::exception& e) {
106 std::stringstream msg;
107 msg << "Problem when reading level '" << filepath << "': " << e.what();
108 throw std::runtime_error(msg.str());
113 Level::load_old_format(const lisp::Lisp& reader)
115 reader.get("name", name);
116 reader.get("author", author);
118 Sector* sector = new Sector;
119 sector->parse_old_format(reader);
124 Level::save(const std::string& filename)
126 std::string filepath = "levels/" + filename;
127 int last_slash = filepath.find_last_of('/');
128 FileSystem::fcreatedir(filepath.substr(0,last_slash).c_str());
129 filepath = user_dir + "/" + filepath;
130 ofstream file(filepath.c_str(), ios::out);
131 lisp::Writer* writer = new lisp::Writer(file);
133 writer->write_comment("Level made using SuperTux's built-in Level Editor");
135 writer->start_list("supertux-level");
138 writer->write_int("version", version);
140 writer->write_string("name", name, true);
141 writer->write_string("author", author);
143 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
145 writer->start_list("sector");
146 sector->write(*writer);
147 writer->end_list("sector");
150 writer->end_list("supertux-level");
158 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
163 Level::add_sector(Sector* sector)
165 Sector* test = get_sector(sector->get_name());
167 throw std::runtime_error("Trying to add 2 sectors with same name");
169 sectors.push_back(sector);
173 Level::get_sector(const std::string& name)
175 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
177 if(sector->get_name() == name)
185 Level::get_sector_count()
187 return sectors.size();
191 Level::get_sector(size_t num)
193 return sectors.at(num);
197 Level::get_total_badguys()
199 int total_badguys = 0;
200 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
201 total_badguys += (*i)->get_total_badguys();
202 return total_badguys;
206 Level::get_total_coins()
208 // FIXME not really correct as coins can also be inside blocks...
210 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
212 for(Sector::GameObjects::iterator o = sector->gameobjects.begin();
213 o != sector->gameobjects.end(); ++o) {
214 Coin* coin = dynamic_cast<Coin*> (*o);