Initial Upload

Initial Upload

_module/nss/cv_rest_arealist.nss

@@ -0,0 +1,63 @@
+//::///////////////////////////////////////////////
+//:: 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);
+}
+
+
+