get("zone", ""); $instance_id = $request->get("instance_id", "0"); @chars = $EQW->ListPlayers($zone, $instance_id); #( # { 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" } # ); ?> EQEmu

Online Player List

".($#chars+1)." players logged in."; } else { print "There are ".($#chars+1)." players in $zone."; } ?>

GetPlayerDetails($charname); if(!$char) { $char->{character} = "ERROR: no char"; } elsif($char->{error}) { $char->{character} = "ERROR: ".$char->{error}; } print "{character}\">"; if($char->{character} eq "") { print ""; } else { print ""; } print ""; print ""; print ""; } ?>
Character Account Name Location
Not Selected$char->{character}"; if(defined($char->{guild_id}) && $char->{guild_id} > 0) { print " <$char->{guild}>"; } print "
"; print "$char->{level} $char->{race} $char->{class}"; print "
$char->{account}"; if($char->{status} > 0) { print " (status $char->{status})"; } print "
"; print " $char->{ip}
$char->{location_long} ($char->{location_short})