901dfcd2c702176d1551786863c38e5cf748106a
[supertux.git] / src / tile.cpp
1 //  $Id$
2 // 
3 //  SuperTux
4 //  Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
5 //
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.
10 //
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.
15 // 
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
19 //  02111-1307, USA.
20 #include <config.h>
21
22 #include <cmath>
23 #include <cassert>
24 #include <iostream>
25 #include <stdexcept>
26
27 #include "app/globals.h"
28 #include "lisp/lisp.h"
29 #include "tile.h"
30 #include "resources.h"
31 #include "timer.h"
32 #include "math/vector.h"
33 #include "video/drawing_context.h"
34
35 Tile::Tile()
36   : id(0), editor_image(0), attributes(0), data(0), anim_fps(1)
37 {
38 }
39
40 Tile::~Tile()
41 {
42   for(std::vector<Surface*>::iterator i = images.begin(); i != images.end();
43       ++i) {
44     delete *i;
45   }
46   delete editor_image;
47 }
48
49 void
50 Tile::parse(const lisp::Lisp& reader)
51 {
52   if(!reader.get("id", id)) {
53     throw std::runtime_error("Missing tile-id.");
54   }
55   
56   bool value;
57   if(reader.get("solid", value) && value)
58     attributes |= SOLID;
59   if(reader.get("unisolid", value) && value)
60     attributes |= UNISOLID | SOLID;
61   if(reader.get("brick", value) && value)
62     attributes |= BRICK;
63   if(reader.get("ice", value) && value)
64     attributes |= ICE;
65   if(reader.get("water", value) && value)
66     attributes |= WATER;
67   if(reader.get("spike", value) && value)
68     attributes |= SPIKE;
69   if(reader.get("fullbox", value) && value)
70     attributes |= FULLBOX;
71   if(reader.get("coin", value) && value)
72     attributes |= COIN;
73   if(reader.get("goal", value) && value)
74     attributes |= GOAL;
75
76   if(reader.get("north", value) && value)
77     data |= WORLDMAP_NORTH;
78   if(reader.get("south", value) && value)
79     data |= WORLDMAP_SOUTH;
80   if(reader.get("west", value) && value)
81     data |= WORLDMAP_WEST;
82   if(reader.get("east", value) && value) 
83     data |= WORLDMAP_EAST;
84   if(reader.get("stop", value) && value)
85     data |= WORLDMAP_STOP;                      
86
87   reader.get("data", data);
88   reader.get("anim-fps", anim_fps);
89
90   if(reader.get("slope-type", data)) {
91     attributes |= SOLID | SLOPE;
92   }
93
94   const lisp::Lisp* images = reader.get_lisp("images");
95   if(images)
96     parse_images(*images);
97   reader.get("editor-images", editor_imagefile);
98 }
99
100 void
101 Tile::parse_images(const lisp::Lisp& images_lisp)
102 {
103   const lisp::Lisp* list = &images_lisp;
104   while(list) {
105     const lisp::Lisp* cur = list->get_car();
106     if(cur->get_type() == lisp::Lisp::TYPE_STRING) {
107       std::string file;
108       cur->get(file);
109       imagespecs.push_back(ImageSpec(file, Rectangle(0, 0, 0, 0)));
110     } else if(cur->get_type() == lisp::Lisp::TYPE_CONS && 
111         cur->get_car()->get_type() == lisp::Lisp::TYPE_SYMBOL) {
112       const lisp::Lisp* ptr = cur->get_cdr();
113
114       std::string file;
115       float x, y, w, h;
116       ptr->get_car()->get(file); ptr = ptr->get_cdr();
117       ptr->get_car()->get(x); ptr = ptr->get_cdr();
118       ptr->get_car()->get(y); ptr = ptr->get_cdr();
119       ptr->get_car()->get(w); ptr = ptr->get_cdr();
120       ptr->get_car()->get(h);
121       imagespecs.push_back(ImageSpec(file, Rectangle(x, y, x+w, y+h)));
122     } else {
123       std::cerr << "Expected string or list in images tag.\n";
124       continue;
125     }
126     
127     list = list->get_cdr();
128   }
129 }
130
131 void
132 Tile::load_images(const std::string& tilesetpath)
133 {
134   assert(images.size() == 0);
135   for(std::vector<ImageSpec>::iterator i = imagespecs.begin(); i !=
136       imagespecs.end(); ++i) {
137     const ImageSpec& spec = *i;
138     Surface* surface;
139     std::string file 
140       = get_resource_filename(tilesetpath + spec.file);
141     if(spec.rect.get_width() <= 0) {
142       surface = new Surface(file, true);
143     } else {
144       surface = new Surface(file,
145           (int) spec.rect.p1.x,
146           (int) spec.rect.p1.y,
147           (int) spec.rect.get_width(),
148           (int) spec.rect.get_height(), true);
149     }
150     images.push_back(surface);
151   }
152   if(editor_imagefile != "") {
153     editor_image = new Surface(
154         get_resource_filename(
155           std::string("images/tilesets/") + editor_imagefile), true);
156   }
157 }
158
159 Surface*
160 Tile::get_editor_image() const
161 {
162   if(editor_image)
163     return editor_image;
164   if(images.size() > 0)
165     return images[0];
166
167   return 0;
168 }
169
170 void
171 Tile::draw(DrawingContext& context, const Vector& pos, int layer) const
172 {
173   if(images.size() > 1) {
174     size_t frame = size_t(global_time * anim_fps) % images.size();
175     context.draw_surface(images[frame], pos, layer);
176   } else if (images.size() == 1) {
177     context.draw_surface(images[0], pos, layer);
178   }
179 }
180