mirror of
https://github.com/EQEmu/Server.git
synced 2026-05-17 03:08:26 +00:00
svn -> git Migration
This commit is contained in:
@@ -0,0 +1,42 @@
|
||||
<?
|
||||
$zone = $request->get("zone", "");
|
||||
$instance_id = $request->get("instance_id", "0");
|
||||
my @players = $EQW->ListPlayers($zone, $instance_id);
|
||||
my $player_count = @players;
|
||||
print "{";
|
||||
print "\"player_count\" : $player_count,";
|
||||
print "\"players\" : ";
|
||||
print "[";
|
||||
|
||||
my $i = 0;
|
||||
for my $player (@players) {
|
||||
my $pd = $EQW->GetPlayerDetails($player);
|
||||
|
||||
print "{";
|
||||
print "\"character\" : \"$pd->{character}\",";
|
||||
print "\"account\" : \"$pd->{account}\",";
|
||||
print "\"account_id\" : \"$pd->{account_id}\",";
|
||||
print "\"location_short\" : \"$pd->{location_short}\",";
|
||||
print "\"location_long\" : \"$pd->{location_long}\",";
|
||||
print "\"ip\" : \"$pd->{ip}\",";
|
||||
print "\"level\" : \"$pd->{level}\",";
|
||||
print "\"race\" : \"$pd->{race}\",";
|
||||
print "\"race_id\" : \"$pd->{race_id}\",";
|
||||
print "\"class\" : \"$pd->{class}\",";
|
||||
print "\"class_id\" : \"$pd->{class_id}\",";
|
||||
print "\"guild_id\" : \"$pd->{guild_id}\",";
|
||||
print "\"guild\" : \"$pd->{guild}\",";
|
||||
print "\"status\" : \"$pd->{status}\",";
|
||||
print "\"client_version\" : \"$pd->{client_version}\"";
|
||||
print "}";
|
||||
|
||||
if($i != $player_count - 1) {
|
||||
print ",";
|
||||
}
|
||||
$i++;
|
||||
}
|
||||
|
||||
print "]";
|
||||
print "}";
|
||||
|
||||
?>
|
||||
Reference in New Issue
Block a user