require "lunit" module("tests.e2.guard", package.seeall, lunit.testcase) function setup() eressea.free_game() eressea.settings.set("nmr.timeout", "0") eressea.settings.set("NewbieImmunity", "0") eressea.settings.set("rules.food.flags", "4") end function test_guard_unarmed() local r1 = region.create(0, 0, "plain") local f1 = faction.create("hodor@eressea.de", "human", "de") local u1 = unit.create(f1, r1, 1) assert_equal(false, u1.guard) u1:clear_orders() u1:add_order("BEWACHE") process_orders() assert_equal(false, u1.guard) end function test_guard_armed() local r1 = region.create(0, 0, "plain") local f1 = faction.create("hodor@eressea.de", "human", "de") local u1 = unit.create(f1, r1, 1) assert_equal(false, u1.guard) u1:add_item("sword", 1) u1:set_skill("melee", 2) u1:clear_orders() u1:add_order("BEWACHE") process_orders() assert_equal(true, u1.guard) end function test_guard_allows_move_after_combat() -- bug 1493 local r1 = region.create(0, 0, "plain") local r2 = region.create(1, 0, "plain") local f1 = faction.create("bernd@eressea.de", "human", "de") local u1 = unit.create(f1, r1, 10) local uid1 = u1.id local f2 = faction.create("horst@eressea.de", "human", "de") local u2 = unit.create(f2, r1, 1) u1:add_order("BEWACHE") u1:add_item("sword", 10) u1:set_skill("melee", 2) u1:clear_orders() u1:add_order("BEWACHE") process_orders() assert_equal(true, u1.guard) u1:clear_orders() u1:add_order("NACH O") u1:add_order("ATTACKIERE " .. itoa36(u2.id)) process_orders() u1 = get_unit(uid1) assert_equal(r2, u1.region) end function test_no_guard_no_move_after_combat() -- bug 1493 local r1 = region.create(0, 0, "plain") local r2 = region.create(1, 0, "plain") local f1 = faction.create("bernd@eressea.de", "human", "de") local u1 = unit.create(f1, r1, 10) local uid1 = u1.id local f2 = faction.create("horst@eressea.de", "human", "de") local u2 = unit.create(f2, r1, 1) u1:add_order("BEWACHE") u1:add_item("sword", 10) u1:set_skill("melee", 2) assert_equal(false, u1.guard) u1:clear_orders() u1:add_order("NACH O") u1:add_order("ATTACKIERE " .. itoa36(u2.id)) process_orders() u1 = get_unit(uid1) assert_equal(r1, u1.region) end