if (level_type != LEVEL_DUNGEON)
        {
            depth = -1;
            branch = NUM_BRANCHES;
        }

static bool _slime_pit_enable_teleport_control()

static bool _slime_pit_unlock(bool silent)

    return unset_level_flags(LFLAG_NO_TELE_CONTROL);

    unset_level_flags(LFLAG_NO_TELE_CONTROL, silent);
    bool in_los = false;
    if (!silent)
    {
        for (int x = 0; x < GXM && !in_los; ++x)
            for (int y = 0; y < GYM; ++y)
                if (grd[x][y] == DNGN_STONE_WALL
                    && see_grid(x, y))
                {
                    in_los = true;
                    break;
                }
    }
    replace_area_wrapper(DNGN_STONE_WALL, DNGN_CLEAR_ROCK_WALL);
    if (!silent)
    {
        if (in_los)
            mpr("Suddenly, all colour oozes out of the stone walls.",
                MSGCH_MONSTER_ENCHANT);
        else
            mpr("You feel a strange vibration for a moment.",
                MSGCH_MONSTER_ENCHANT);
    }
    
    return (true);

static bool _slime_pit_unlock_offlevel() { return _slime_pit_unlock(true); }
static bool _slime_pit_unlock_onlevel()  { return _slime_pit_unlock(false); }

            apply_to_level( level_id(BRANCH_SLIME_PITS, 6),
                            true,
                            _slime_pit_enable_teleport_control );

        {
            const level_id target(BRANCH_SLIME_PITS, 6);
            if (is_existing_level(target))
                apply_to_level(
                    target,
                    true,
                    target == level_id::current()?
                    _slime_pit_unlock_onlevel : _slime_pit_unlock_offlevel );
        }

             || type == MONS_ROYAL_JELLY

        if (preserve_current)
            save_level(you.your_level, you.level_type, you.where_are_you);
                

lua {{
-- Special effects for Slime:6
function slime_wall_morph(x)
  local stone = dgn.feature_number('stone_wall')
  local inlos = false
  for x = 0, dgn.GXM - 1 do
    for y = 0, dgn.GYM - 1 do
      if dgn.grid(x, y) == stone and you.see_grid(x, y) then
        inlos = true
        break
      end
    end
    if inlos then break end
  end
  dgn.replace_feat { stone_wall= "clear_rock_wall" }
  if inlos then
    crawl.mpr("Suddenly all colour oozes out of the stone walls.",
              "monster_enchant")
  else
    crawl.mpr("You feel a strange vibration for a moment.",
              "monster_enchant")
  end
end

}}

MARKER:  X = lua:mons_dies_change_flags { \
             mon_name="royal jelly", \
             trigger=slime_wall_morph \
         }
SUBST:  X = .

xxxxxxxxxxx'..................2.c.4.c.X..c.4.c.2....................'xxxxxxxxxxx

xxxxxxxxxxx'..................2.c.4.c....c.4.c.2....................'xxxxxxxxxxx