//::///////////////////////////////////////////////
//:: cv_rest_arealist
//:: cv_rest_arealist.nss
//:: Copyright (c) 2003 Darren Summerwind.
//:://////////////////////////////////////////////
/*
        Conversation Player Area List Script
*/
//:://////////////////////////////////////////////
//:: Created By: Darren Summerwind
//:: Created On: 28/9/03
//:://////////////////////////////////////////////

string Playerlist()
{
    //Define Stuff
    string sMessage;
    object oTarget;

    // Clear Message
    sMessage = "";

    // First Line
    sMessage = "Player Area Listing";

    // Get First Player
    oTarget = GetFirstPC();

    // Check if valid
    while( GetIsObjectValid(oTarget) )
    {
        // Display Name
        sMessage += "\n"+"["+GetName(oTarget)+"]";

        // Get Area Name
        string sAreaName = GetName(GetArea(oTarget));

        // Check if loading
        if( !GetStringLength(sAreaName) )
            sAreaName = "Loading...";

        // Add area to Message
        sMessage += " - "+sAreaName;

        // Get Next PC
        oTarget = GetNextPC();
    }
    //Return
    return sMessage;
}

void main()
{
  // Get Last Speaker
  object oPC = GetPCSpeaker();
  // Get the Player Area Listing
  string sPlayerlist = Playerlist();
  // Set sPlayerlist as a custom token
  SetCustomToken(1000, sPlayerlist);
}