<?php

include ("forixinc.php");
include ("util.php");



function cp_cab($iano,$nome)
{
  extract($GLOBALS);

?>
<table border="0" cellspacing="0" cellpadding="0">
<TR>
<TD BGCOLOR="<?php   echo $BOR_BGC; ?>" WIDTH="1"><img src="../pic/0.gif" width="1" height="1"></TD>
<TD><table border="0" cellspacing="0" cellpadding="0">
<TR BGCOLOR="<?php   echo $BOR_BGC; ?>"><TD HEIGHT="1"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<?php   if ($iano>0)
  {
?>
<TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TD HEIGHT="4"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TH VALIGN="middle"><FONT SIZE="+2"><?php     echo $iano; ?>
<?php     if ($iano>1894)
    {
?>
 <A HREF="__cp.asp?<?php       echo $args; ?>&r=<?php       echo $iano-1; ?>&c=<?php       echo $cmd; ?>"><IMG SRC="../pic/ante.gif" ALT="&lt;" ALIGN="absmiddle" BORDER="0"></A>
<?php     } ?>
 <A HREF="__cp.asp?<?php     echo $args; ?>&r=<?php     echo $iano; ?>&c=<?php     echo $cmdCPlis; ?>"><IMG SRC="../pic/lista.gif" ALT="=" ALIGN="absmiddle" BORDER="0"></A>
<?php     if ($iano<$anoFin)
    {
?>
 <A HREF="__cp.asp?<?php       echo $args; ?>&r=<?php       echo $iano+1; ?>&c=<?php       echo $cmd; ?>"><IMG SRC="../pic/prox.gif" ALT="&gt;" ALIGN="absmiddle" BORDER="0"></A>
<?php     } ?>
</FONT></TH></TR>
<?php   } ?>
<?php   if (strlen($nome)>0)
  {

?><TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TD HEIGHT="4"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TH VALIGN="middle"><FONT SIZE="+3"><?php     echo $nome; ?></FONT></TH></TR><?php
  } ?>
<TR BGCOLOR="<?php   echo $CAB_BGC; ?>"><TD HEIGHT="4"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<TR BGCOLOR="<?php   echo $BOR_BGC; ?>"><TD HEIGHT="1"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<?php   return $function_ret;
}



function CPlista()
{
  extract($GLOBALS);


fxhead("Forix: ".$titulo[$N_NONC]);
  $BGC=$TR2_BGC;
cp_cab(0,$titulo[$N_NONC]);
?><TR BGCOLOR="<?php   echo $CAB_BGC; ?>"><TD><TABLE><?php
  $SQLQuery="SELECT truncate(rgp/100,0) as ano From n_gp Group by truncate(rgp/100,0)";
  if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result)))
  {

    for ($idec=1890; $idec<=1980; $idec=$idec+10)
    {
      if ($BGC==$TR1_BGC)
      {

        $BGC=$TR2_BGC;
      }
        else
      {

        $BGC=$TR1_BGC;
      }

?><TR BGCOLOR="<?php       echo $BGC; ?>"><?php
      for ($ii=0; $ii<=9; $ii=$ii+1)
      {

        $ano=$idec+$ii;
?><TD ALIGN="center"><?php
        if ($RSList)
        {

          if (intval($RSList["ano"])==$ano)
          {

$RSList = mysql_fetch_array($result);
?>&nbsp;&nbsp;<A HREF="__cp.asp?<?php             echo $args; ?>&r=<?php             echo $ano; ?>&c=<?php             echo $cmdCPgpr; ?>"><B><?php             echo $ano; ?></B></A>&nbsp;<?php
          }
            else
          {

?>&nbsp;<?php
          }

        }
          else
        {

?>&nbsp;<?php
        }

?>
</TD>
<?php
      } ?>
</TR>
<?php

    }

  }

?>
</TABLE></TD></TR>
<TR BGCOLOR="<?php   echo $BOR_BGC; ?>"><TD HEIGHT="1"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
</TABLE></TD>
<TD BGCOLOR="<?php   echo $BOR_BGC; ?>" WIDTH="1"><img src="../pic/0.gif" width="1" height="1"></TD>
</TR>
</TABLE>
<?php
   include ("__fxtail.php");
   return $function_ret;
}



function CPgpr()
{
  extract($GLOBALS);


fxhead("Forix: ".$ano.", ".$titulo[$N_RACES]);
cp_cab($ano,$titulo[$N_RACES]);
  $SQLQuery="SELECT n_gp.*, dayofmonth(n_gp.date) as dd, month(n_gp.date) as mm, n_gp.name as gp_name, n_ci.* FROM n_ci INNER JOIN n_gp ON n_gp.circuit=n_ci.name where n_gp.rgp>=".($ano*100+51)." and n_gp.rgp<".($ano*100+100)." and n_gp.rgp>=n_ci.rci and n_gp.rgp<n_ci.rci_n order by n_gp.rgp";
  if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
  {

?>
<TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TD ALIGN="center"><TABLE border="0" cellspacing="0" cellpadding="2"><TR>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_DATE]; ?></B>&nbsp;</TD>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_RACE]; ?></B>&nbsp;</TD>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_CIRC]; ?>&nbsp;</B></TD>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_APER]; ?>&nbsp;<BR>[m]</B></TD>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_LAPS]; ?>&nbsp;</B></TD>
<TD ALIGN=CENTER><B>&nbsp;<?php     echo $titulo[$N_DIST]; ?>&nbsp;<BR>[km]</B></TD>
</TR><?php
    $BGC=$TR2_BGC;
    while ($RSList= mysql_fetch_array($result))
    {

      if ($BGC==$TR1_BGC)
      {

        $BGC=$TR2_BGC;
      }
        else
      {

        $BGC=$TR1_BGC;
      }

?><TR BGCOLOR="<?php       echo $BGC; ?>">
<TD ALIGN="right">&nbsp;&nbsp;<?php       echo pri_data($RSList["dd"],$RSList["mm"],0,0); ?>&nbsp;&nbsp;</TD>
<TD ALIGN="left">&nbsp;&nbsp;<A HREF="__gp.asp?<?php       echo $args; ?>&r=<?php       echo $RSList["rgp"]; ?>&c=<?php       echo $cmdGPfic; ?>"><?php       echo $RSList["gp_name"]; ?></A>&nbsp;&nbsp;</TD>
<TD ALIGN="left">&nbsp;&nbsp;<?php       echo $RSList["circuit"]; ?>&nbsp;&nbsp;</TD><?php
      $perim=$RSList["perim_mt"];
      if ($perim==0)
      {

        $perim=$RSList["perim_mi"]*1.609344;
      }

?><TD ALIGN="right">&nbsp;&nbsp;<?php       echo intval($perim); ?>&nbsp;&nbsp;</TD>
<TD ALIGN="right">&nbsp;&nbsp;<?php       echo $RSList["laps"]; ?>&nbsp;&nbsp;</TD>
<TD ALIGN="right">&nbsp;&nbsp;<?php       echo sprintf("%0.3f", $RSList["laps"]*$perim/1000); ?>&nbsp;&nbsp;</TD>
</TR><?php
    }
?>
</TABLE></TD></TR>
<?php
include ("__cp_menu.php");
   }
    else
  {
?>
<TR><TH ALIGN="center"><FONT SIZE="+2">Not available</FONT></TH></TR>
<TR BGCOLOR="<?php     echo $BOR_BGC; ?>"><TD HEIGHT="1"><img src="../pic/0.gif" width="1" height="1"></TD></TR>
<?php   }
include ("__cp_sel.php");
?>
</TABLE></TD>
<TD BGCOLOR="<?php   echo $BOR_BGC; ?>" WIDTH="1"><img src="../pic/0.gif" width="1" height="1"></TD>
</TR>
</TABLE>
<?php
   include ("__fxtail.php");
   return $function_ret;
}



function CPvpr($nome)
{
  extract($GLOBALS);


fxhead("Forix: ".$ano.", ".$nome);
cp_cab($ano,$nome);
  $SQLQuery="Select n_pa.*, n_pa.c_make as co_nome, n_pa.c_model as ca_nome, n_pa.e_make as mo_nome, n_pa.e_model as mo_tipo, n_gp.rgp, n_gp.name as gp_name from n_pa inner join n_gp on truncate(n_pa.rpa/1000,0)=n_gp.rgp Where n_gp.rgp>=".($ano*100+51)." and n_gp.rgp<".($ano*100+100)." and ";

  if ($cmd==$cmdCPvit)
  {

    $SQLQuery=$SQLQuery."n_pa.r_cla=1";
  }

  if ($cmd==$cmdCPpol)
  {

    $SQLQuery=$SQLQuery."n_pa.g_cla=1";
  }

  if ($cmd==$cmdCPvmr)
  {

    $SQLQuery=$SQLQuery."n_pa.f_cla=1";
  }


  $SQLQuery=$SQLQuery." order by n_gp.rgp, n_pa.number";
  if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
  {

?>
<TR BGCOLOR="<?php     echo $CAB_BGC; ?>"><TD ALIGN="center"><TABLE border="0" cellspacing="0" cellpadding="2"><TR>
<TD ALIGN=CENTER><B><?php     echo $titulo[$N_RACE]; ?></B></TD>
<TD ALIGN=CENTER><B><?php     echo $titulo[$N_DRIV]; ?></B></TD>
<TD ALIGN=CENTER><B><?php     echo $titulo[$N_CAEN]; ?></B></TD>
</TR><?php
    $BGC=$TR2_BGC;
    while ($RSList= mysql_fetch_array($result))
    {

      if ($BGC==$TR1_BGC)
      {

        $BGC=$TR2_BGC;
      }
        else
      {

        $BGC=$TR1_BGC;
      }

?><TR BGCOLOR="<?php       echo $BGC; ?>">
<TD ALIGN="left">&nbsp;&nbsp;<A HREF="__gp.asp?<?php       echo $args; ?>&r=<?php       echo $RSList["rgp"]; ?>&c=<?php       echo $cmdGPfic; ?>"><?php       echo $RSList["gp_name"]; ?></A>&nbsp;&nbsp;</TD>
<TD ALIGN="left">&nbsp;&nbsp;<?php       echo $RSList["driver"]; ?>&nbsp;&nbsp;</TD>
<TD ALIGN="left">&nbsp;&nbsp;<?php       echo $RSList["co_nome"]; ?>&nbsp;<?php       echo $RSList["ca_nome"]; ?><?php       if ($RSList["co_nome"]!=$RSList["mo_nome"])
      {
?> / <?php         echo $RSList["mo_nome"]; ?><?php       } ?>&nbsp;&nbsp;</TD>
</TR><?php
    }
?>
</TABLE></TD></TR>
<?php
include ("__cp_menu.php");
}
include ("__cp_sel.php");
?>
</TABLE></TD>
<TD BGCOLOR="<?php   echo $BOR_BGC; ?>" WIDTH="1"><img src="../pic/0.gif" width="1" height="1"></TD>
</TR>
</TABLE>
<?php
   include ("__fxtail.php");
   return $function_ret;
}



$ano=intval(get_arg("r"));
$cmd=intval(get_arg("c"));

if ($ano<=0)
{

  $ano=post_arg("ano");
  if (strlen($ano)>0)
  {

    $ano=intval($ano);
  }

  if ($ano<1900)
  {

    $ano=$ano+1900;
  }

  if ($ano<1900 || $ano>1983)
  {

    $ano=0;
  }

}


if ($cmd==$cmdCPlis)
{

// log_page($REF_CP,0,$cmd);
  CPlista();
}
  else
{

  if ($ano>0)
  {

// log_page($REF_CP,$ano,$cmd);
    if ($cmd==$cmdCPfic)
    {

      CPfic();
    }

    if ($cmd==$cmdCPgpr)
    {

      CPgpr();
    }

    if ($cmd==$cmdCPvit)
    {

      CPvpr($titulo[$N_WINS]);
    }

    if ($cmd==$cmdCPpol)
    {

      CPvpr($titulo[$N_POLES]);
    }

    if ($cmd==$cmdCPvmr)
    {

      CPvpr($titulo[$N_FLAPS]);
    }

  }
    else
  {

fxhead("Forix: ".$titulo[$N_CHAM]);
include ("__cp_sel.php");
include ("__fxtail.php");
  }

}

?>
