4 // Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
5 // Copyright (C) 2006 Matthias Braun <matze@braunis.de>
7 // This program is free software; you can redistribute it and/or
8 // modify it under the terms of the GNU General Public License
9 // as published by the Free Software Foundation; either version 2
10 // of the License, or (at your option) any later version.
12 // This program is distributed in the hope that it will be useful,
13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 // GNU General Public License for more details.
17 // You should have received a copy of the GNU General Public License
18 // along with this program; if not, write to the Free Software
19 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
28 #include "lisp/lisp.hpp"
30 #include "resources.hpp"
32 #include "math/vector.hpp"
33 #include "video/drawing_context.hpp"
38 : id(0), attributes(0), data(0), anim_fps(1)
42 Tile::Tile(unsigned int id, Uint32 attributes, const ImageSpec& imagespec)
43 : id(id), attributes(attributes), data(0), anim_fps(1)
45 imagespecs.push_back(imagespec);
50 for(std::vector<Surface*>::iterator i = images.begin(); i != images.end();
57 Tile::parse(const lisp::Lisp& reader)
59 if(!reader.get("id", id)) {
60 throw std::runtime_error("Missing tile-id.");
64 if(reader.get("solid", value) && value)
66 if(reader.get("unisolid", value) && value)
67 attributes |= UNISOLID | SOLID;
68 if(reader.get("brick", value) && value)
70 if(reader.get("ice", value) && value)
72 if(reader.get("water", value) && value)
74 if(reader.get("hurts", value) && value)
76 if(reader.get("fire", value) && value)
78 if(reader.get("fullbox", value) && value)
79 attributes |= FULLBOX;
80 if(reader.get("coin", value) && value)
82 if(reader.get("goal", value) && value)
85 if(reader.get("north", value) && value)
86 data |= WORLDMAP_NORTH;
87 if(reader.get("south", value) && value)
88 data |= WORLDMAP_SOUTH;
89 if(reader.get("west", value) && value)
90 data |= WORLDMAP_WEST;
91 if(reader.get("east", value) && value)
92 data |= WORLDMAP_EAST;
93 if(reader.get("stop", value) && value)
94 data |= WORLDMAP_STOP;
96 reader.get("data", data);
97 reader.get("anim-fps", anim_fps);
99 if(reader.get("slope-type", data)) {
100 attributes |= SOLID | SLOPE;
103 const lisp::Lisp* images = reader.get_lisp("images");
105 parse_images(*images);
109 Tile::parse_images(const lisp::Lisp& images_lisp)
111 const lisp::Lisp* list = &images_lisp;
113 const lisp::Lisp* cur = list->get_car();
114 if(cur->get_type() == lisp::Lisp::TYPE_STRING) {
117 imagespecs.push_back(ImageSpec(file, Rect(0, 0, 0, 0)));
118 } else if(cur->get_type() == lisp::Lisp::TYPE_CONS &&
119 cur->get_car()->get_type() == lisp::Lisp::TYPE_SYMBOL &&
120 cur->get_car()->get_symbol() == "region") {
121 const lisp::Lisp* ptr = cur->get_cdr();
124 float x = 0, y = 0, w = 0, h = 0;
125 ptr->get_car()->get(file); ptr = ptr->get_cdr();
126 ptr->get_car()->get(x); ptr = ptr->get_cdr();
127 ptr->get_car()->get(y); ptr = ptr->get_cdr();
128 ptr->get_car()->get(w); ptr = ptr->get_cdr();
129 ptr->get_car()->get(h);
130 imagespecs.push_back(ImageSpec(file, Rect(x, y, x+w, y+h)));
132 log_warning << "Expected string or list in images tag" << std::endl;
136 list = list->get_cdr();
141 Tile::load_images(const std::string& tilesetpath)
143 assert(images.size() == 0);
144 for(std::vector<ImageSpec>::iterator i = imagespecs.begin(); i !=
145 imagespecs.end(); ++i) {
146 const ImageSpec& spec = *i;
148 std::string file = tilesetpath + spec.file;
149 if(spec.rect.get_width() <= 0) {
150 surface = new Surface(file);
152 surface = new Surface(file,
153 (int) spec.rect.p1.x,
154 (int) spec.rect.p1.y,
155 (int) spec.rect.get_width(),
156 (int) spec.rect.get_height());
158 images.push_back(surface);
163 Tile::draw(DrawingContext& context, const Vector& pos, int z_pos) const
165 if(images.size() > 1) {
166 size_t frame = size_t(game_time * anim_fps) % images.size();
167 context.draw_surface(images[frame], pos, z_pos);
168 } else if (images.size() == 1) {
169 context.draw_surface(images[0], pos, z_pos);