void main()
{
   string sMsg="";
   object oMe=GetPCSpeaker();
   string sID=GetLocalString(oMe,"sTeamID");
   object oPC=GetFirstPC();
   while(oPC!=OBJECT_INVALID)
   { // !OI
     if (oPC!=oMe)
     { // not me
       if (GetLocalString(oPC,"sTeamID")!=sID)
       { // report
         sMsg=GetName(oPC)+" is in area "+GetName(GetArea(oPC))+",";
       } // report
     } // not me
     oPC=GetNextPC();
   } // !OI
   SetCustomToken(90001,sMsg);
}