<!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>
<?

  @list = $EQW->ListLaunchers();

?>
<body>
<h2 align="center">Launchers</h2>
<hr/>
<?
print "You have ".($#list+1)." launchers. (@list)";
?>
<hr/>
<table width="100%"  border="1" cellspacing="2" cellpadding="3" class="zonelist">
  <tr>
    <th scope="col">Launcher Name </th>
    <th scope="col">IP</th>
    <th scope="col">Zone Count</th>
    <th scope="col">Actions</th>
  </tr>
<?
  for my $lk (sort @list) {
		my $l = $EQW->GetLauncher($lk);
		if(!$l) {
			#$zone->{name} = "ERROR: no launcher";
		}
		print "<tr>\n";
		if($l->IsConnected()) {
			print "\t<td><a href='launcher.html?name=".$l->GetName()."'>".$l->GetName()."</a></td>";
			print "<td>_IP_</td>";
		} else {
			print "<td><a href='launcher.html?name=".$l->GetName()."'>".$l->GetName()."</a><br><b>Not Connected</b></td>";
			print "<td>&nbsp;</td>";
		}
		print "<td>".$l->GetStaticCount()."s, ".$l->GetDynamicCount()."d</td>";
		print "<td>";
		print "<a href='launcher.html?name=".$l->GetName()."'>Details</a> - ";
		print "<a href='action.html?action=remlauncher&name=".$l->GetName()."'>Remove</a>";
		print "</td>\n";
		print "</tr>\n";
  }
?>
</table>

<form action="launcher.html" method="POST">
Add Launcher: Name: <input type='text' name='name'>
Dynamic Count: <input type='text' name='dynamics' size="3">
 <input type='submit' name='action' value='Add'>
</form>

</body>
</html>
