diff -r 448d61778ca7 -r da083f8d95e6 hedgewars/uScript.pas --- a/hedgewars/uScript.pas Sat Nov 17 00:15:30 2012 +0400 +++ b/hedgewars/uScript.pas Sat Nov 17 00:41:30 2012 +0400 @@ -1794,6 +1794,18 @@ lc_setaihintsongear:= 0 end; + +function lc_hedgewarsscriptload(L : Plua_State) : LongInt; Cdecl; +begin + if lua_gettop(L) <> 1 then + begin + LuaError('Lua: Wrong number of parameters passed to HedgewarsScriptLoad!'); + lua_pushnil(L) + end + else + ScriptLoad(lua_tostring(L, 1)); + lc_hedgewarsscriptload:= 0; +end; /////////////////// procedure ScriptPrintStack; @@ -2407,6 +2419,7 @@ lua_register(luaState, _P'TestRectForObstacle', @lc_testrectforobstacle); lua_register(luaState, _P'SetGearAIHints', @lc_setaihintsongear); +lua_register(luaState, _P'HedgewarsScriptLoad', @lc_hedgewarsscriptload); ScriptClearStack; // just to be sure stack is empty