2 // C++ Implementation: tile
7 // Author: Tobias Glaesser <tobi.web@gmx.de>, (C) 2004
9 // Copyright: See COPYING file that comes with this distribution
15 TileManager* TileManager::instance_ = 0;
16 std::vector<TileGroup>* TileManager::tilegroups_ = 0;
18 TileManager::TileManager()
20 std::string filename = datadir + "images/tilesets/supertux.stgt";
21 load_tileset(filename);
24 void TileManager::load_tileset(std::string filename)
26 lisp_object_t* root_obj = lisp_read_from_file(filename);
29 st_abort("Couldn't load file", filename);
31 if (strcmp(lisp_symbol(lisp_car(root_obj)), "supertux-tiles") == 0)
33 lisp_object_t* cur = lisp_cdr(root_obj);
36 while(!lisp_nil_p(cur))
38 lisp_object_t* element = lisp_car(cur);
40 if (strcmp(lisp_symbol(lisp_car(element)), "tile") == 0)
42 Tile* tile = new Tile;
47 tile->fullbox = false;
51 tile->anim_speed = 25;
53 LispReader reader(lisp_cdr(element));
54 assert(reader.read_int("id", &tile->id));
55 reader.read_bool("solid", &tile->solid);
56 reader.read_bool("brick", &tile->brick);
57 reader.read_bool("ice", &tile->ice);
58 reader.read_bool("fullbox", &tile->fullbox);
59 reader.read_bool("distro", &tile->distro);
60 reader.read_int("data", &tile->data);
61 reader.read_int("anim-speed", &tile->anim_speed);
62 reader.read_int("next-tile", &tile->next_tile);
63 reader.read_string_vector("images", &tile->filenames);
65 for(std::vector<std::string>::iterator it = tile->
67 it != tile->filenames.end();
70 texture_type cur_image;
71 tile->images.push_back(cur_image);
72 texture_load(&tile->images[tile->images.size()-1],
73 datadir + "images/tilesets/" + (*it),
77 if (tile->id + tileset_id >= int(tiles.size())
79 tiles.resize(tile->id + tileset_id+1);
81 tiles[tile->id + tileset_id] = tile;
83 else if (strcmp(lisp_symbol(lisp_car(element)), "tileset") == 0)
85 LispReader reader(lisp_cdr(element));
87 reader.read_string("file", &filename);
88 filename = datadir + "images/tilesets/" + filename;
89 load_tileset(filename);
91 else if (strcmp(lisp_symbol(lisp_car(element)), "tilegroup") == 0)
95 tilegroups_ = new std::vector<TileGroup>;
96 tilegroups_->push_back(new_);
97 LispReader reader(lisp_cdr(element));
98 tilegroups_->back().name;
99 reader.read_string("name", &tilegroups_->back().name);
100 reader.read_int_vector("tiles", &tilegroups_->back().tiles);
102 else if (strcmp(lisp_symbol(lisp_car(element)), "properties") == 0)
104 LispReader reader(lisp_cdr(element));
105 reader.read_int("id", &tileset_id);
110 puts("Unhandled symbol");