void main()
{

object oPC = GetEnteringObject();

effect eSafe = EffectSanctuary(99);
effect eSlashing = EffectDamageResistance(DAMAGE_TYPE_SLASHING,100);
effect eBludgeoning = EffectDamageResistance(DAMAGE_TYPE_BLUDGEONING,100);
effect ePiercing = EffectDamageResistance(DAMAGE_TYPE_PIERCING,100);
effect eArmor = EffectACIncrease(30);
effect eConceal = EffectConcealment(100);

if (GetIsPC(oPC) == TRUE)
    {
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSafe,oPC,10.0);
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSlashing,oPC,10.0);
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eBludgeoning,oPC,10.0);
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, ePiercing,oPC,10.0);
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eArmor, oPC, 10.0);
        ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eConceal, oPC, 10.0);

        if (GetItemPossessedBy(oPC, "re_area_map")!=OBJECT_INVALID)
        {
            ExploreAreaForPlayer(GetArea(oPC), oPC, TRUE);
        }
    }

}