hp_indicator = obj {

    nam = "hp_indicator";

    disp = function(s)

        return "Здоровье:" .. pl.hp .. "/10";

    end;

};

hp_indicator:disable();

battlefield = function(tab)

    local make_turn = tab.make_turn;

    tab.nosave = true;

    tab.noautosave = true;

    tab.isPassable = function(s, x, y)

        if (x < 1 or x > 7 or y < 1 or y > 7 or tab.map[y][x] > 0) then

            return false;

        end;

        for i = 1, #s.obj do

            local obst = EngineUtils.getValue(s.obj[i].obst, s.obj[i]);

            if (obst and obst > 0) then

                if (s.obj[i].x == x and s.obj[i].y == y) then

                    return false;

        if (not s:isPassable(s.plX - 1, s.plY)) then

            bf_west:disable();

        end;

        if (not s:isPassable(s.plX + 1, s.plY)) then

            bf_east:disable();

        end;

    end;

    local entered = tab.entered;

    tab.entered = function(s)

        s:check_walk();

        if (type(entered) == 'function') then

            return entered(s);

        else

            return entered;

        end;

    end;

    tab.onreload = function(s)

        here():make_turn();

    end;

    tab.make_turn = function(s)

        -- A bit peggish but works

        pl.x = s.plX;

        pl.y = s.plY;

        for i = 1, #s.obj do

            if (type(s.obj[i].make_turn) == 'function' and s.obj[i].hp > 0) then

                s.obj[i]:make_turn();

    end;

	return room {

		nam = nam;

		disp = disp;

		where = target;

		enter = _kh.vroom_enter;

		seen_level = seen_level;

		--enter = _kh.vroom_enter;

		--save = _kh.vroom_save;

	};

end;

    return v;

dlg = inherit(dlg, function(v)

    v.hideinv = true;

    return v;

end);

obj = inherit(obj, function(v)

	v.disable_implicit = hook(v.disable, function(f, s, ...)

		s._disabled_implicit = true;

		return f(s, unpack({...}));

	end);