106 lines
2.3 KiB
Plaintext
106 lines
2.3 KiB
Plaintext
//Creator: Unknown
|
||
//Revised By: Genisys (Guile)
|
||
//Revised On: 8/12/08
|
||
|
||
//Main Script
|
||
void main()
|
||
{
|
||
|
||
///Delete Var to start fresh\\\\
|
||
object oPC = GetFirstPC();
|
||
|
||
while(GetIsPC(oPC)==TRUE)
|
||
{
|
||
DeleteLocalInt(oPC,"bootlist");
|
||
DeleteLocalString(oPC,"playerinfo");
|
||
|
||
oPC = GetNextPC();
|
||
}
|
||
|
||
////Get Info of each Player and Store it on them\\\\
|
||
int nLoop = 8999;
|
||
SetCustomToken(9000,"Empty");
|
||
SetCustomToken(9001,"Empty");
|
||
SetCustomToken(9002,"Empty");
|
||
SetCustomToken(9003,"Empty");
|
||
SetCustomToken(9004,"Empty");
|
||
SetCustomToken(9005,"Empty");
|
||
SetCustomToken(9006,"Empty");
|
||
SetCustomToken(9007,"Empty");
|
||
SetCustomToken(9008,"Empty");
|
||
SetCustomToken(9009,"Empty");
|
||
|
||
string sMessage;
|
||
object oTarget;
|
||
//object oPC = GetLastUsedBy();
|
||
string sArea;
|
||
string sAreaTag;
|
||
string sLevel;
|
||
int class, pos;
|
||
string cname;
|
||
|
||
// Clear Message
|
||
sMessage = "";
|
||
|
||
// First Line
|
||
|
||
sMessage = "<cç>---------------------------------";
|
||
|
||
// Get First Player
|
||
oTarget = GetFirstPC();
|
||
|
||
|
||
// Check if valid
|
||
while(GetIsPC(oTarget)==TRUE)
|
||
{
|
||
|
||
sLevel = "<cööö>";
|
||
nLoop++;
|
||
string Name = GetName(oTarget);
|
||
int Hitpoints = GetMaxHitPoints(oTarget);
|
||
int AC = GetAC(oTarget);
|
||
string PCPlayerName = GetPCPlayerName(oTarget);
|
||
string sAreaName = GetName(GetArea(oTarget));
|
||
for(pos=1; pos<4; pos++)
|
||
{
|
||
class = GetClassByPosition(pos, oTarget);
|
||
if (class != CLASS_TYPE_INVALID)
|
||
{
|
||
cname = Get2DAString("classes", "Label", class);
|
||
if (cname == "") cname = "unknown (" + IntToString(class) + ")";
|
||
sLevel = sLevel + cname +"<cööö> "+"<cööö>(<cî>"+ IntToString(GetLevelByClass(class, oTarget))+"<cööö>)" + " <cööö>";
|
||
|
||
}
|
||
}
|
||
|
||
|
||
|
||
// Display Name
|
||
sMessage = " ";
|
||
|
||
sMessage = "<cç>:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:-:";
|
||
|
||
sMessage +="\n"+"<cî>"+Name;
|
||
|
||
sMessage +="\n"+sLevel;
|
||
|
||
sMessage +="\n"+"AC:<cî> "+IntToString(AC);
|
||
|
||
sMessage +="\n"+"<cööö>HP: <cî>"+IntToString(Hitpoints);
|
||
|
||
|
||
// Set Token and Info//
|
||
|
||
SetLocalString(oTarget,"playerinfo",sMessage);
|
||
SetLocalInt(oTarget,"bootlist",nLoop);
|
||
int Token = GetLocalInt(oTarget,"bootlist");
|
||
string Info = GetLocalString(oTarget,"playerinfo");
|
||
SetCustomToken(Token,Info);
|
||
|
||
//Continue the loop
|
||
oTarget = GetNextPC();
|
||
}
|
||
|
||
//Main Script End
|
||
}
|