From fe9287be4daa9a4f9c38e5d835f6e16c31545ae4 Mon Sep 17 00:00:00 2001
From: Jonathan Kolberg <bulldog98@freenet.de>
Date: Sat, 13 Mar 2010 11:05:14 +0100
Subject: Add methods to get and set being speed
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Thorbjørn Lindeijer <thorbjorn@lindeijer.nl>
---
 src/scripting/lua.cpp | 36 +++++++++++++++++++++++++++++++++++-
 1 file changed, 35 insertions(+), 1 deletion(-)

diff --git a/src/scripting/lua.cpp b/src/scripting/lua.cpp
index c386c35d..dbd50776 100644
--- a/src/scripting/lua.cpp
+++ b/src/scripting/lua.cpp
@@ -564,6 +564,38 @@ static int being_set_status_time(lua_State *s)
     return 1;
 }
 
+/**
+* Returns the current speed of the being
+* mana.being_get_speed(Being *being, int id)
+*/
+static int being_get_speed(lua_State *s)
+{
+    if (!lua_isuserdata(s, 1) || !lua_isnumber(s, 2))
+    {
+        raiseScriptError(s, "being_get_speed called with incorrect parameters.");
+        return 0;
+    }
+    Being *being = getBeing(s, 1);
+    lua_pushnumber(s, being->getSpeed());
+    return 1;
+}
+
+/**
+* Sets the speed of the being
+* mana.being_set_speed(Being *being)
+*/
+static int being_set_speed(lua_State *s)
+{
+    if (!lua_isuserdata(s, 1) || !lua_isnumber(s, 2))
+    {
+        raiseScriptError(s, "being_set_speed called with incorrect parameters.");
+        return 0;
+    }
+    Being *being = getBeing(s, 1);
+    being->setSpeed(lua_tonumber(s, 2));
+    return 1;
+}
+
 
 /**
  * Returns the Thing type of the given Being
@@ -571,7 +603,7 @@ static int being_set_status_time(lua_State *s)
  */
 static int being_type(lua_State *s)
 {
-    if (!lua_isuserdata(s, 1) )
+    if (!lua_isuserdata(s, 1))
     {
         raiseScriptError(s, "being_type called with incorrect parameters.");
         return 0;
@@ -1540,6 +1572,8 @@ LuaScript::LuaScript():
         { "being_has_status",       &being_has_status     },
         { "being_set_status_time",  &being_set_status_time},
         { "being_get_status_time",  &being_get_status_time},
+        { "being_set_speed",        &being_set_speed      },
+        { "being_get_speed",        &being_get_speed      },
         { "being_type",             &being_type           },
         { "being_walk",             &being_walk           },
         { "being_say",              &being_say            },
-- 
cgit v1.2.3-70-g09d2