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.
24 #include "scripted_object.hpp"
25 #include "video/drawing_context.hpp"
26 #include "scripting/squirrel_util.hpp"
27 #include "resources.hpp"
28 #include "object_factory.hpp"
29 #include "math/vector.hpp"
30 #include "sprite/sprite.hpp"
32 ScriptedObject::ScriptedObject(const lisp::Lisp& lisp)
33 : MovingSprite(lisp, LAYER_OBJECTS, COLGROUP_MOVING_STATIC),
34 solid(true), physic_enabled(true), visible(true), new_vel_set(false)
36 lisp.get("name", name);
38 throw std::runtime_error("Scripted object must have a name specified");
40 // FIXME: do we need this? bbox is already set via .sprite file
41 float width = sprite->get_width();
42 float height = sprite->get_height();
43 lisp.get("width", width);
44 lisp.get("height", height);
45 bbox.set_size(width, height);
47 lisp.get("solid", solid);
48 lisp.get("physic-enabled", physic_enabled);
49 lisp.get("visible", visible);
50 lisp.get("z-pos", layer);
52 set_group( COLGROUP_MOVING_STATIC );
54 set_group( COLGROUP_DISABLED );
59 ScriptedObject::expose(HSQUIRRELVM vm, SQInteger table_idx)
61 if (name.empty()) return;
62 expose_object(vm, table_idx, dynamic_cast<Scripting::ScriptedObject *>(this), name, false);
66 ScriptedObject::unexpose(HSQUIRRELVM vm, SQInteger table_idx)
68 if (name.empty()) return;
69 Scripting::unexpose_object(vm, table_idx, name);
73 ScriptedObject::move(float x, float y)
75 bbox.move(Vector(x, y));
79 ScriptedObject::set_pos(float x, float y)
81 printf("SetPos: %f %f\n", x, y);
82 bbox.set_pos(Vector(x, y));
87 ScriptedObject::get_pos_x()
93 ScriptedObject::get_pos_y()
99 ScriptedObject::set_velocity(float x, float y)
101 new_vel = Vector(x, y);
106 ScriptedObject::get_velocity_x()
108 return physic.get_velocity_x();
112 ScriptedObject::get_velocity_y()
114 return physic.get_velocity_y();
118 ScriptedObject::set_visible(bool visible)
120 this->visible = visible;
124 ScriptedObject::is_visible()
130 ScriptedObject::set_solid(bool solid)
134 set_group( COLGROUP_MOVING_STATIC );
136 set_group( COLGROUP_DISABLED );
141 ScriptedObject::is_solid()
148 ScriptedObject::set_action(const std::string& animation)
150 sprite->set_action(animation);
154 ScriptedObject::get_action()
156 return sprite->get_action();
160 ScriptedObject::get_name()
166 ScriptedObject::update(float elapsed_time)
172 physic.set_velocity(new_vel.x, new_vel.y);
175 movement = physic.get_movement(elapsed_time);
179 ScriptedObject::draw(DrawingContext& context)
184 sprite->draw(context, get_pos(), layer);
188 ScriptedObject::collision_solid(const CollisionHit& hit)
194 if(physic.get_velocity_y() > 0)
195 physic.set_velocity_y(0);
197 physic.set_velocity_y(.1f);
200 if(hit.left || hit.right) {
201 physic.set_velocity_x(0);
206 ScriptedObject::collision(GameObject& , const CollisionHit& )
211 IMPLEMENT_FACTORY(ScriptedObject, "scriptedobject");