ListBootedZones(); # @zones = ( # { type => "dynamic", short_name => "arena", long_name => "Arena", port => 8001 }, # { type => "static", short_name => "freportw", long_name => "West Freeport", port => 8002 }, # { type => "static", short_name => "freportn", long_name => "North Freeport", port => 8003 } # ); ?>

## Zone List

".($#zones+1)." zones running."; ?>

Zone Name | Instance Id | Players
--- | --- | ---
GetZoneDetails($zonekey); if(!$zone) { $zone->{long_name} = "ERROR: no zone"; } elsif($zone->{error}) { $zone->{long_name} = "ERROR: $zone->{error}"; } print "
\n"; if($zone->{type} eq "dynamic") { if($zone->{zone_id} == 0) { print "\t
"; } else { print "\t
"; } } else { print "
"; } print "
"; print "
"; print "
$zone->{launch_name}: Idle | $zone->{launch_name}: $zone->{long_name} ($zone->{short_name}) | $zone->{long_name} ($zone->{short_name}) | $zone->{instance_id} | Players
\n"; } ?>