# HG changeset patch # User Henek # Date 1323714185 -3600 # Node ID 40f9ef7d824d84e1ae55c4318b72f987901157bb # Parent fb29180892251626c1c60d7ea4d3a1e44a690f4d added SetAmmoStore to lua for convinience diff -r fb2918089225 -r 40f9ef7d824d hedgewars/uScript.pas --- a/hedgewars/uScript.pas Mon Dec 12 00:10:55 2011 +0100 +++ b/hedgewars/uScript.pas Mon Dec 12 19:23:05 2011 +0100 @@ -1401,6 +1401,22 @@ lc_setammo:= 0 end; +function lc_setammostore(L : Plua_State) : LongInt; Cdecl; +var np: LongInt; +begin + np:= lua_gettop(L); + if (np <> 4) then + LuaError('Lua: Wrong number of parameters passed to SetAmmoStore!') + else + begin + ScriptAmmoLoadout:= lua_tostring(L, 1); + ScriptAmmoProbability:= lua_tostring(L, 2); + ScriptAmmoDelay:= lua_tostring(L, 3); + ScriptAmmoReinforcement:= lua_tostring(L, 4); + end; + lc_setammostore:= 0 +end; + function lc_getrandom(L : Plua_State) : LongInt; Cdecl; var m : LongInt; begin @@ -2028,6 +2044,7 @@ lua_register(luaState, 'HideMission', @lc_hidemission); lua_register(luaState, 'AddCaption', @lc_addcaption); lua_register(luaState, 'SetAmmo', @lc_setammo); +lua_register(luaState, 'SetAmmoStore', @lc_setammostore); lua_register(luaState, 'PlaySound', @lc_playsound); lua_register(luaState, 'AddTeam', @lc_addteam); lua_register(luaState, 'AddHog', @lc_addhog);