4 // Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
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
27 #include "lisp/lisp.h"
29 #include "resources.h"
31 #include "math/vector.h"
32 #include "video/drawing_context.h"
35 : id(0), editor_image(0), attributes(0), data(0), anim_fps(1)
41 for(std::vector<Surface*>::iterator i = images.begin(); i != images.end();
49 Tile::parse(const lisp::Lisp& reader)
51 if(!reader.get("id", id)) {
52 throw std::runtime_error("Missing tile-id.");
56 if(reader.get("solid", value) && value)
58 if(reader.get("unisolid", value) && value)
59 attributes |= UNISOLID | SOLID;
60 if(reader.get("brick", value) && value)
62 if(reader.get("ice", value) && value)
64 if(reader.get("water", value) && value)
66 if(reader.get("spike", value) && value)
68 if(reader.get("fullbox", value) && value)
69 attributes |= FULLBOX;
70 if(reader.get("coin", value) && value)
72 if(reader.get("goal", value) && value)
75 if(reader.get("north", value) && value)
76 data |= WORLDMAP_NORTH;
77 if(reader.get("south", value) && value)
78 data |= WORLDMAP_SOUTH;
79 if(reader.get("west", value) && value)
80 data |= WORLDMAP_WEST;
81 if(reader.get("east", value) && value)
82 data |= WORLDMAP_EAST;
83 if(reader.get("stop", value) && value)
84 data |= WORLDMAP_STOP;
86 reader.get("data", data);
87 reader.get("anim-fps", anim_fps);
89 if(reader.get("slope-type", data)) {
90 attributes |= SOLID | SLOPE;
93 const lisp::Lisp* images = reader.get_lisp("images");
95 parse_images(*images);
96 reader.get("editor-images", editor_imagefile);
100 Tile::parse_images(const lisp::Lisp& images_lisp)
102 const lisp::Lisp* list = &images_lisp;
104 const lisp::Lisp* cur = list->get_car();
105 if(cur->get_type() == lisp::Lisp::TYPE_STRING) {
108 imagespecs.push_back(ImageSpec(file, Rect(0, 0, 0, 0)));
109 } else if(cur->get_type() == lisp::Lisp::TYPE_CONS &&
110 cur->get_car()->get_type() == lisp::Lisp::TYPE_SYMBOL) {
111 const lisp::Lisp* ptr = cur->get_cdr();
115 ptr->get_car()->get(file); ptr = ptr->get_cdr();
116 ptr->get_car()->get(x); ptr = ptr->get_cdr();
117 ptr->get_car()->get(y); ptr = ptr->get_cdr();
118 ptr->get_car()->get(w); ptr = ptr->get_cdr();
119 ptr->get_car()->get(h);
120 imagespecs.push_back(ImageSpec(file, Rect(x, y, x+w, y+h)));
122 std::cerr << "Expected string or list in images tag.\n";
126 list = list->get_cdr();
131 Tile::load_images(const std::string& tilesetpath)
133 assert(images.size() == 0);
134 for(std::vector<ImageSpec>::iterator i = imagespecs.begin(); i !=
135 imagespecs.end(); ++i) {
136 const ImageSpec& spec = *i;
139 = get_resource_filename(tilesetpath + spec.file);
140 if(spec.rect.get_width() <= 0) {
141 surface = new Surface(file, true);
143 surface = new Surface(file,
144 (int) spec.rect.p1.x,
145 (int) spec.rect.p1.y,
146 (int) spec.rect.get_width(),
147 (int) spec.rect.get_height(), true);
149 images.push_back(surface);
151 if(editor_imagefile != "") {
152 editor_image = new Surface(
153 get_resource_filename(tilesetpath + editor_imagefile), true);
158 Tile::get_editor_image() const
162 if(images.size() > 0)
169 Tile::draw(DrawingContext& context, const Vector& pos, int layer) const
171 if(images.size() > 1) {
172 size_t frame = size_t(global_time * anim_fps) % images.size();
173 context.draw_surface(images[frame], pos, layer);
174 } else if (images.size() == 1) {
175 context.draw_surface(images[0], pos, layer);