josh/anaglym
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

add absolute/relative force/torque addition functions

Browse Source 
git-svn-id: svn://anubis/anaglym/trunk@102 99a6e188-d820-4881-8870-2d33a10e2619
This commit is contained in:
Josh Holtrop 2009-10-19 02:53:58 +00:00
parent 7e22874623
commit 724622e094
4 changed files with 106 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
Engine.h
View File

@ -35,6 +35,22 @@ class Engine
}
void setVisible(bool visible) { m_is_visible = visible; }
bool getVisible() { return m_is_visible; }
void addForce(dReal fx, dReal fy, dReal fz)
{
m_ode_object->addForce(fx, fy, fz);
}
void addRelForce(dReal fx, dReal fy, dReal fz)
{
m_ode_object->addRelForce(fx, fy, fz);
}
void addTorque(dReal fx, dReal fy, dReal fz)
{
m_ode_object->addTorque(fx, fy, fz);
}
void addRelTorque(dReal fx, dReal fy, dReal fz)
{
m_ode_object->addRelTorque(fx, fy, fz);
}
void draw();

84
ag.cc
View File

@ -123,6 +123,14 @@ namespace ag
lua_setfield(L, -2, "destroy");
lua_pushcfunction(L, object::setVisible);
lua_setfield(L, -2, "setVisible");
lua_pushcfunction(L, object::addForce);
lua_setfield(L, -2, "addForce");
lua_pushcfunction(L, object::addRelForce);
lua_setfield(L, -2, "addRelForce");
lua_pushcfunction(L, object::addTorque);
lua_setfield(L, -2, "addTorque");
lua_pushcfunction(L, object::addRelTorque);
lua_setfield(L, -2, "addRelTorque");
}
static int loadModelSpecify(lua_State * L, bool static_data)
@ -393,5 +401,81 @@ namespace ag
}
return 0;
}
int addForce(lua_State * L)
{
int argc = lua_gettop(L);
if (argc == 4)
{
Engine::Object * obj = getObject(L, 1);
if (obj != NULL &&
lua_isnumber(L, 2) &&
lua_isnumber(L, 3) &&
lua_isnumber(L, 4))
{
obj->addForce(lua_tonumber(L, 2),
lua_tonumber(L, 3),
lua_tonumber(L, 4));
}
}
return 0;
}
int addRelForce(lua_State * L)
{
int argc = lua_gettop(L);
if (argc == 4)
{
Engine::Object * obj = getObject(L, 1);
if (obj != NULL &&
lua_isnumber(L, 2) &&
lua_isnumber(L, 3) &&
lua_isnumber(L, 4))
{
obj->addRelForce(lua_tonumber(L, 2),
lua_tonumber(L, 3),
lua_tonumber(L, 4));
}
}
return 0;
}
int addTorque(lua_State * L)
{
int argc = lua_gettop(L);
if (argc == 4)
{
Engine::Object * obj = getObject(L, 1);
if (obj != NULL &&
lua_isnumber(L, 2) &&
lua_isnumber(L, 3) &&
lua_isnumber(L, 4))
{
obj->addTorque(lua_tonumber(L, 2),
lua_tonumber(L, 3),
lua_tonumber(L, 4));
}
}
return 0;
}
int addRelTorque(lua_State * L)
{
int argc = lua_gettop(L);
if (argc == 4)
{
Engine::Object * obj = getObject(L, 1);
if (obj != NULL &&
lua_isnumber(L, 2) &&
lua_isnumber(L, 3) &&
lua_isnumber(L, 4))
{
obj->addRelTorque(lua_tonumber(L, 2),
lua_tonumber(L, 3),
lua_tonumber(L, 4));
}
}
return 0;
}
}
}

4
ag.h
View File

@ -32,6 +32,10 @@ namespace ag
int clone(lua_State * L);
int destroy(lua_State * L);
int setVisible(lua_State * L);
int addForce(lua_State * L);
int addRelForce(lua_State * L);
int addTorque(lua_State * L);
int addRelTorque(lua_State * L);
}
}

2
tests/ballstairs.lua
View File

@ -10,6 +10,8 @@ end
function key_pressed_event(key)
if (key == "d") then
ball2:destroy()
elseif (key == "p") then
ball:addForce(-10000, 0, 0)
end
end