|
@@ -0,0 +1,122 @@
|
|
|
+/**
|
|
|
+* Copyright (c) 2006-2011 LOVE Development Team
|
|
|
+*
|
|
|
+* This software is provided 'as-is', without any express or implied
|
|
|
+* warranty. In no event will the authors be held liable for any damages
|
|
|
+* arising from the use of this software.
|
|
|
+*
|
|
|
+* Permission is granted to anyone to use this software for any purpose,
|
|
|
+* including commercial applications, and to alter it and redistribute it
|
|
|
+* freely, subject to the following restrictions:
|
|
|
+*
|
|
|
+* 1. The origin of this software must not be misrepresented; you must not
|
|
|
+* claim that you wrote the original software. If you use this software
|
|
|
+* in a product, an acknowledgment in the product documentation would be
|
|
|
+* appreciated but is not required.
|
|
|
+* 2. Altered source versions must be plainly marked as such, and must not be
|
|
|
+* misrepresented as being the original software.
|
|
|
+* 3. This notice may not be removed or altered from any source distribution.
|
|
|
+**/
|
|
|
+
|
|
|
+#include "wrap_ChainShape.h"
|
|
|
+#include "Physics.h"
|
|
|
+
|
|
|
+namespace love
|
|
|
+{
|
|
|
+namespace physics
|
|
|
+{
|
|
|
+namespace box2d
|
|
|
+{
|
|
|
+ ChainShape * luax_checkchainshape(lua_State * L, int idx)
|
|
|
+ {
|
|
|
+ return luax_checktype<ChainShape>(L, idx, "ChainShape", PHYSICS_CHAIN_SHAPE_T);
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_setNextVertex(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ float x = (float)luaL_checknumber(L, 2);
|
|
|
+ float y = (float)luaL_checknumber(L, 3);
|
|
|
+ c->setNextVertex(x, y);
|
|
|
+ return 0;
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_setPrevVertex(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ float x = (float)luaL_checknumber(L, 2);
|
|
|
+ float y = (float)luaL_checknumber(L, 3);
|
|
|
+ c->setPrevVertex(x, y);
|
|
|
+ return 0;
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_getChildEdge(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ int index = luaL_checkint(L, 2);
|
|
|
+ EdgeShape * e = c->getChildEdge(index);
|
|
|
+ luax_newtype(L, "EdgeShape", PHYSICS_EDGE_SHAPE_T, e);
|
|
|
+ return 1;
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_getVertexCount(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ int count = c->getVertexCount();
|
|
|
+ lua_pushinteger(L, count);
|
|
|
+ return 1;
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_getVertex(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ int index = luaL_checkint(L, 2);
|
|
|
+ b2Vec2 v = c->getVertex(index);
|
|
|
+ lua_pushnumber(L, v.x);
|
|
|
+ lua_pushnumber(L, v.y);
|
|
|
+ return 2;
|
|
|
+ }
|
|
|
+
|
|
|
+ int w_ChainShape_getVertices(lua_State * L)
|
|
|
+ {
|
|
|
+ ChainShape * c = luax_checkchainshape(L, 1);
|
|
|
+ const b2Vec2 * verts = c->getVertices();
|
|
|
+ int count = c->getVertexCount();
|
|
|
+ lua_createtable(L, count*2, 0);
|
|
|
+ for (int i = 0; i < count; i++) {
|
|
|
+ b2Vec2 v = Physics::scaleUp(verts[i]);
|
|
|
+ lua_pushnumber(L, v.x);
|
|
|
+ lua_rawseti(L, -2, i*2+1);
|
|
|
+ lua_pushnumber(L, v.y);
|
|
|
+ lua_rawseti(L, -2, i*2+2);
|
|
|
+ }
|
|
|
+ return 1;
|
|
|
+ }
|
|
|
+
|
|
|
+ static const luaL_Reg functions[] = {
|
|
|
+ { "setNextVertex", w_ChainShape_setNextVertex },
|
|
|
+ { "setPrevVertex", w_ChainShape_setPrevVertex },
|
|
|
+ { "getChildEdge", w_ChainShape_getChildEdge },
|
|
|
+ { "getVertexCount", w_ChainShape_getVertexCount },
|
|
|
+ { "getVertex", w_ChainShape_getVertex },
|
|
|
+ { "getVertices", w_ChainShape_getVertices },
|
|
|
+ // From Shape.
|
|
|
+ { "getType", w_Shape_getType },
|
|
|
+ { "getRadius", w_Shape_getRadius },
|
|
|
+ { "getChildCount", w_Shape_getChildCount },
|
|
|
+ { "testPoint", w_Shape_testPoint },
|
|
|
+ { "rayCast", w_Shape_rayCast },
|
|
|
+ { "computeAABB", w_Shape_computeAABB },
|
|
|
+ { "computeMass", w_Shape_computeMass },
|
|
|
+ { "destroy", w_Shape_destroy },
|
|
|
+ { 0, 0 }
|
|
|
+ };
|
|
|
+
|
|
|
+ int luaopen_chainshape(lua_State * L)
|
|
|
+ {
|
|
|
+ return luax_register_type(L, "ChainShape", functions);
|
|
|
+ }
|
|
|
+
|
|
|
+} // box2d
|
|
|
+} // physics
|
|
|
+} // love
|