<?
include ("forixinc.php");
include ("ng_util.php");
include ("nc_util.php");
include ("gp_util.php");
include ("util.php");
include ("util_trivia.php");
include ("f1_util.php");

// New version only !
if (FORIX_SERVER == 1)
    header("Location: http://www.forix.com/main.php?$args&c=1");

if ($zip<10 || $zip==$Zip_TAG || $zip==$Zip_Bet)
    $nobkg=1;

log_page($REF_MAIN,0,0);
fxhead("Forix: Formula One Results &amp; Information eXplorer");
if ($zip<10 && $pub_part==1 && $tipo_servidor==1)
{
?></TD></TR></TABLE><?
}


if ($zip<10 || $zip>100 || $zip==$Zip_TAG || $zip==$Zip_BMW)
{

?><TABLE border="0" cellspacing="0" cellpadding="0">
<TR><TD ALIGN="center" COLSPAN="2" NOWRAP>
<IMG SRC="/pic/carro_e1.gif" WIDTH="150" HEIGHT="100">
<IMG SRC="/pic/forix1.gif" alt="FORIX: Formula One Results &amp; Information eXplorer" WIDTH="265" HEIGHT="100">
<IMG SRC="/pic/carro_d1.gif" WIDTH="150" HEIGHT="100">
<p><font size="5"><b><a href="/main.php">Click to try the New FORIX</a></b>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR>
</TABLE><?
}


if ($zip==$Zip_CDROM)
{

?><TABLE border="0">
<TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP><FONT SIZE="+1"><B>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?   echo $args; ?>"><?   echo $titulo[$N_CHAMS]; ?></A><BR>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="ng.asp?<?   echo $args; ?>"><?   echo $titulo[$N_GPRIS]; ?></A><BR>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="pi.asp?<?   echo $args; ?>"><?   echo $titulo[$N_DRIVS]; ?></A><BR>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="stat.asp?<?   echo $args; ?>"><?   echo $titulo[$N_STATS]; ?></A><BR>
&nbsp;<BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="/forix.htm"><?   echo $titulo[$N_SLAN]; ?></A><BR>
</B></FONT></TD></TR></TABLE><?

}
  else
{

  if ($username=="")
  {

//    include("user_msg.php");
  } ?>
<TABLE border="0" cellspacing="0" cellpadding="0"><?
  if (0==1)
  {

// Photo gallery - Preview
    $SQLQuery="SELECT fotos.*, contactos.copynote, ngn.nome as nome_ng, Pin.nome as nome_pi FROM (((fotos inner join contactos on fotos.sig=contactos.sig) inner join papi on papi.rpa=fotos.ref) INNER JOIN pin ON Pin.rpi=papi.rpi) INNER JOIN ngn ON papi.rng=ngn.rng WHERE fotos.camp=1 and fotos.cref=".$REF_PA." and fotos.dat=".$aiso." and ngn.lin=".$lin." order by fotos.foto Limit 5";
    if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
    {
?><TR><TD COLSPAN="3" ALIGN="center" BGCOLOR="<?       echo $CAB_BGC; ?>"><font SIZE="3"><B><?       echo $titulo[$N_PREV]; ?>:&nbsp;<?       echo $titulo[$N_PGAL]; ?>:&nbsp;<?       echo pri_data(fdia($aiso),fmes($aiso),0,1); ?></B></FONT></TD></TR>
<TR><TD COLSPAN="3" ALIGN="center">&nbsp;&nbsp;&nbsp;&nbsp;<?
      while ($RSList= mysql_fetch_array($result))
      {
?><A HREF="pa.asp?<?         echo $args; ?>&r=<?         echo $RSList["ref"]; ?>&c=<?         echo $cmdPAfic; ?>"><IMG SRC="picture.php?p=imgt/<?         echo $RSList["foto"]; ?>" ALT="<?         echo 1900+intval($RSList["ref"]/100000); ?>-<?         echo $RSList["nome_ng"]; ?>-<?         echo $RSList["nome_pi"]; ?>" BORDER="0" width="100" height="75"></A>&nbsp;&nbsp;&nbsp;&nbsp;<?
      }
?></TD></TR>
<TR><TD COLSPAN="3"><BR></TD></TR><?
    }
  }


?><TR><TD VALIGN="top" WIDTH="260">
<TABLE border="0" cellspacing="0" cellpadding="0" width="100%"><?

// Curiosissimas
  if ($super_modo==$Modo_total && $lin==$linBra)
  {

    $SQLQuery="SELECT max(seq) as num FROM curiosidades";
    if (($result = mysql_query($SQLQuery)) and ($RStriv= mysql_fetch_array($result)))
    {
      $nl= rand(1,$RStriv["num"]);
      $SQLQuery="SELECT texto FROM curiosidades Where seq=".$nl;
      if (($result = mysql_query($SQLQuery)) and ($RStriv= mysql_fetch_array($result)))
      {
?><TR><TD ALIGN="left" BGCOLOR="<?         echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;Curiosíssima&nbsp;</B></FONT><font SIZE="1">(<A HREF="mailto:homerobenevides@bol.com.br">Homero Benevides</A>)</FONT></TD></TR>
<TR><TD WIDTH="250" ALIGN="left" BGCOLOR="<?         echo $TR1_BGC; ?>"><font SIZE="2">&nbsp;&nbsp;<?         echo $RStriv["texto"]; ?>&nbsp;&nbsp;</FONT><font SIZE="1">[<A HREF="curio.asp?<?         echo $args; ?>&i=<?         echo $nl+1; ?>">outra</A>]</FONT></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
      }
    }
  }


// Aniversários do dia corrente
aniversario();

// Stat-ix
statix();

//  Antes do inicio da época
  if ($anoNul==1)
  {

?><TR><TD ALIGN="left" BGCOLOR="<?     echo $CAB_BGC; ?>" NOWRAP><font SIZE="3"><B>&nbsp;<?     echo $anoFin; ?></B></FONT><BR></TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP>
<? gp_next($anoFin);?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $anoFin; ?>&c=<?     echo $cmdCPgpr; ?>"><font SIZE="2"><B><?     echo $titulo[$N_GPRIS]; ?></B></font></A><BR>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="epoca.asp?<?     echo $args; ?>"><font SIZE="2"><B><?     echo $titulo[$N_MAKES]; ?> &amp; <?     echo $titulo[$N_DRIVS]; ?></B></font></A><BR>
<?     if (0==1)
    {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="web.asp?<?       echo $args; ?>"><font SIZE="2"><B><?       echo $titulo[$N_WWW]; ?></B></font></A><BR>
<?     } ?>
<? // call test_session (N_PST)  ?>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
  }


// Pre-temporada
test_session_section ($N_PST);

//if anoNul = 0 then
  if (0==0)
  {

    if ($anoNul==0)
    {

      $ano=$anoFin;
    }
      else
    {

      $ano=$anoFin-1;
    }

// Campeonato actual
    $SQLQuery="SELECT cp.ngp From cp Where cp.rcp = ".$ano;
    $RSList = mysql_fetch_array(mysql_query($SQLQuery));
    $ngp=$RSList["ngp"];
    $rgp=($ano-1900)*100+$ngp;
    $nogp= GPnome($rgp);

?><TR><TD ALIGN="left" BGCOLOR="<?     echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPfic; ?>"><?     echo $ano; ?></A></B></font><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP><?

// Próximo GP
gp_next($ano);

// Ultimo GP disputado
    if ($anoNul==0 && strlen($nogp)>0) {
	echo("<IMG SRC=\"/pic/dotr10.gif\" width=\"10\" height=\"10\"><font size=\"2\"><B>");
	echo("<A HREF=\"gp.asp?$args&r=$rgp&c=$cmdGPfic\">$nogp</A></B></font><BR>");
	if ($rgp == $GP_rhc_last)
	    echo("&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF=\"gp.asp?$args&r=$rgp&c=$cmdGPrhc\"><IMG SRC=\"picture.php?p=img/rh/_rhc.jpg\" BORDER=\"0\"></A><BR>");
	$SQLQuery="SELECT papi.cla, papi.rpa, papi.rpi, pin.nabr as pi_nome FROM papi INNER JOIN pin ON papi.rpi=pin.rpi where papi.rpa>".($rgp*1000)." and papi.rpa<".($rgp*1000+999)." and papi.cla>=1 and papi.cla<=3 order by papi.cla";
	if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) {
	    while ($RSList= mysql_fetch_array($result))
		echo("<font size=\"2\">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF=\"pa.asp?$args&r=" .$RSList["rpa"]. "&c=$cmdPAfic\"><font SIZE=\"-1\">" .$RSList["cla"]. "</FONT>&nbsp;&nbsp;" .$RSList["pi_nome"]. "</A></font><BR>");
	}
    }

// Campeonato de Pilotos
?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><font SIZE="2"><B><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPclp; ?>"><?     echo $titulo[$N_DCHAM]; ?></A></B></font><BR><?
    $SQLQuery="SELECT cp_cla.pon, cp.ngp, pin.rpi, pin.nabr as pi_nome FROM (cp INNER JOIN cp_cla ON cp.rcp=cp_cla.rcp) inner join pin on cp_cla.ref=pin.rpi where cp_cla.rcp=".$ano." and cp_cla.cref=".$REF_PI." order by cp_cla.id Limit 3";
    if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
    {
      $n=0;
      while ($RSList= mysql_fetch_array($result))
      {
?><font SIZE="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pi.asp?<?         echo $args; ?>&r=<?         echo $RSList["rpi"]; ?>&c=<?         echo $cmdPIfic; ?>"><?         echo $RSList["pi_nome"]; ?></A> (<?         echo $RSList["pon"]/100; ?>)</font><BR><?
        $n=$n+1;
      }
    }

// Campeonato de Construtores
?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><font SIZE="2"><B><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPclc; ?>"><?     echo $titulo[$N_CCHAM]; ?></A></B></font><BR><?
    $SQLQuery="SELECT cp_cla.cla, cp_cla.pon, cp.ngp, cn.rcn, cn.rco, cn.rma, can.nome as co_nome, mon.nome as mo_nome FROM (((cp INNER JOIN cp_cla ON cp.rcp=cp_cla.rcp) inner join cn on cp_cla.ref=cn.rcn) inner join can on cn.rco=can.rco) inner join mon on cn.rma=mon.rma where cp_cla.rcp=".$ano." and cp_cla.cref=".$REF_CN." and can.lin=".$linx." and mon.lin=".$linx." order by cp_cla.id Limit 3";
    if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0)
    {
      $n=0;
      while ($RSList= mysql_fetch_array($result))
      {
        $car=$RSList["co_nome"];
        $mot=$RSList["mo_nome"];
?><font SIZE="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="cm.asp?<?         echo $args; ?>&x=<?         echo $REF_CO; ?>&r=<?         echo $RSList["rco"]; ?>&c=<?         echo $cmdCMfic; ?>"><?         echo $car; ?></A><?
        if ($car!=$mot)
        {
          if ($lin==$linJap)
          {
?>E<?           }
            else
          {
?>/<?           } ?><A HREF="cm.asp?<?           echo $args; ?>&x=<?           echo $REF_MA; ?>&r=<?           echo $RSList["rma"]; ?>&c=<?           echo $cmdCMfic; ?>"><?           echo $mot; ?></A><?
        }

?>&nbsp;(<?         echo $RSList["pon"]/100; ?>)</font><BR><?
        $n=$n+1;
      }
    }

?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPgpr; ?>"><font SIZE="2"><B><?     echo $titulo[$N_GPRIS]; ?></B></font></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="grid.asp?<?     echo $args; ?>"><font SIZE="2"><?     echo $titulo[$N_SBYS]; ?>: <?     echo $titulo[$N_SGRID]; ?></font></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="laps.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>"><font SIZE="2"><?     echo $titulo[$N_CLAC]; ?> &amp; <?     echo $titulo[$N_LARAC]; ?></font></A><BR>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPpia; ?>"><font SIZE="2"><B><?     echo $titulo[$N_DRIVS]; ?></B></font></A><BR>
<?     if ($anoNul==0)
    {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="epoca.asp?<?       echo $args; ?>"><font SIZE="2"><B><?       echo $titulo[$N_MAKES]; ?> &amp; <?       echo $titulo[$N_DRIVS]; ?></B></font></A><BR>
<?     } ?>
<!-- <IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?     echo $args; ?>&r=<?     echo $ano; ?>&c=<?     echo $cmdCPcaa; ?>"><font SIZE="2"><B><?     echo $titulo[$N_CAEN]; ?></B></font></A><BR> --><?
    if ($titulo[$N_RULES]!="?" && $lin>$linEng)
    {

?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="cp.asp?<?       echo $args; ?>&r=<?       echo $ano; ?>&c=<?       echo $cmdCPreg; ?>"><font SIZE="2"><B><?       echo $titulo[$N_RULES]; ?></B></font></A><BR><?
    }

    if (0==1)
    {

?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="web.asp?<?       echo $args; ?>"><font SIZE="2"><B><?       echo $titulo[$N_WWW]; ?></B></font></A><BR><?
// call test_session (N_STST)
    } ?>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
  }


// Temporada de testes
// call test_session_section (N_PST)
// test_session_section($N_STST);

?><TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<A HREF="cp.asp?<?   echo $args; ?>">1950-2003</A></B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?   echo $TR1_BGC; ?>" NOWRAP>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><font SIZE="2"><B><A HREF="ng.asp?<?   echo $args; ?>"><?   echo $titulo[$N_GPRIS]; ?></A></B><BR><?

  if ($lin==$linPor)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=5809&c=0">Portugal</A>,&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=7302&c=0">Brasil</A><BR><?

  }
    else
  if ($lin==$linBra)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=7302&c=0">Brasil</A><BR><?

  }
    else
  if ($lin==$linIta)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=5007&c=0">Italia</A>,&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=8104&c=0">San Marino</A><BR><?

  }
    else
  if ($lin==$linEsp)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=5301&c=0">Argentina</A>,&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=5108&c=0">España</A>,&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=6309&c=0">México</A><BR><?

  }
    else
  if ($lin==$linSue)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=7307&c=0">Sverige</A><BR><?

  }
    else
  if ($lin==$linHun)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=8611&c=0">Magyarország</A><BR><?

  }
    else
  if ($lin==$linJap)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="ng.asp?<?     echo $args; ?>&r=7616&c=0">“ú–{</A><BR><?
  }


?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><B><A HREF="nc.asp?<?   echo $args; ?>"><?   echo $titulo[$N_CIRCS]; ?></A></B><BR><?

  if ($lin==$linBra)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="nc.asp?<?     echo $args; ?>&r=7302&c=0">Interlagos</A>,&nbsp;<A HREF="nc.asp?<?     echo $args; ?>&r=7802&c=0">Jacarepaguá</A><BR><?

  }
    else
  if ($lin==$linIta)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="nc.asp?<?     echo $args; ?>&r=5007&c=0">Monza</A>,&nbsp;<A HREF="nc.asp?<?     echo $args; ?>&r=8012&c=0">Enzo e Dino Ferrari</A><BR><?
  }

?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><B><A HREF="pi.asp?<?   echo $args; ?>"><?   echo $titulo[$N_DRIVS]; ?></A></B></font><BR><?

  if ($lin==$linEng)
  {

?><font size="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="where.asp?<?     echo $args; ?>">Where are they now ?</A></font><BR><?
  }
  if ($titulo[$N_WOMEN]!="?")
  {
?><font size="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pi.asp?<?     echo $args; ?>&c=2"><?     echo $titulo[$N_WOMEN]; ?></A></font><BR><?
  }
// Photo gallery
  $SQLQuery="SELECT fotos.dat, contactos.copynote FROM fotos inner join contactos on fotos.sig=contactos.sig WHERE fotos.camp=1 and fotos.cref=".$REF_PI." order by fotos.dat desc Limit 1";
  $RSList = mysql_fetch_array(mysql_query($SQLQuery));
?><font size="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="photos.asp?<?   echo $args; ?>&x=1002"><?   echo $titulo[$N_PGAL]; ?>:&nbsp;<?   echo $titulo[$N_NEW]; ?></A>&nbsp;</font><FONT SIZE="1">(<?   echo pri_data(fdia($RSList["dat"]),fmes($RSList["dat"]),0,0); ?>)</FONT><BR><?

  if ($lin==$linChe)
  {
?><font size="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="frame.asp?<?     echo $args; ?>&f=rpavelka"><?     echo $titulo[$N_CAREE]; ?></A> (R.Pavelka)&nbsp;<IMG SRC="/pic/new.gif" alt="<?     echo $titulo[$N_NEW]; ?>"></FONT><BR><?
  }
    else
  if (0==1 && $lin==$linHun)
  {
?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pi.asp?<?     echo $args; ?>&c=<?     echo $cmdPIcrr; ?>"><?     echo $titulo[$N_CAREE]; ?></A> (E.Zsolt)<BR><?
  }

?><font size="2">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pibd.asp?<?   echo $args; ?>&c=0&d=0"><?   echo $titulo[$N_BORN]; ?> &amp; <?   echo $titulo[$N_DIED]; ?></A><BR><?
echo("&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF=\"death.asp?$args\">$titulo[$N_DDEA]</A><BR>".chr(10));
?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pi.asp?<?   echo $args; ?>&c=10"><?   echo $titulo[$N_CLACS]; ?></A><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="pi_cmp.asp?<?   echo $args; ?>"><?   echo $titulo[$N_SBYS]; ?></A><BR><?
  if ($lin==$linPor)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=24&c=1">Portugal</A>,&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=4&c=1">Brasil</A><BR><?
  }
    else
  if ($lin==$linBra)
  {
?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=4&c=1">Brasil</A><BR><?
  }
    else
  if ($lin==$linIta)
  {
?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=15&c=1">Italia</A><BR><?
  }
    else
  if ($lin==$linSue)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=28&c=1">Sverige</A><BR><?
  }
    else
  if ($lin==$linFin)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=29&c=1">Suomi</A><BR><?
  }
    else
  if ($lin==$linDin)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=10&c=1">Danmark</A><BR><?
  }
    else
  if ($lin==$linJap)
  {

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?     echo $args; ?>&r=17&c=1">“ú–{</A><BR><?
  }

?>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="na.asp?<?   echo $args; ?>&c=0"><?   echo $titulo[$N_CTRYS]; ?></A></font><BR>

<IMG SRC="/pic/dotb10.gif" width="10" height="10"><font size="2"><B><A HREF="cm.asp?<?   echo $args; ?>&x=<?   echo $REF_CO; ?>"><?   echo $titulo[$N_MAKES]; ?></A></B></font><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><font size="2"><B><A HREF="cm.asp?<?   echo $args; ?>&x=<?   echo $REF_MA; ?>"><?   echo $titulo[$N_ENGS]; ?></A></B></font><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><font size="2"><B><A HREF="pn.asp?<?   echo $args; ?>&r=0"><?   echo $titulo[$N_TYRES]; ?></A></B></font><BR>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?

// Non championship races
  if ($zip<10)
  {

?><TR><TD ALIGN="left" BGCOLOR="<?     echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<?     echo $titulo[$N_NONC]; ?></B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP><font SIZE="2"><B>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="__cp.asp?<?     echo $args; ?>"><?     echo $titulo[$N_YEARS]; ?></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="__ng.asp?<?     echo $args; ?>"><?     echo $titulo[$N_RACES]; ?></A><BR>
</B></font></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR>
<?   }


// F3000
?><TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<A HREF="f3000.asp?<?   echo $args; ?>">F.3000</A></B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?   echo $TR1_BGC; ?>" NOWRAP><font SIZE="2">
<?   if (0==1)
  {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="3kcp.asp?<?   echo $args; ?>&r=2003&c=2"><B>2003: <?   echo $titulo[$N_RACES]; ?></B></A><BR>
<?
}
   if (0==0)
  {
if (0 == 1) {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><?     echo pri_data(13,9,0,1); ?>: Monza<BR>
<?
}
?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="3kgp.asp?<?     echo $args; ?>&r=200310&c=0"><B>Monza</B></A><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;1&nbsp;&nbsp;Bjorn Wirdheim<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;2&nbsp;&nbsp;Patrick Friesacher<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;3&nbsp;&nbsp;Ricardo Sperafico<BR>
<?   } if (0==0)
  {?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="3kcp.asp?<?   echo $args; ?>&r=2003&c=<?   echo $cmdCPclp; ?>"><B>2003: <?   echo $titulo[$N_CHAM]; ?></B></A><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Bjorn Wirdheim (78)<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Ricardo Sperafico (43)<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Giorgio Pantano (41)<BR><?
}
?>
</font></TD></TR>

</TABLE>
</TD>

<TD WIDTH="20">&nbsp;</TD>

<TD ALIGN="left" VALIGN="top" WIDTH="310">
<TABLE border="0" cellspacing="0" cellpadding="0" WIDTH="100%"><?

// Noticias

  if ($zip<10)
  {

    if ($lin==$linEng && $servidor!="forix-s")
    {
    }

// Francês
    if ($lin==$linFra)
    {
	ask_forix();
	colabora();
    }
    else
// Espanhol
    if ($lin==$linEsp)
    {
?><TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>" NOWRAP><B><font SIZE="3">&nbsp;Comentarios</FONT></B></TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" NOWRAP>
<font SIZE="2">&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="notes.asp?<?       echo $args; ?>&i=7269&c=6">Entrevista con Fritz d'Orey</A>&nbsp;</FONT><FONT SIZE="1">(A.Carvalho)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="notes.asp?<?       echo $args; ?>&i=5346&c=6">1 de mayo de 1994</A>&nbsp;</FONT><FONT SIZE="1">(M.Affabili)</FONT><BR>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
ask_forix();
colabora();
      if ($tipo_servidor==1)
      {
?><TR><TD ALIGN="left" BGCOLOR="<?         echo $CAB_BGC; ?>" NOWRAP><B><font SIZE="3">&nbsp;Noticias <A HREF="http://www.thef1.com" target="_blank">TheF1</A></FONT></B></TD></TR><TR><TD ALIGN="left" BGCOLOR="<?         echo $TR1_BGC; ?>" NOWRAP>
<script language="javascript1.2" src="http://www.thef1.com/scripts/tickerforix.js"></script>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
      }
    }
    else
// Italiano
    if ($lin==$linIta)
	colabora();
  }

  if ($super_modo==$Modo_total && $lin==$linPor)
	glossario();


// Photo gallery - new!
  $SQLQuery="SELECT fotos.*, contactos.copynote FROM fotos inner join contactos on fotos.sig=contactos.sig WHERE fotos.dat<=".$hiso." and fotos.camp=1 and (fotos.gal='img' or fotos.gal is NULL) and (fotos.cref=".$REF_PA." or fotos.cref=".$REF_GP.") order by fotos.dat desc, fotos.foto Limit 20";
  if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result)))
  {
    $mm= fmes($RSList["dat"]);
    $dd= fdia($RSList["dat"]);
    $nl= rand(0,19);
    $n=0;
    while($RSList && $n!=$nl)
    {
      $n=$n+1;
      $RSList= mysql_fetch_array($result);
    }
    $foto=$RSList["foto"];
    $copy=$RSList["copynote"];
    $zoom=$RSList["zoom"];
?><TR><TD ALIGN="left" BGCOLOR="<?     echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<A HREF="photos.asp?<?     echo $args; ?>&x=1001"><?     echo $titulo[$N_PGAL]; ?>:&nbsp;<?     echo $titulo[$N_NEW]; ?></A>&nbsp;</B></FONT><FONT SIZE="1">(<?     echo pri_data($dd,$mm,0,0); ?>)</FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP><table border="0" cellspacing="0" cellpadding="2"><TR><TD WIDTH="8"></TD><TD ALIGN="center"><?
    if ($zoom==0)
    {
?><IMG SRC="picture.php?p=img/<?       echo $foto; ?>" ALT="Photo"><BR><?
    }
      else
    {
?><A HREF="photos.asp?<?       echo $args; ?>&x=101&f=<?       echo $foto; ?>"><IMG SRC="picture.php?p=img/<?       echo $foto; ?>" ALT="Zoom" BORDER="0"></A><BR><?
    }
?><FONT SIZE="1"><?     echo $copy; ?></FONT></TD><TD WIDTH="6"></TD></TR></TABLE><?

/*
// Timesharing
    $anuncio= rand(0,15);
    if ($anuncio<2)
    {
// Richard Macey Artwoork
      if ($lin==$linEng)
      {
?><TR><TD ALIGN="left" BGCOLOR="<?         echo $TR1_BGC; ?>"><TABLE><TR><TD ALIGN="left" VALIGN="top"><A href="photos.asp?<?         echo $args; ?>&x=101&f=<?
        switch (rand(0,1))
        {
          case 0:
?>pi/Senna+Ayrton_0_rma_.jpg"><IMG SRC="picture.php?p=img/_rma/asenna2<?
            break;
          case 1:
?>pia/Mansell+Nigel_1992_rma_.jpg"><IMG SRC="picture.php?p=img/_rma/nmansell<?
            break;
        }
?>.jpg" width="70" height="90" BORDER="0"></A></TD>
<TD width="200" align="left" valign="top"><FONT SIZE="2"><A HREF="photos.asp?<?         echo $args; ?>&f=Richard+Macey"><B>Richard Macey Artwork</B></A><BR>Limited Edition prints and commissions. Any driver/car available. Competitive prices.<BR><A HREF="mailto:richard.macey@ntlworld.com">Send e-mail</A></FONT></TD></TR></TABLE></TD></TR><?
      }


    }
      else
    if ($anuncio<4)
    {

// Paolo Baldinotti
?><TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>"><IMG SRC="/pic/dotr10.gif" width="10" height="10"><FONT SIZE="2"><A HREF="photos.asp?<?       echo $args; ?>&f=paolo+baldinotti">Paolo Baldinotti</A></font><BR>
&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="wpaper.asp?<?       echo $args; ?>&f=pia/Prost+Alain_1985_pbal_.jpg"><IMG SRC="picture.php?p=imgz/pia/Prost+Alain_1985_pbal_50.jpg" ALT="Wallpaper" BORDER="0" ALIGN="top"><FONT SIZE="2">Wallpaper</A> &nbsp;</FONT><FONT SIZE="1">(<?       echo pri_data(6,6,0,0); ?>)</FONT></TD></TR><?
    }
      else
    {
// TotalPoster
?><TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>"><IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="photos.asp?<?       echo $args; ?>&s=tposter">TotalPoster</A><BR>
&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="http://www.totalposter.com/forixf1" TARGET="_blank"><IMG SRC="/pub/totalposter.gif" ALT="TotalPoster" BORDER="0"></A></TD></TR><?
    }


// Outras galerias
?><TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP><IMG SRC="/pic/dotr10.gif" width="10" height="10"><FONT SIZE="2"><A HREF="photos.asp?<?     echo $args; ?>&<?
    switch (rand(0,4))
    {
      case 0:
?>f=sibo">"Sibo"<?
        break;
      case 1:
?>f=carlos+yamazato">Carlos Yamazato<?
        break;
      case 2:
?>f=Ferdinand+Trauttmansdorff">Ferdinand Trauttmansdorff<?
        break;
      case 3:
?>f=Fernando+Passos">Fernando Passos<?
        break;
      case 4:
?>f=herb+edgecomb">Herb Edgecomb<?
        break;
    }
?></A></font><TR><TD ALIGN="left" BGCOLOR="<?     echo $TR1_BGC; ?>" NOWRAP><IMG SRC="/pic/dotr10.gif" width="10" height="10"><FONT SIZE="2"><A HREF="photos.asp?<?     echo $args; ?>&<?
    switch (rand(0,4))
    {
      case 0:
?>f=Daniele+Amaduzzi">Daniele Amaduzzi<?
        break;
      case 1:
?>f=Luca+del+Monte">Luca del Monte<?
        break;
      case 2:
?>f=MPaula">Maria Paula<?
        break;
      case 3:
?>f=George+Standaar">George Standaar<?
        break;
      case 4:
?>f=Rob+Ryder">Rob Ryder<?
        break;
    }
?></A></font></TD></TR><?
*/
?><TR><TD>&nbsp;<BR></TD></TR><?
  }

// Promotions
  if ($zip<10 || $zip==$Zip_ATL)
  {

    if (($lin==$linPor || $lin==$linBra))
    {

?><TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>" NOWRAP>
<B><font SIZE="3">&nbsp;<?       if ($lin==$linEng)
      {
?>See also<?       }
        else
      if ($lin==$linPor || $lin==$linBra)
      {
?>Veja também<?       } ?></FONT></B>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" NOWRAP><?
      if ($lin==$linPor || $lin==$linBra)
      {
?>
<!--
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/recordex_hb.htm&a=homero+benevides">Melhores recordes da Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides, 17 Out)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&x=8&r=6004006&c=2&f=artic/jclark_hb.htm&a=homero+benevides">Os recordes de Jim Clark na Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides, 16 Out)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/brasil_hb.htm&a=homero+benevides">Brasil é o País com mais títulos na Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides, 30 Set)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/prost_senna_hb.htm&a=homero+benevides">Incríveis coincidências entre Prost e Senna</A> </FONT><FONT SIZE="1">(H.Benevides, 2 Set)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&x=8&r=5001001&c=2&f=artic/jmfangio_hb.htm&a=homero+benevides">Fangio, o maior campeão da Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides, 20 Agosto)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/vitorias_hb.htm&a=homero+benevides">Os recordistas de vitórias na Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides, 7 Set)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&x=8&r=7811022&c=2&f=artic/piquet_hb.htm&a=homero+benevides">Piquet, o primeiro brasileiro tricampeão</A> </FONT><FONT SIZE="1">(H.Benevides, 20 Ago)</FONT><BR> -->
<?
        if ($lin==$linPor)
        {
?>
<font SIZE="2">&nbsp;&nbsp;<A HREF="notes.asp?<?           echo $args; ?>&c=6&i=6898">GP Áustria – Entre a emoção e a razão...</A> </FONT><FONT SIZE="1">(J.M.Barros, 17 Maio)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="notes.asp?<?           echo $args; ?>&c=6&i=6899">Ordens de equipa, sempre existiram!</A> </FONT><FONT SIZE="1">(J.M.Barros, 17 Maio)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?           echo $args; ?>&c=2&f=artic/germanizacao_jcc.htm&a=joão+carlos+costa">A germanização da Fórmula 1</A> </FONT><FONT SIZE="1">(J.C.Costa, 23 Jun)</FONT><BR><?
        }

        if ($lin==$linBra)
        {
?>
<font SIZE="2">&nbsp;&nbsp;<IMG SRC="/pic/new.gif" alt="<?           echo $titulo[$N_NEW]; ?>"><A
HREF="notes.asp?<?           echo $args; ?>&i=7268&c=6">Entrevista com Fritz d'Orey</A> </FONT><FONT SIZE="1">(A.Carvalho, 20 Jan)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?           echo $args; ?>&c=2&f=artic/german_jcc_br.htm&a=joão+carlos+costa">A germanização da Fórmula 1</A> </FONT><FONT SIZE="1">(J.C.Costa, 23 Jun)</FONT><BR><?
        }

?><!-- <font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&x=8&r=5002040&c=2&f=artic/ascari_hb.htm&a=homero+benevides">Ascari, o primeiro grande piloto da Fórmula 1</A> </FONT><FONT SIZE="1">(H.Benevides)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/turbo_hb.htm&a=homero+benevides">Fórmula 1 Turbo</A> </FONT><FONT SIZE="1">(H.Benevides)</FONT><BR> -->
<font SIZE="2">&nbsp;&nbsp;<A HREF="texts.asp?<?         echo $args; ?>&c=2&f=artic/herdeiros_ar.htm&a=alexander+rowlands">As Heranças</A> </FONT><FONT SIZE="1">(A.Rowlands)</FONT><BR>
<font SIZE="2">&nbsp;&nbsp;<A HREF="trivia.asp?<?         echo $args; ?>&x=8&r=7811022">Trivia: Nelson Piquet</A><BR><?
?><!-- <IMG SRC="/pic/dotr10.gif" width="10" height="10"><A HREF="f1mag.asp?<?         echo $args; ?>"><B>AutoSport: F.1 magazine</B></A>&nbsp;<FONT SIZE="1">(3 Abr)</FONT><BR> --><?
      }

?><!-- <IMG SRC="/pic/dotr10.gif" width="10" height="10"><B> --><!-- include file="promo.php"</B> -->
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
    }

  }


// Comentários
  if (0==1 && ($lin==$linEsp || $lin==$linIta))
  {
/*
    $SQLQuery="SELECT texto.ref, texto.cref, texto.data, texto.tipo, contactos.copynote FROM texto INNER JOIN contactos on texto.autor=contactos.name Where (texto.cref=".$REF_PA." or texto.cref=".$REF_GP.") and texto.lin=".$lin." order by texto.data desc, texto.cref, texto.ref Limit 6";
$dbc->Execute    $SQLQuery);
    if (!$RSList->EOF)
    {

?>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<?       echo $titulo[$N_COMM]; ?></B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" NOWRAP><?
      while(!$RSList->EOF)
      {

        $ref=$RSList["ref"];
        $tipo=$RSList["tipo"];
        $aa=intval($RSList["data"]/512);
        $mm=intval(($RSList["data"]-$aa*512)/32);
        $dd=$RSList["data"]-$aa*512-$mm*32;
?><!-- <IMG SRC="/pic/dotr10.gif" width="10" height="10"> --><font size="1"><?         echo $pri_data[$dd][$mm][0][0]; ?></font><font size="2">&nbsp;&nbsp;<A HREF="<?
        if ($RSList["cref"]==$REF_GP)
        {

?>gp.asp?<?           echo $args; ?>&r=<?           echo $ref; ?>&c=<?
          if ($tipo==$TXT_RHC)
          {

?><?             echo $cmdGPrhc; ?><?
          }
            else
          if ($tipo==$TXT_FAT)
          {

?><?             echo $cmdGPfat; ?><?
          }
            else
          if ($tipo==$TXT_COM)
          {

?><?             echo $cmdGPfic; ?><?
          }
            else
          if ($tipo==$TXT_VAV)
          {

?><?             echo $cmdGPvav; ?><?
          }

?>"><?           echo 1900+intval($ref/100); ?>&nbsp;<?           echo GPnome($ref); ?><?
          if ($tipo==$TXT_RHC)
          {

?>&nbsp;-&nbsp;<?             echo $titulo[$N_RHC]; ?><?
          }
            else
          if ($tipo==$TXT_FAT)
          {

?>&nbsp;-&nbsp;Facts &amp; Trivia<?
          }
            else
          if ($tipo==$TXT_VAV)
          {

?>&nbsp;-&nbsp;<?             echo $titulo[$N_LAPC]; ?><?
          }

        }
          else
        if ($RSList["cref"]==$REF_PA)
        {

          $SQLQuery="SELECT papi.rpa, papi.rpi, ngn.nome, pin.nabr FROM (papi INNER JOIN ngn on ngn.rng=papi.rng) inner join pin on pin.rpi=papi.rpi Where papi.rpa=".$ref." and ngn.lin=".$lin;
$dbc->Execute          $SQLQuery);
          if (!$RSList2->EOF)
          {

?>pa.asp?<?             echo $args; ?>&r=<?             echo $RSList2["rpa"]; ?>&c=<?             echo $cmdPAfic; ?>"><?             echo 1900+intval($RSList2["rpa"]/100000); ?>&nbsp;<?             echo $RSList2["nome"]; ?>&nbsp;-&nbsp;<?             echo $RSList2["nabr"]; ?><?
          }

$RSList2->Close;
          $RSlist2=null;

        }

?></A>&nbsp;&nbsp;</font><font size="1">(<?         echo $RSList["copynote"]; ?>)<BR></font><?
$RSList->MoveNext;
      }
?></TD></TR>
<TR><TD>&nbsp;<BR><?
    }
*/
  }


// Statistics

?><TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP><font SIZE="3"><B>&nbsp;<A HREF="stat.asp?<?   echo $args; ?>"><?   echo $titulo[$N_STATS]; ?></A></B></FONT><BR></TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?   echo $TR1_BGC; ?>" NOWRAP><font SIZE="2"><B>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="wildrank.asp?<?   echo $args; ?>">Wildsoft F1 Ranking</A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="frame.asp?<?   echo $args; ?>&f=aniv"><?   echo $titulo[$N_ANNI]; ?></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="stat.asp?<?   echo $args; ?>&c=<?   echo $cmdStatScp; ?>"><?   echo $titulo[$N_DSCH]; ?></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="tops.asp?<?   echo $args; ?>&x=<?   echo $REF_PI; ?>">Top 6</A>, <A HREF="stat.asp?<?   echo $args; ?>&x=<?   echo $REF_PI; ?>&c=<?   echo $cmdStatVit; ?>"><?   echo $titulo[$N_WINS]; ?></A>, <A HREF="stat.asp?<?   echo $args; ?>&x=<?   echo $REF_PI; ?>&c=<?   echo $cmdStatPol; ?>"><?   echo $titulo[$N_POLES]; ?></A><BR>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="pi.asp?<?   echo $args; ?>&c=101"><?   echo $titulo[$N_SEQS]; ?></A><BR>
</B></font></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?

// Palavras de pilotos
last_words();

?><TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;<?   if ($lin==$linEpt)
  {
?> TTT<?   }
    else
  {
?>WWW<?   } ?></B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?   echo $TR1_BGC; ?>" NOWRAP>
<?   if ($lin!=$linPor && $lin!=$linBra && $lin!=$linRus)
  {

?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><FONT SIZE="2"><B><A HREF="http://www.atlasf1.com/news/index.html">Atlas F1 News</A></B><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="http://www.atlasf1.com/
">Atlas F1 Magazine</A></font><BR><?
  }
    else
  if ($lin==$linRus)
  {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><B><A HREF="http://www.atlasf1.ru/index.html">Atlas F1 - Æóðíàë î Ôîðìóëå 1</A></B><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="http://www.atlasf1.ru/cgi/news.pl">Íîâîñòè î Ôîðìóëå 1</A><BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<A HREF="http://www.atlasf1.ru/news/drivers/index.html">Áèîãðàôèè ïèëîòîâ Ôîðìóëû 1</A><BR>
<?     if (0==1)
    {
?>
<IMG SRC="/pic/dotr10.gif" width="10" height="10"><B><A HREF="http://www.atlasf1.ru/99/ita/preview/index.html">Ïðåäâàðèòåëüíûé îáçîð Ãðàí Ïðè Èòàëèè</A></B><BR><?
    }

  }

?><IMG SRC="/pic/dotr10.gif" width="10" height="10"><FONT SIZE="2"><B><A HREF="webl.asp?<?   echo $args; ?>"><?   echo $titulo[$N_WWW]; ?></A></B></font><BR>
</TD></TR>
<TR><TD>&nbsp;<BR></TD></TR>

<?
// Sugestao de leitura
leitura();
?>

<TR><TD ALIGN="left" BGCOLOR="<?   echo $CAB_BGC; ?>" NOWRAP>
<font SIZE="3"><B>&nbsp;++</B></FONT><BR>
</TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?   echo $TR1_BGC; ?>" NOWRAP><font SIZE="2"><?
  if ($lin==$linPor || $lin==$linBra)
  {

?><IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="flag.asp?<?     echo $args; ?>"><B>As bandeiras na Fórmula 1</B></A><BR><?
  }

  if ($lin==$linEng || $lin==$linFra || $lin==$linEsp || $lin==$linIta || $lin==$linAle)
  {
    switch ($lin)
    {
      case       $linEng:
        $qia="FIA Q&amp;A";
        break;
      case       $linFra:
        $qia="FIA: questions et réponses";
        break;
      case       $linEsp:
        $qia="FIA: preguntas y respuestas";
        break;
      case       $linIta:
        $qia="FIA: domande e risposte";
        break;
      case       $linAle:
        $qia="FIA: Fragen und Antworten";
        break;
    }
?><IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="question.asp?<?     echo $args; ?>"><B><?     echo $qia; ?></B></A><BR><?
  }

    echo("<IMG SRC=\"/pic/dotb10.gif\" width=\"10\" height=\"10\">");
    echo("<A HREF=\"go.asp?$args\"><B>$titulo[$N_SEAR]</B></A>, <A HREF=\"photos.asp?$args\"><B>$titulo[$N_SEAR]-$titulo[$N_PGAL]</B></A> <IMG SRC=\"/pic/new.gif\" alt=\"$titulo[$N_NEW]\"><BR>");
    echo("<IMG SRC=\"/pic/dotb10.gif\" width=\"10\" height=\"10\"><A HREF=\"jump.asp?$args\"><B>$titulo[$N_JUMP]</B></A><BR>");

   if ($zip==$Zip_BMW) {
?><FORM NAME="formlanguages" TARGET="content">
<SELECT NAME="languages" size="1" ONCHANGE="window.location.href = document.formlanguages.languages.options[document.formlanguages.languages.selectedIndex].value";>
<OPTION><?     echo $titulo[$N_SLAN]; ?></OPTION><?
    $SQLQuery="Select tlin.* from tlin where tlin.lin=".$lin." order by tlin.nome";
    $result = mysql_query($SQLQuery);
    while ($RSList= mysql_fetch_array($result))
    {
      if ($lin_OK[$RSList["cod"]]==1 && $RSList["nome"]!="?")
      {

?><OPTION VALUE="f1.asp?z=<?         echo $zip_BMW; ?>&k=0&l=<?         echo $RSList["cod"]; ?>"><?         echo $RSList["nome"]; ?></OPTION><?
      }
    }
?></select></form><?
  }


  if ($zip<10 || $zip==$Zip_ATL)
  {
?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="amaduzzi.asp?<?     echo $args; ?>"><B>Daniele Amaduzzi</B></A><BR>

<?     if (0 == 1 and $lin==$linEng)
    {
?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="texts.asp?<?       echo $args; ?>"><B>Share your knowledge</B></A><BR>
<?     } ?>

<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="forix.asp?<?     echo $args; ?>"><B><?     echo $titulo[$N_HOWL]; ?></B></A><BR>
<?     if ($lin==$linPor)
    {
?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="/txt/artic/publico_19990329.htm"><B>Forix @ Público</B></A><BR>
<!-- <IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="/autosport">Parabéns AutoSport!</A><BR> -->
<?     } ?>
<IMG SRC="/pic/dotb10.gif" width="10" height="10"><A HREF="/index.html"><B><?     echo $titulo[$N_SLAN]; ?></B></A></font><BR>

<?     if ($zip<10 && $zip!=0)
    {
?>
<TABLE border="0" cellspacing="0" cellpadding="0"><TR>
<TD><IMG SRC="/pic/dotb10.gif" width="10" height="10"><B>&nbsp;</B></TD>
<TD BGCOLOR="<?       echo $AM_BOR_BGC; ?>"><A HREF="f1.asp?z=0&k=<?       echo $key; ?>&l=<?       echo $lin; ?>"><B>&nbsp;&nbsp;</B></A></TD>
<TD BGCOLOR="<?       echo $AM_CAB_BGC; ?>"><A HREF="f1.asp?z=0&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $AM_TR2_BGC; ?>"><A HREF="f1.asp?z=0&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $AM_TR1_BGC; ?>"><A HREF="f1.asp?z=0&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
</TR></TABLE>
<?     } ?>
<?     if ($zip<10 && $zip!=1)
    {
?>
<TABLE border="0" cellspacing="0" cellpadding="0"><TR>
<TD><IMG SRC="/pic/dotb10.gif" width="10" height="10"><B>&nbsp;</B></TD>
<TD BGCOLOR="<?       echo $CI_BOR_BGC; ?>"><A HREF="f1.asp?z=1&k=<?       echo $key; ?>&l=<?       echo $lin; ?>"><B>&nbsp;&nbsp;</B></A></TD>
<TD BGCOLOR="<?       echo $CI_CAB_BGC; ?>"><A HREF="f1.asp?z=1&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $CI_TR2_BGC; ?>"><A HREF="f1.asp?z=1&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $CI_TR1_BGC; ?>"><A HREF="f1.asp?z=1&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
</TR></TABLE>
<?     } ?>
<?     if ($zip<10 && $zip!=2)
    {
?>
<TABLE border="0" cellspacing="0" cellpadding="0"><TR>
<TD><IMG SRC="/pic/dotb10.gif" width="10" height="10"><B>&nbsp;</B></TD>
<TD BGCOLOR="<?       echo $VE_BOR_BGC; ?>"><A HREF="f1.asp?z=2&k=<?       echo $key; ?>&l=<?       echo $lin; ?>"><B>&nbsp;&nbsp;</B></A></TD>
<TD BGCOLOR="<?       echo $VE_CAB_BGC; ?>"><A HREF="f1.asp?z=2&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $VE_TR2_BGC; ?>"><A HREF="f1.asp?z=2&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
<TD BGCOLOR="<?       echo $VE_TR1_BGC; ?>"><A HREF="f1.asp?z=2&k=<?       echo $key; ?>&l=<?       echo $lin; ?>">&nbsp;&nbsp;&nbsp;&nbsp;</A></TD>
</TR></TABLE>
<?     } ?>
<?   } ?>
</TD></TR>

</TABLE>
</TD>

<?   if ($zip<10 or $zip == $Zip_BMW or $zip == $Zip_TAG)
  {
?>
<TD WIDTH="20">&nbsp;</TD>

<TD ALIGN="center" VALIGN="top" WIDTH="120">
<TABLE border="0" cellspacing="0" cellpadding="0" WIDTH="100%"><?

// Subscriptions

    switch ($lin)
    {
      case       $linPor:
        $tit_subs=array("Contacto","Dados pessoais","Renovação","Sair","Identificação","Utilizador","Senha","Automático?","Não é assinante do FORIX?","Esqueceu-se da sua senha?","clique aqui","Enviar");
        break;
      case       $linBra:
        $tit_subs=array("Contato","Dados pessoais","Renovar","Sair","Identificação","Utilizador","Password","Automático?","Não é assinante do FORIX?","Esqueceu sua password?","toque aqui","Enviar");
        break;
      case       $linFra:
        $tit_subs=array("Contactez-nous","Mise à jour de votre identité","Modifiez / Renouvelez votre abonnement","Déconnexion","Connexion","Nom d'utilisateur","Mot de passe","Automatique?","Non abonné à FORIX ?","Oublié votre mot de passe ?","Cliquez ici","Envoyez");
        break;
      case       $linEsp:
        $tit_subs=array("Contacte con FORIX","Modificar perfil de usuario","Renovar/Extender","Salir","Entrar","Nombre de usuario","Contraseña","Automático?","¿No está suscrito a FORIX?","¿Olvidó su contraseña?","pulse aquí","Enviar");
        break;
      case       $linIta:
        $tit_subs=array("Contatta l'assistenza","Cambia i tuoi dati","Aggiorna / Rinnova","Logout","Ingresso","Utente","Password","Automatico?","Non sei abbonato a FORIX?","Dimenticato la password?","Clicca qui","Invia");
        break;
      case       $linAle:
        $tit_subs=array("Kontakt","Update-Details","Erweitern / Erneuern","Logout","Login","Benutzername","Passwort","Auto-Login?","Noch kein FORIX-Mitglied?","Passwort vergessen?","hier klicken","Senden");
        break;
      case       $linHol:
        $tit_subs=array("Hulp nodig?","Je abonnement veranderen","Uitbreiden / Verlengen","Uitloggen","Inloggen","Gebruikersnaam","Wachtwoord","Automatisch inloggen?","Geen abonnee van FORIX?","Je wachtwoord vergeten?","Klik hier","Log in");
        break;
      case       $linHun:
        $tit_subs=array("Kapcsolat a készitokkel","Részletek frissitése","Felülírás / Megujitás","Kijelentkezés","Bejelentkezés","Felhasználónév","Jelszó","Automatikus bejelentkezés?","Nem vagy még tagja a FORIX-nak?","Elfelejtetted a jelszavad?","kattints ide","Belépés");
        break;
      case       $linRom:
        $tit_subs=array("Serviciul de asistentã","Detalii Update","Reînnoieste","Log Out","Login","Nume utilizator","Parolã","Auto login?","Încã n-ai subscris la FORIX?","Ai uitat parola?","click aici","Trimite");
        break;
      case       $linLet:
        $tit_subs=array("Contact Support","Update Details","Upgrade / Renew","Log Out","Login","Lietotâjvârds","Parole","Auto login?","Not subscribed to FORIX?","Forgot your password?","click here","Submit");
        break;
      default:

        $tit_subs=array("Contact Support","Update Details","Upgrade / Renew","Log Out","Login","Username","Password","Auto login?","Not subscribed to FORIX?","Forgot your password?","click here","Submit");
        break;
    }

    if ($username!="")
    {

?><TR BGCOLOR="<?       echo $CAB_BGC; ?>"><TD ALIGN="left"><font SIZE="3"><B>&nbsp;<?       echo $username; ?></B></font></TD></TR>
	<tr BGCOLOR="<?       echo $TR2_BGC; ?>">
	<td valign="top"><font size="2">
	    <IMG SRC="/pic/dotr10.gif" width="10" height="10"><a href="mailto:forix_com@hotmail.com"><?       echo $tit_subs[0]; ?></a><br>
	    <IMG SRC="/pic/dotr10.gif" width="10" height="10"><a href="https://shop.atlasf1.com/subs/account.html"><?       echo $tit_subs[1]; ?></a><br>
	    <IMG SRC="/pic/dotr10.gif" width="10" height="10"><a href="https://shop.atlasf1.com/subs/account.html"><?       echo $tit_subs[2]; ?></a><br>
	    <IMG SRC="/pic/dotr10.gif" width="10" height="10"><a href="login.php?action=logout" target="_top"><B><?       echo $tit_subs[3]; ?></B></a>
	</font></td>
	</tr><?
tab_bar2(6);
?><TR><TD>&nbsp;<BR></TD></TR><?
    }
      else
    {

      if (LOGIN_ACTIVE)
      {
	echo("<form action=\"login.php?l=$lin&p=".str_replace("&","|",$script."?".$query)."\" method=\"post\">");

?><TR BGCOLOR="<?         echo $CAB_BGC; ?>"><TD ALIGN="left"><font SIZE="3"><B>&nbsp;<?         echo $tit_subs[4]; ?></B></font></TD></TR>
<tr BGCOLOR="<?         echo $TR2_BGC; ?>"><td><font SIZE="2"><?         echo $tit_subs[5]; ?>:</font><BR><input type="text" name="webusername" size="14"></td></tr>
<tr BGCOLOR="<?         echo $TR2_BGC; ?>"><td><font SIZE="2"><?         echo $tit_subs[6]; ?>:</font><BR><input type="password" name="webpassword" size="14"></td></tr>
<tr BGCOLOR="<?         echo $TR2_BGC; ?>"><td><font SIZE="2"><?         echo $tit_subs[7]; ?> </font><input type="checkbox" name="cookie" value="1"></td></tr>
<tr BGCOLOR="<?         echo $TR2_BGC; ?>"><td align="center" BGCOLOR="<?         echo $TR2_BGC; ?>"><input type="submit" name="submit" value="<?         echo $tit_subs[11]; ?>"></td></tr>
<? tab_bar2(6);?>
<tr BGCOLOR="<?         echo $TR2_BGC; ?>"><td width="120"><font SIZE="2"><IMG SRC="/pic/dotr10.gif" width="10" height="10"><?         echo $tit_subs[8]; ?> <a href="https://shop.atlasf1.com/subs/register.html"><?         echo $tit_subs[10]; ?></a><BR><IMG SRC="/pic/dotr10.gif" width="10" height="10"><?         echo $tit_subs[9]; ?> <a href="mailpass.php?<?         echo $args; ?>"><?         echo $tit_subs[10]; ?></a></a></font></td></tr>
</form><?
tab_bar2(6);
?><TR><TD>&nbsp;<BR></TD></TR><?
      }

    }


//  Mensagens de Natal e Ano Novo
    if ($hmes==12 && $hdia>14 && $hdia<=25)
    {

?><TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>"><font SIZE="3"><B>&nbsp;<?       echo $titulo[$N_NATAL]; ?></B></font></TD></TR>
<TR><TD ALIGN="center" BGCOLOR="<?       echo $TR1_BGC; ?>"><IMG SRC="picture.php?p=img/bon/nat_azev.gif"></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?

    }
      else
    if (($hmes==12 && $hdia>25) || ($hmes==1 && $hdia<7))
    {

?><TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>"><font SIZE="3"><B>&nbsp;<?       echo $titulo[$N_ANOVO]; ?></B></font></TD></TR>
<TR><TD ALIGN="center" BGCOLOR="<?       echo $TR1_BGC; ?>"><IMG SRC="picture.php?p=img/bon/nat_azev.gif"></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
    }


// Partners
    if ($lin==$linBra)
    {

?><TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" WIDTH="120">
<A HREF="http://www.grandepremio.com.br" TARGET="_blank"><IMG ALT="GrandePremio" BORDER="0" SRC="/pub/warm_up.gif" width="120"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" WIDTH="120">
<A HREF="http://www.gptotal.com.br" TARGET="_blank"><IMG ALT="GP total" BORDER="0" SRC="/pub/gptotal.gif" width="120"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
    }


// Special promotions
    if ($zip == $Zip_TAG) {
	echo("<TR><TD bgcolor=\"$TR1_BGC\" align=\"center\" valign=\"center\" width=\"120\" height=\"80\"><A HREF=\"http://www.tagheuer.com/f1/\" TARGET=\"_blank\"><IMG ALT=\"TAG Heuer\" BORDER=\"0\" SRC=\"/pub/tag_logo.gif\"></A></TD></TR>");
	echo("<TR><TD>&nbsp;<BR></TD></TR>");
    } else {
	if ($lin == $linEsp) {
	    echo("<TR><TD ALIGN=\"left\" BGCOLOR=\"$TR1_BGC\" WIDTH=\"120\"><A HREF=\"http://www.corsadigital.com\" TARGET=\"_blank\"><IMG ALT=\"Corsadigital.com\" BORDER=\"0\" SRC=\"/pub/corsa.jpg\" width=\"120\"></A></TD></TR>");
	    echo("<TR><TD>&nbsp;<BR></TD></TR>");
	}
	echo("<TR><TD ALIGN=\"left\" BGCOLOR=\"$CAB_BGC\" NOWRAP><font SIZE=\"3\"><B>&nbsp;<A HREF=\"http://www.estudioDG.com.ar\" TARGET=\"_blank\">Diego García</A></B></FONT></TD></TR>");
	echo("<TR><TD ALIGN=\"left\" BGCOLOR=\"$TR1_BGC\" WIDTH=\"120\"><A HREF=\"http://www.estudioDG.com.ar\" TARGET=\"_blank\"><IMG ALT=\"Diego García\" BORDER=\"0\" SRC=\"/pub/estudioDG.jpg\" width=\"120\"></A></TD></TR>");
	echo("<TR><TD>&nbsp;<BR></TD></TR>");
    }

// F1 le logiciel
    if ($lin==$linFra)
    {

?><!-- <TR><TD BGCOLOR="<?       echo $TR1_BGC; ?>" WIDTH="120" ALIGN="center">
<A HREF="http://www.gordini-lefilm.com" TARGET="_blank"><IMG ALT="Gordini: l'épopée d'une équipe" BORDER="0" SRC="/pub/gordini_lefilm.png"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR> -->
<TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>" NOWRAP><font SIZE="3"><B>&nbsp;<A HREF="http://perso.club-internet.fr/ptritten/f1l.htm" TARGET="_blank">F1 Le Logiciel</A></B></FONT></TD></TR>
<TR><TD ALIGN="left" BGCOLOR="<?       echo $TR1_BGC; ?>" WIDTH="120">
<A HREF="http://perso.club-internet.fr/ptritten/f1l.htm" TARGET="_blank"><IMG ALT="F1 Le Logiciel" BORDER="0" SRC="/pub/f1_le_logiciel.jpg" width="120"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?

// Autosprint
    }
      else
    if ($lin==$linIta)
    {

?><TR><TD ALIGN="left" BGCOLOR="<?       echo $CAB_BGC; ?>"><font SIZE="3"><B>&nbsp;<A HREF="autosprint.asp?<?       echo $args; ?>">Autosprint</a></B></FONT></TD></TR>
<TR><TD ALIGN="center" BGCOLOR="<?       echo $TR1_BGC; ?>"><A HREF="autosprint.asp?<?       echo $args; ?>"><img src="picture.php?p=img/autosprint/capa.jpg" border="0"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?

// R.Pavelka
    }
      else
    if (0 == 1 and $lin==$linChe)
    {

?><TR><TD ALIGN="center" BGCOLOR="<?       echo $TR1_BGC; ?>"><A HREF="notes.asp?<?       echo $args; ?>&c=6&i=5059"><img src="picture.php?p=img/news/rpavelka_booka.jpg" border="0"></A></TD></TR>
<TR><TD>&nbsp;<BR></TD></TR><?
    }


// Skyscraper 24/7
    if ($pub_part==1 && $tipo_servidor==1 && $serv_addr!=$serv_AtlasF1)
    {

?><TR><TD width="120">
<!--#include file="body_247s.inc"-->
</TD></TR><?
    }

?></TABLE></TD><?
  }


?></TR></TABLE>
<P><?

}


if ($zip<10 or $zip == $Zip_TAG)
{

?><P>
<?
  if ($lin==$linIta)
  {

?><font SIZE="-1">Coordinatore: <A HREF="mailto:michele.merlino@libero.it"><B>Michele Merlino</B></A></FONT><BR><?
  }
  if ($lin>$linPor)
  {
	echo("<font SIZE=\"-1\">");
	include ("thanks.php");
	echo("</FONT><BR>");
  }

?><font SIZE="-1"><?
  if ($lin==$linEsp)
  {
?>
Colaboración: <A HREF="mailto:mekola@uolsinectis.com.ar"><B>Nicolás Korzan</B></A><BR>
<?   } ?>
Graphic design: <A HREF="mailto:dpaes@siii.pt"><B>David Paes</B></A><BR>
&copy; <B>FORIX</B> <?   echo $titulo[$N_BY]; ?>
<A HREF="mailto:<?   echo $email_addr; ?>"><B>Jo&atilde;o Paulo Lopes da Cunha</B></A></FONT>
<BR><font face="Verdana,Arial,Helvetica" size="1">Hosted by <a HREF="http://www.atlasf1.com/" TARGET="_blank">AtlasF1.com</a></FONT><?

  if ($pub_part==1 && $tipo_servidor==1)
  {

?><!--#include file="fxpart.inc"--><?
  }

}
?>
</CENTER>
</BODY>
</HTML>