Author: silene
Date: Sat Apr 18 23:53:53 2009
New Revision: 35028
URL: http://svn.gna.org/viewcvs/wesnoth?rev=35028&view=rev
Log:
Converted [show_objectives], [gold], [store_gold], [clear_variable] to Lua.
Modified:
trunk/data/lua/wml-tags.lua
Modified: trunk/data/lua/wml-tags.lua
URL:
http://svn.gna.org/viewcvs/wesnoth/trunk/data/lua/wml-tags.lua?rev=35028&r1=35027&r2=35028&view=diff
==============================================================================
--- trunk/data/lua/wml-tags.lua (original)
+++ trunk/data/lua/wml-tags.lua Sat Apr 18 23:53:53 2009
@@ -20,6 +20,10 @@
return c[2]
end
return f, { i = 1 }
+end
+
+local function trim(s)
+ return string.gsub(s, "^%s*(.-)%s*$", "%1")
end
local function wml_objectives(cfg)
@@ -73,4 +77,38 @@
end
end
+local function wml_show_objectives(cfg)
+ local side = cfg.side or 0
+ if side == 0 then
+ for team in all_teams() do
+ team.objectives_changed = true
+ end
+ else
+ local team = wesnoth.get_side(side)
+ team.objectives_changed = true
+ end
+end
+
+local function wml_gold(cfg)
+ local team = wesnoth.get_side(cfg.side)
+ team.gold = team.gold + cfg.amount
+end
+
+local function wml_store_gold(cfg)
+ local team = wesnoth.get_side(cfg.side)
+ local var = cfg.variable
+ if not var then var = "gold" end
+ wesnoth.set_variable(var, team.gold)
+end
+
+local function wml_clear_variable(cfg)
+ for w in string.gmatch(cfg.name, "[^%s,][^,]*") do
+ wesnoth.set_variable(trim(w))
+ end
+end
+
wesnoth.register_wml_action("objectives", wml_objectives)
+wesnoth.register_wml_action("show_objectives", wml_show_objectives)
+wesnoth.register_wml_action("gold", wml_gold)
+wesnoth.register_wml_action("store_gold", wml_store_gold)
+wesnoth.register_wml_action("clear_variable", wml_clear_variable)
_______________________________________________
Wesnoth-commits mailing list
[email protected]
https://mail.gna.org/listinfo/wesnoth-commits
