//#include "rd_spawnzones"
#include "rd_questinc"

void main()
{
int iLevel;
string sTag;
location lLoc;
object oGuard;
object oPC;
int iMinLevel;
int iMaxLevel;
int iTreasure;
object oChest;

oPC = GetEnteringObject();

if (GetIsPC(oPC))
    {
    if (GetLocalInt(OBJECT_SELF,"EN4_SetupZone") == 0 && GetLocalInt(OBJECT_SELF,"AdventureZone") > 0)
        SetupZone(oPC);

    CheckZone(oPC);

    if (GetLocalInt(OBJECT_SELF,"Spawned") == 0)
        {
        iLevel = GetHitDice(oPC);
        iLevel = ZoneLevel(OBJECT_SELF,iLevel);

        RespawnCampsAE(GetEnteringObject(),0, iLevel+2, GetLocalInt(OBJECT_SELF,"SpecialSpawn"));
        RespawnMobsAE(GetEnteringObject(),0, iLevel+2);
        SetTrapsAndDoors(GetEnteringObject());
        SetLocalInt(OBJECT_SELF,"Spawned",1);
        SetLocalInt(OBJECT_SELF,"RandomEncounter",1);

        iTreasure = Random(5)+1;
        sTag = "GD1_C" + IntToString(iTreasure) + "_Treasure";
        oChest = GetObjectByTag(sTag);
        SetLocalInt(oChest,"GDSpecialTreasure",1);
        }
    }
}