\n");
printf("\n\n");
printf("\n");
printf("show plots\n");
printf("\n");
printf("\n");
printf("\n");
$seq=0;
if (!empty($_GET["seq"]))
$seq=$_GET["seq"];
$tabnum=1;
if (!empty($_GET["tabnum"]))
$tabnum=$_GET["tabnum"];
$type2="calib";
if (!empty($_GET["type2"]))
$type2=$_GET["type2"];
$next=0;
$prev=0;
if (!empty($seq))
{
if (!empty($_GET["next"]))
$tabnum=$tabnum+1;
if (!empty($_GET["prev"]))
$tabnum=$tabnum-1;
$type=gettypename($type2);
$plot=getplotname($seq, $tabnum, $type, $type2);
//be careful: this has to be adapted in case tabs are removed or new tabs are added
//number of tabs for calib*.root, signal*.root and star*.root
$calibtabs=11;
$signaltabs=12;
$startabs=18;
if (($type2=="calib" && $tabnum==($calibtabs+1))
|| ($type2=="signal" && $tabnum==($signaltabs+1))
|| ($type2=="star" && $tabnum==($startabs+1)))
{
$tabnum=1;
switch ($type2)
{
case "calib":
$type2="signal";
break;
case "signal":
$type2="star";
break;
case "star":
$type2="calib";
break;
}
$type=gettypename($type2);
$plot=getplotname($seq, $tabnum, $type, $type2);
}
if ($tabnum==0)
{
switch($type2)
{
case "calib":
$type2="star";
$tabnum=$startabs;
break;
case "signal":
$type2="calib";
$tabnum=$calibtabs;
break;
case "star":
$type2="signal";
$tabnum=$signaltabs;
break;
}
$type=gettypename($type2);
$plot=getplotname($seq, $tabnum, $type, $type2);
}
$next=$tabnum+1;
$prev=$tabnum-1;
}
printf("\n");
printf("\n");
printf("\n");
?>