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
31 #include "app/globals.h"
32 #include "app/setup.h"
34 #include "video/screen.h"
36 #include "math/physic.h"
40 #include "utils/lispreader.h"
41 #include "resources.h"
43 #include "utils/lispwriter.h"
49 : name("noname"), author("mr. x"), timelimit(500),
50 end_sequence_type(NONE_ENDSEQ_ANIM)
55 Level::create(const std::string& filename)
58 const size_t width = 25;
59 const size_t height = 19;
60 level.add_sector(Sector::create("main", width, height));
65 Level::load(const std::string& filename)
68 filepath = st_dir + "/levels/" + filename;
69 if (access(filepath.c_str(), R_OK) != 0)
71 filepath = datadir + "/levels/" + filename;
72 if (access(filepath.c_str(), R_OK) != 0)
74 std::cerr << "Error: Level: couldn't find level: " << filename << std::endl;
79 LispReader* level = LispReader::load(filepath, "supertux-level");
82 level->read_int("version", version);
84 load_old_format(*level);
89 for(lisp_object_t* cur = level->get_lisp(); !lisp_nil_p(cur);
90 cur = lisp_cdr(cur)) {
91 std::string token = lisp_symbol(lisp_car(lisp_car(cur)));
92 lisp_object_t* data = lisp_car(lisp_cdr(lisp_car(cur)));
93 LispReader reader(lisp_cdr(lisp_car(cur)));
95 if(token == "version") {
96 if(lisp_integer(data) > 2) {
97 std::cerr << "Warning: level format newer than application.\n";
99 } else if(token == "name") {
100 name = lisp_string(data);
101 } else if(token == "author") {
102 author = lisp_string(data);
103 } else if(token == "time") {
104 timelimit = lisp_integer(data);
105 } else if(token == "sector") {
106 Sector* sector = new Sector;
107 sector->parse(reader);
109 } else if(token == "end-sequence-animation") {
110 std::string endsequencename = lisp_string(data);
111 if(endsequencename == "fireworks") {
112 end_sequence_type = FIREWORKS_ENDSEQ_ANIM;
114 std::cout << "Unknown endsequence type: '" << endsequencename <<
118 std::cerr << "Unknown token '" << token << "' in level file.\n";
127 Level::load_old_format(LispReader& reader)
129 reader.read_string("name", name, true);
130 reader.read_string("author", author);
131 reader.read_int("time", timelimit);
133 Sector* sector = new Sector;
134 sector->parse_old_format(reader);
139 Level::save(const std::string& filename)
141 std::string filepath = "levels/" + filename;
142 int last_slash = filepath.find_last_of('/');
143 FileSystem::fcreatedir(filepath.substr(0,last_slash).c_str());
144 filepath = st_dir + "/" + filepath;
145 ofstream file(filepath.c_str(), ios::out);
146 LispWriter* writer = new LispWriter(file);
148 writer->write_comment("Level made using SuperTux's built-in Level Editor");
150 writer->start_list("supertux-level");
153 writer->write_int("version", version);
155 writer->write_string("name", name);
156 writer->write_string("author", author);
157 writer->write_int("time", timelimit);
158 writer->write_string("end-sequence-animation",
159 end_sequence_type == FIREWORKS_ENDSEQ_ANIM ? "fireworks" : "none");
161 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
162 writer->start_list("sector");
163 i->second->write(*writer);
164 writer->end_list("sector");
167 writer->end_list("supertux-level");
175 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
180 Level::do_vertical_flip()
182 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
183 i->second->do_vertical_flip();
187 Level::add_sector(Sector* sector)
189 sectors.insert(std::make_pair(sector->get_name(), sector));
193 Level::get_sector(const std::string& name)
195 Sectors::iterator i = sectors.find(name);
196 if(i == sectors.end())
203 Level::get_next_sector(const Sector* sector)
205 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
207 if(i->second == sector)
210 if(i == sectors.end())
215 std::cerr << "Warning: Sector not found on level\n";
220 Level::get_previous_sector(const Sector* sector)
222 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
224 if(i->second == sector)
226 if(i == sectors.begin())
232 std::cerr << "Warning: Sector not found on level\n";
237 Level::get_total_sectors()
239 return sectors.size();
243 Level::get_total_badguys()
245 int total_badguys = 0;
246 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i)
247 total_badguys += i->second->get_total_badguys();
248 return total_badguys;
252 Level::get_total_coins()
255 for(Sectors::iterator i = sectors.begin(); i != sectors.end(); ++i) {
256 TileMap* solids = i->second->solids;
258 std::cerr << "Sector '" << i->first << "' contains no solids!?!\n";
261 for(size_t x = 0; x < solids->get_width(); ++x)
262 for(size_t y = 0; y < solids->get_height(); ++y) {
263 const Tile* tile = solids->get_tile(x, y);
265 std::cerr << "Invalid tile in sector '" << i->first << "'.\n";
268 if(tile->attributes & Tile::COIN)