4 // Copyright (C) 2006 Matthias Braun <matze@braunis.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 02111-1307, USA.
25 #include "scripted_object.hpp"
26 #include "video/drawing_context.hpp"
27 #include "sprite/sprite_manager.hpp"
28 #include "scripting/wrapper_util.hpp"
29 #include "resources.hpp"
30 #include "object_factory.hpp"
31 #include "math/vector.hpp"
33 ScriptedObject::ScriptedObject(const lisp::Lisp& lisp)
34 : solid(true), physic_enabled(true), visible(true), new_vel_set(false),
37 lisp.get("name", name);
39 throw std::runtime_error("Scripted object must have a name specified");
41 std::string spritename;
42 lisp.get("sprite", spritename);
44 throw std::runtime_error("Scripted object must have a sprite name specified");
45 sprite = sprite_manager->create(spritename);
47 lisp.get("x", bbox.p1.x);
48 lisp.get("y", bbox.p1.y);
49 float width = sprite->get_width();
50 float height = sprite->get_height();
51 lisp.get("width", width);
52 lisp.get("height", height);
53 bbox.set_size(width, height);
55 lisp.get("solid", solid);
56 lisp.get("physic-enabled", physic_enabled);
57 lisp.get("visible", visible);
58 lisp.get("layer", layer);
63 ScriptedObject::~ScriptedObject()
69 ScriptedObject::expose(HSQUIRRELVM vm, int table_idx)
71 Scripting::ScriptedObject* interface = static_cast<Scripting::ScriptedObject*> (this);
72 expose_object(vm, table_idx, interface, name, false);
76 ScriptedObject::unexpose(HSQUIRRELVM vm, int table_idx)
78 Scripting::unexpose_object(vm, table_idx, name);
82 ScriptedObject::move(float x, float y)
84 bbox.move(Vector(x, y));
88 ScriptedObject::set_pos(float x, float y)
90 bbox.set_pos(Vector(x, y));
94 ScriptedObject::get_pos_x()
100 ScriptedObject::get_pos_y()
106 ScriptedObject::set_velocity(float x, float y)
108 new_vel = Vector(x, y);
113 ScriptedObject::get_velocity_x()
115 return physic.get_velocity_x();
119 ScriptedObject::get_velocity_y()
121 return physic.get_velocity_y();
125 ScriptedObject::set_visible(bool visible)
127 this->visible = visible;
131 ScriptedObject::is_visible()
137 ScriptedObject::set_action(const std::string& animation)
139 sprite->set_action(animation);
143 ScriptedObject::get_action()
145 return sprite->get_action_name();
149 ScriptedObject::get_name()
155 ScriptedObject::update(float elapsed_time)
161 physic.set_velocity(new_vel.x, new_vel.y);
164 movement = physic.get_movement(elapsed_time);
168 ScriptedObject::draw(DrawingContext& context)
173 sprite->draw(context, get_pos(), layer);
177 ScriptedObject::collision(GameObject& other, const CollisionHit& hit)
182 if(!(other.get_flags() & FLAG_SOLID))
185 if(other.get_flags() & FLAG_SOLID) {
186 if(hit.normal.y < 0) { // landed on floor
187 if(physic.get_velocity_y() < 0)
188 physic.set_velocity_y(0);
189 } else if(hit.normal.y > 0) { // bumped against roof
190 physic.set_velocity_y(.1);
193 if(fabsf(hit.normal.x) > .9) { // hit on side?
194 physic.set_velocity_x(0);
203 IMPLEMENT_FACTORY(ScriptedObject, "scriptedobject");