mirror of
https://github.com/EQEmu/Server.git
synced 2025-12-12 01:11:29 +00:00
73 lines
2.1 KiB
HTML
73 lines
2.1 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
|
|
"http://www.w3.org/TR/html4/loose.dtd">
|
|
<html>
|
|
<head>
|
|
<title></title>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
|
|
<link rel="stylesheet" title="Default" href="main.css" type="text/css" />
|
|
</head>
|
|
<?
|
|
$zone = $request->get("zone", "");
|
|
@chars = $EQW->ListPlayers($zone);
|
|
#(
|
|
# { character => "Joe", account => "yay", location_short => "arena", location_long => "Arena" },
|
|
# { character => "Bob", account => "yay", location_short => "freportw", location_long => "West Freeport" },
|
|
# { character => "Monkey", account => "notyay", location_short => "freportn", location_long => "North Freeport" }
|
|
# );
|
|
?>
|
|
<body>
|
|
<h2 align="center">Online Player List</h2>
|
|
<hr/>
|
|
<?
|
|
if($zone eq "") {
|
|
print "There are ".($#chars+1)." players logged in.";
|
|
} else {
|
|
print "There are ".($#chars+1)." players in $zone.";
|
|
}
|
|
?>
|
|
<hr/>
|
|
<table width="100%" border="1" cellspacing="2" cellpadding="3" class="zonelist">
|
|
<tr>
|
|
<th scope="col">Character</th>
|
|
<th scope="col">Account Name</th>
|
|
<th scope="col">Location</th>
|
|
<th scope="col">Actions</th>
|
|
</tr>
|
|
<?
|
|
foreach my $charname (@chars) {
|
|
my $char = $EQW->GetPlayerDetails($charname);
|
|
if(!$char) {
|
|
$char->{character} = "ERROR: no char";
|
|
} elsif($char->{error}) {
|
|
$char->{character} = "ERROR: ".$char->{error};
|
|
}
|
|
print "<tr>";
|
|
if($char->{character} eq "") {
|
|
print "<td>Not Selected</td>";
|
|
} else {
|
|
print "<td>$char->{character}";
|
|
if(defined($char->{guild_id}) && $char->{guild_id} > 0) {
|
|
print " <<a href='guild.html?id=$char->{guild_id}'>guild #$char->{guild_id}</a>>";
|
|
}
|
|
print "<br>";
|
|
print "$char->{level} $char->{race} $char->{class}";
|
|
print "</td>";
|
|
}
|
|
print "<td><a href='account.html?name=$char->{account}'>$char->{account}</a>";
|
|
if($char->{status} > 0) {
|
|
print " (status $char->{status})";
|
|
}
|
|
print "<br>";
|
|
print " $char->{ip}</td>";
|
|
print "<td>$char->{location_long} ($char->{location_short})</td>";
|
|
print "<td>";
|
|
print "<a href='char.html?name=$char->{character}&action=kick'>Kick</a>";
|
|
print "</td>";
|
|
print "</tr>";
|
|
}
|
|
|
|
?>
|
|
</table>
|
|
</body>
|
|
</html>
|