forked from github/server
103 lines
3.4 KiB
Lua
103 lines
3.4 KiB
Lua
local tcname = 'tests.shared.xmas'
|
|
local lunit = require('lunit')
|
|
if _VERSION >= 'Lua 5.2' then
|
|
_ENV = module(tcname, 'seeall')
|
|
else
|
|
module(tcname, lunit.testcase, package.seeall)
|
|
end
|
|
|
|
function setup()
|
|
eressea.free_game()
|
|
eressea.settings.set("nmr.timeout", "0")
|
|
eressea.settings.set("rules.grow.formula", "0")
|
|
eressea.settings.set("rules.peasants.growth.factor", "0")
|
|
eressea.settings.set("volcano.active.percent", "0")
|
|
eressea.settings.set("volcano.outbreak.percent", "0")
|
|
eressea.settings.set("volcano.stop.percent", "0")
|
|
end
|
|
|
|
function test_snowglobe_fail()
|
|
local r1 = region.create(0, 0, "glacier")
|
|
local r2 = region.create(1, 0, "ocean")
|
|
local f = faction.create("human", "snowglobe1@eressea.de", "de")
|
|
local u = unit.create(f, r1, 1)
|
|
u:add_item("snowglobe", 1)
|
|
u:clear_orders()
|
|
u:add_order("BENUTZEN 1 Schneekugel Ost")
|
|
unit.create(f, r2, 1) -- unit in target region => fail
|
|
process_orders()
|
|
assert_equal('ocean', r2.terrain)
|
|
assert_equal(1, u:get_item('snowglobe'))
|
|
assert_equal(1, f:count_msg_type('target_region_not_empty'))
|
|
end
|
|
|
|
function test_snowglobe_missing_direction()
|
|
local r1 = region.create(0, 0, "glacier")
|
|
local r2 = region.create(1, 0, "ocean")
|
|
local f = faction.create("human", "snowglobe1@eressea.de", "de")
|
|
local u = unit.create(f, r1, 1)
|
|
u:add_item("snowglobe", 1)
|
|
u:clear_orders()
|
|
u:add_order("BENUTZEN 1 Schneekugel")
|
|
process_orders()
|
|
assert_equal('ocean', r2.terrain)
|
|
assert_equal(1, u:get_item('snowglobe'))
|
|
assert_equal(1, f:count_msg_type('missing_direction'))
|
|
end
|
|
|
|
function test_snowglobe()
|
|
local r1 = region.create(0, 0, "glacier")
|
|
local r2 = region.create(1, 0, "ocean")
|
|
local f = faction.create("human", "snowglobe2@eressea.de", "de")
|
|
local u = unit.create(f, r1, 1)
|
|
local fail = 0
|
|
u:add_item("snowglobe", have)
|
|
local xform = { ocean = "glacier", glacier = "glacier", firewall = "volcano", desert = "plain", volcano = "mountain", plain = "plain" }
|
|
for k, v in pairs(xform) do
|
|
r2.terrain = k
|
|
use_snowglobe(u, 1, "Ost", nil)
|
|
assert_equal(v, r2.terrain)
|
|
if k==v then
|
|
fail = fail + 1
|
|
assert_equal(fail, f:count_msg_type('target_region_invalid'))
|
|
end
|
|
end
|
|
end
|
|
|
|
local function use_tree(terrain)
|
|
local r = region.create(0, 0, terrain)
|
|
local f = faction.create("human", "noreply@eressea.de", "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_nil(r:get_key("xm06"))
|
|
assert_equal(0, r:get_resource("tree"))
|
|
eressea.free_game()
|
|
r = use_tree("plain")
|
|
assert_equal(get_turn(), r:get_key("xm06"))
|
|
assert_equal(10, r:get_resource("tree"))
|
|
end
|
|
|
|
function test_stardust()
|
|
-- fix random peasant changes:
|
|
eressea.settings.set("rules.economy.repopulate_maximum", 0)
|
|
local r = region.create(0, 0, "plain")
|
|
r:set_resource("peasant", 10)
|
|
local f = faction.create("human", "noreply@eressea.de", "de")
|
|
local u = unit.create(f, r, 5)
|
|
u:add_item("stardust", 1)
|
|
u:clear_orders()
|
|
u:add_order("BENUTZEN 1 Sternenstaub")
|
|
process_orders()
|
|
assert_equal(15, r:get_resource("peasant"))
|
|
assert_equal(0, u:get_item('stardust'))
|
|
end
|