src/object/scripted_object.cpp

   1 //  $Id$
   2 //
   3 //  SuperTux
   4 //  Copyright (C) 2006 Matthias Braun <matze@braunis.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  02111-1307, USA.
  19 #include <config.h>
  20
  21 #include <stdexcept>
  22 #include <math.h>
  23
  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
  31 ScriptedObject::ScriptedObject(const lisp::Lisp& lisp)
  32   : MovingSprite(lisp, LAYER_OBJECTS, COLGROUP_MOVING_STATIC),
  33     solid(true), physic_enabled(true), visible(true), new_vel_set(false)
  34 {
  35   lisp.get("name", name);
  36   if(name == "")
  37     throw std::runtime_error("Scripted object must have a name specified");
  38
  39   // FIXME: do we need this? bbox is already set via .sprite file
  40   float width = sprite->get_width();
  41   float height = sprite->get_height();
  42   lisp.get("width", width);
  43   lisp.get("height", height);
  44   bbox.set_size(width, height);
  45
  46   lisp.get("solid", solid);
  47   lisp.get("physic-enabled", physic_enabled);
  48   lisp.get("visible", visible);
  49   lisp.get("z-pos", layer);
  50   if( solid ){
  51     set_group( COLGROUP_MOVING_STATIC );
  52   } else {
  53     set_group( COLGROUP_DISABLED );
  54   }
  55 }
  56
  57 void
  58 ScriptedObject::expose(HSQUIRRELVM vm, SQInteger table_idx)
  59 {
  60   if (name.empty()) return;
  61   expose_object(vm, table_idx, dynamic_cast<Scripting::ScriptedObject *>(this), name, false);
  62 }
  63
  64 void
  65 ScriptedObject::unexpose(HSQUIRRELVM vm, SQInteger table_idx)
  66 {
  67   if (name.empty()) return;
  68   Scripting::unexpose_object(vm, table_idx, name);
  69 }
  70
  71 void
  72 ScriptedObject::move(float x, float y)
  73 {
  74   bbox.move(Vector(x, y));
  75 }
  76
  77 void
  78 ScriptedObject::set_pos(float x, float y)
  79 {
  80   printf("SetPos: %f %f\n", x, y);
  81   bbox.set_pos(Vector(x, y));
  82   physic.reset();
  83 }
  84
  85 float
  86 ScriptedObject::get_pos_x()
  87 {
  88   return get_pos().x;
  89 }
  90
  91 float
  92 ScriptedObject::get_pos_y()
  93 {
  94   return get_pos().y;
  95 }
  96
  97 void
  98 ScriptedObject::set_velocity(float x, float y)
  99 {
 100   new_vel = Vector(x, y);
 101   new_vel_set = true;
 102 }
 103
 104 float
 105 ScriptedObject::get_velocity_x()
 106 {
 107   return physic.get_velocity_x();
 108 }
 109
 110 float
 111 ScriptedObject::get_velocity_y()
 112 {
 113   return physic.get_velocity_y();
 114 }
 115
 116 void
 117 ScriptedObject::set_visible(bool visible)
 118 {
 119   this->visible = visible;
 120 }
 121
 122 bool
 123 ScriptedObject::is_visible()
 124 {
 125   return visible;
 126 }
 127
 128 void
 129 ScriptedObject::set_solid(bool solid)
 130 {
 131   this->solid = solid;
 132   if( solid ){
 133     set_group( COLGROUP_MOVING_STATIC );
 134   } else {
 135     set_group( COLGROUP_DISABLED );
 136   }
 137 }
 138
 139 bool
 140 ScriptedObject::is_solid()
 141 {
 142   return solid;
 143 }
 144
 145
 146 void
 147 ScriptedObject::set_action(const std::string& animation)
 148 {
 149   sprite->set_action(animation);
 150 }
 151
 152 std::string
 153 ScriptedObject::get_action()
 154 {
 155   return sprite->get_action();
 156 }
 157
 158 std::string
 159 ScriptedObject::get_name()
 160 {
 161   return name;
 162 }
 163
 164 void
 165 ScriptedObject::update(float elapsed_time)
 166 {
 167   if(!physic_enabled)
 168     return;
 169
 170   if(new_vel_set) {
 171     physic.set_velocity(new_vel.x, new_vel.y);
 172     new_vel_set = false;
 173   }
 174   movement = physic.get_movement(elapsed_time);
 175 }
 176
 177 void
 178 ScriptedObject::draw(DrawingContext& context)
 179 {
 180   if(!visible)
 181     return;
 182
 183   sprite->draw(context, get_pos(), layer);
 184 }
 185
 186 void
 187 ScriptedObject::collision_solid(const CollisionHit& hit)
 188 {
 189   if(!physic_enabled)
 190     return;
 191
 192   if(hit.bottom) {
 193     if(physic.get_velocity_y() > 0)
 194       physic.set_velocity_y(0);
 195   } else if(hit.top) {
 196     physic.set_velocity_y(.1);
 197   }
 198
 199   if(hit.left || hit.right) {
 200     physic.set_velocity_x(0);
 201   }
 202 }
 203
 204 HitResponse
 205 ScriptedObject::collision(GameObject& , const CollisionHit& )
 206 {
 207   return FORCE_MOVE;
 208 }
 209
 210 IMPLEMENT_FACTORY(ScriptedObject, "scriptedobject");