void main()
{
    object oPC = GetFirstPC();
    while (GetIsObjectValid(oPC) == TRUE)
    {
        object oArea;
        oArea = GetArea(GetObjectByTag("1to2_east"));   //level 1
        ExploreAreaForPlayer(oArea, oPC);
        oArea = GetArea(OBJECT_SELF);                   //level 2
        ExploreAreaForPlayer(oArea, oPC);
        oArea = GetArea(GetObjectByTag("3to2"));        //level 3
        ExploreAreaForPlayer(oArea, oPC);
        oArea = GetArea(GetObjectByTag("4to5"));        //level 4
        ExploreAreaForPlayer(oArea, oPC);
        oArea = GetArea(GetObjectByTag("5to4"));        //level 5
        ExploreAreaForPlayer(oArea, oPC);
        oArea = GetArea(GetObjectByTag("Dungeonto1"));  //dungeon
        ExploreAreaForPlayer(oArea, oPC);
        oPC = GetNextPC();
    }

}