christmas 2009

src/common/kernel.vcproj

@@ -352,10 +352,6 @@
 				RelativePath=".\kernel\karma.h"
 				>
 			</File>
-			<File
-				RelativePath="..\external\lunit\lunit.lua"
-				>
-			</File>
 			<File
 				RelativePath=".\kernel\magic.c"
 				>

src/eressea.vcproj

@@ -277,6 +277,14 @@
 					/>
 				</FileConfiguration>
 			</File>
+			<File
+				RelativePath=".\scripts\init-e3a.lua"
+				>
+			</File>
+			<File
+				RelativePath=".\external\lunit\lunit.lua"
+				>
+			</File>
 			<File
 				RelativePath=".\scripts\run-e3a.lua"
 				>

src/res/e3a/items.xml

@@ -80,4 +80,11 @@
     </item>
   </resource>
 
-  </resources>
+  <!-- xmas 2009
+  <resource name="xmastree">
+    <item weight="0">
+      <function name="use" value="lua_useitem"/>
+    </item>
+  </resource> -->
+
+</resources>

src/res/e3a/strings.xml

@@ -5,7 +5,8 @@
     _p: plural (13 /Trolle/)
     _x: preposition (15 /Troll/schwerter)
     _a: including article (ein Troll, a troll)
-   -->
+  -->
+
   <!--Fort-Ausbaustufen -->
   <string name="calendar::thirdage">
     <text locale="de">des dritten Zeitalters</text>

src/scripts/init-e3a.lua

@@ -1,3 +1,4 @@
+require "e3a.xmas2009"
 require "e3a.rules"
 require "e3a.multi"
 require "default"

src/scripts/run-e3a.lua

@@ -166,6 +166,9 @@ function process(orders, confirmed_multis, suspected_multis, locales)
   print (nmrs .. " Factions with 1 NMR")
 
   process_orders()
+  if xmas2009~=nil then
+    xmas2009()
+  end
 
   -- create new monsters:
   spawn_dragons()

src/scripts/tests/e3a.lua

@@ -6,6 +6,27 @@ function setup()
     free_game()
 end
 
+local function use_tree(terrain)
+  local r = region.create(0,0, terrain)
+  local f = faction.create("noreply@eressea.de", "human", "de")
+  local u1 = unit.create(f, r, 5)
+  r:set_resource("tree", 0)
+  u1:add_item("xmastree", 1)
+  u1:clear_orders()
+  u1:add_order("BENUTZEN 1 Weihnachtsbaum")
+  process_orders()
+  return r
+end
+
+function test_xmastree()
+  local r
+  r = use_tree("ocean")
+  assert_equal(0, r:get_resource("tree"))
+  free_game()
+  r = use_tree("plain")
+  assert_equal(10, r:get_resource("tree"))
+end
+
 function test_capacity()
     local r = region.create(0,0, "ocean")
     region.create(1,0, "ocean")