0) { tab_bor(); ?>
Press releasesReports
* &f=&t=1&c=1">
=$Zip_CDROM or $s == -1) echo("$tit"); else if ($s!=$sort) echo("$tit"); else echo("$tit"); } function gp_cab($nome,$wid,$nav,$c_gre) { extract($GLOBALS); tab_ini(); tab_bar(2); ?> 0) { ?>
   
 ,   1) { ?> < <?     echo $titulo[$N_GPRIS]; ?>  >
   Grid layout 
"); echo("$titulo[$N_GPSEL]
"); echo("  $titulo[$N_YEAR]   $titulo[$N_NAME] "); ng_select ("rng", 0); echo("  "); tab_bar(4); } function gp_menu($b) { extract($GLOBALS); tab_bar(4); if ($zip==$Zip_PHOCD) { ?>   = 2003 or $super_modo == Modo_total) and $rgp<=$GP_fls_last) echo(" $titulo[$N_FLAPS] ($titulo[$N_SEQ])"); ?>   |  |  |  =1996) { ?>  | =2003) { if ($cmd==$cmdGPses && $ses==31) { ?> |  |  | $GP_pss_last) { ?>PitstopsPitstops  =$Zip_CDROM) { ?> 
  &c=0">
 ()

&c=0">
=1998 || $super_modo>=$Modo_clube)) { ?> &c="> 0) { ?> ()
 &c="> 
  
  
 
 
PhotoZoom
=". ($rgp*1000) ." and fotos.ref<". ($rgp*1000+1000) .")) Order by fotos.cref, fotos.dat desc, fotos.foto Limit 2"; $result = mysql_query($SQLQuery); if ($result && $zip!=$Zip_PHOCD) { $RSFoto= mysql_fetch_array($result); ?>"); tab_bar(4); // Comentários $SQLQuery="SELECT notes.*, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where (notes.lin=".$lin; if ($lin==$linBra) $SQLQuery=$SQLQuery." or notes.lin=".$linPor; $SQLQuery=$SQLQuery.") and notes.cref=".$REF_GP." and notes.ref=".$rgp." and (notes.tipo=".$No_tipo_S." or notes.tipo=".$No_tipo_C.") and notes.modo<=".$super_modo." and notes.page=".$cmd." and notes.autor not like 'fia_pr' Order by notes.lin desc, notes.dat, notes.marca"; $result = mysql_query($SQLQuery); $la=0; while ($RStriv= mysql_fetch_array($result)) { if ($la==0 || $RStriv["lin"]==$lin) { com_texto($RStriv,450,$titulo[$N_COMM],false); if ($RStriv["lin"]==$lin) { $la=1; } } } // Comentários externos $SQLQuery="SELECT notes.id, notes.titulo, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where (notes.lin=".$lin; if ($lin==$linBra) $SQLQuery=$SQLQuery." or notes.lin=".$linPor; $SQLQuery=$SQLQuery.") and notes.cref=".$REF_GP." and notes.ref=".$rgp." and notes.tipo=".$No_tipo_L." and notes.modo<=".$super_modo." and notes.page=".$cmd." Order by notes.dat, notes.marca"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { tab_bor(); ?>0) $SQLQuery=$SQLQuery." or lin=".$lin_base[$lin]; if ($lin!=$linEng) $SQLQuery=$SQLQuery." or lin=".$linEng; $SQLQuery=$SQLQuery.") and cref=".$REF_GP." and ref=".$rgp." and (tipo=".$No_tipo_S." or tipo=".$No_tipo_C.") and modo<=".$super_modo." and page=".$cmd." and autor like 'fia_pr' Order by lin desc"; $result = mysql_query($SQLQuery); $la=0; while ($RStriv= mysql_fetch_array($result)) { if ($la==0 || $RStriv["lin"]==$lin) { com_texto($RStriv,450,"",true); if ($RStriv["lin"]==$lin) $la=1; } } // Links para notícias if ($lin==$linPor && $ano>=1999) gp_v12($rgp,$mm1,$dd1,$mm2,$dd2); if ($lin==$linIta && $ano>=2000) gp_ita($rgp,$mm1,$dd1,$mm2,$dd2); // Press releases e relatorios if (0==1 && $super_modo>=$Modo_clube && $ano>=1994) { txt_files($TXT_PRL); txt_files($TXT_REP); } // Sugestőes de Leitura Bkp($REF_NG,$rng,$lin); // Web links www($REF_GP,$rgp); tab_bor(); gp_sel(0); } else { tab_bar(4); } tab_fim(); if ($zip<$Zip_CDROM) { ?>
 , &c="> 1) { ?> < <?       echo $titulo[$N_GPRIS]; ?> >
  
 
=$Zip_CDROM || $RSFoto["zoom"]==0) { ?>" ALT="Photo">">" ALT="Zoom" BORDER="0">
 
   

:  
:  

0) { ?>
:
 
 
 
: , :
 
0) { ?> :  






0) { ?>
000

&c=">

m


km


 
 
 
 
 
 km/h
5800) { $SQLQuery="Select cpp.cla, cpp.pon, cpp.ngp, cn.rcn, can.nome as co_nome, mon.nome as mo_nome from cpp, cn, can, mon where cpp.ref=cn.rcn and cn.rco=can.rco and cn.rma=mon.rma and cpp.cref=".$REF_CN." and cpp.rgp=".$rgp." and cpp.cla>=1 and cpp.cla<=3 and can.lin=".$linx." and mon.lin=".$linx." order by cpp.cla, can.rco"; $result = mysql_query($SQLQuery); $RScp= mysql_fetch_array($result); ?>
=1 and cpp.cla<=3 order by cpp.cla, pin.rpi"; $result = mysql_query($SQLQuery); $RScp= mysql_fetch_array($result); ?>
   &c=">  
   E/  
 "); echo("$titulo[$N_GPHI] | "); echo("$titulo[$N_LALED]"); // Race History Chart $sql="SELECT gp_img.* From gp_img Where gp_img.rgp = ".$rgp." and gp_img.img like 'rh%'"; if (($result = mysql_query($sql)) and ($rs = mysql_fetch_array($result))) echo(" | $titulo[$N_RACEC]"); $sql="SELECT gp_img.* From gp_img Where gp_img.rgp = ".$rgp." and gp_img.img like 'vv%'"; if (($result = mysql_query($sql)) and ($rs = mysql_fetch_array($result)) or ($rgp > 10300 and $rgp<=$GP_lpc_last)) echo(" | $titulo[$N_LAPC]"); if ($tipo_servidor == 0) { $SQLQuery="SELECT notes.id, notes.texto, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where (notes.lin=".$lin; if ($lin==$linBra) $SQLQuery=$SQLQuery." or notes.lin=".$linPor; $SQLQuery=$SQLQuery.") and notes.cref=".$REF_GP." and notes.ref=".$rgp." and notes.tipo=".$No_tipo_C." and notes.modo<=".$super_modo." and notes.page=".$cmdGPfat." Order by notes.lin desc"; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) { ?> |  Curiosidades=".($rgp*1000)." and notes.ref<".($rgp*1000+999)." and notes.tipo=".$No_tipo_C." and notes.modo<=".$super_modo." Order by notes.lin desc"; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) { ?> |  Análise=".($rgp*1000)." and rpa<".(($rgp+1)*1000)." group by tses.nome, tses.lin, words.lin, tses.ses order by tses.ses"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { echo("
$titulo[$N_DWOR] - List"); $ses=0; while ($RSList= mysql_fetch_array($result)) if ($ses!=$RSList["ses"]) { $ses=$RSList["ses"]; echo(" - " .$RSList["nome"]. ""); } } } echo("
* &c=6"> 0) { ?>()
0) $txt=$txt." (".$RStriv["copynote"].")"; if ($super_modo==$Modo_total) $txt=$txt." [Edit]"; echo(""); tab_fim(); echo(""); tab_bar(8); } // Capa do programa ou poster gp_pics($REF_GPP,$rgp); // Timetable timetable($rgp, 198); // Notes $id= ler_notes($REF_GP,$rgp,$cmd,0,$txt); if ($id>0) { ?>
"); tab_ini(); echo("
"); echo(""); echo(""); echo("
".$RStriv["titulo"]."
$txt
[Edit]"; } jan_texto($txt,2,192,$TR1_BGC); ?>
=".($rgp*1000)." and papi.rpa<".($rgp*1000+1000)." and papi.rpi > 0 and can.lin=".$linx." and mon.lin=".$linx." and tpneu.lin=".$linx." and tlub.lin=".$linx." order by papi.num, papi.rpa"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { if ($super_modo>$Modo_publico) { $SQLQuery="Select num, ref, count(*) as nfoto From fotos, papi Where cref=".$REF_PA." and ref>=". ($rgp*1000) ." and ref<". ($rgp*1000+1000) ." and fotos.ref=papi.rpa Group by ref Order by num, ref"; if ($result2 = mysql_query($SQLQuery)) $RSfoto= mysql_fetch_array($result2); else $RSfoto = 0; } gp_cab($titulo[$N_ELIS],1,1,0); tab_bor(); ?>=$Modo_clube) echo(""); ?>=$Modo_clube) { ?>
/ $titulo[$N_CHAS]
 =$Zip_CDROM) { ?>  $Modo_publico) { if ($RSfoto) { if ($RSfoto["num"]<$num and $RSfoto["ref"]<$rpa) $RSfoto= mysql_fetch_array($result2); if ($RSfoto) { if ($RSfoto["ref"]==$rpa && $RSfoto["nfoto"]>0) { ?>
 
  
 &c=">
    
=$Zip_CDROM) { tab_bar(4); } else { gp_sel(0); } tab_fim(); } fxtail(); } function GPcla($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_CLAC]); $SQLQuery="SELECT gp_cla.*, papi.rpi, papi.num, papi.cpar, papi.caba, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome, tpar.nome as ncpar, tabd.nome as ncaba FROM (((((gp_cla INNER JOIN papi ON papi.rpa = gp_cla.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma) INNER JOIN tpar ON papi.cpar=tpar.cod) INNER JOIN tabd ON papi.caba=tabd.cod where gp_cla.rpa >= ".($rgp*1000)." and gp_cla.rpa < ".($rgp*1000+1000)." and gp_cla.cla < 100 and can.lin=".$linx." and mon.lin=".$linx." and tpar.lin=".$lin." and tabd.lin=".$lin." order by gp_cla.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_CLAC],1,1,0); tab_bor(); ?>= ".($rgp*1000)." and gp_cla.rpa < ".($rgp*1000+1000)." and gp_cla.cla > 100 and can.lin=".$linx." and mon.lin=".$linx." and tpar.lin=".$lin." and tabd.lin=".$lin; if ($rgp<7000) { $SQLQuery=$SQLQuery." order by gp_cla.cla"; } else { $SQLQuery=$SQLQuery." order by gp_cla.lap desc, gp_cla.tim, gp_cla.cla"; } if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?>
 E/        1) { ?> 1) { ?> 
 () E/        
=$Zip_CDROM) { tab_bar(4); } else { gp_sel(0); } } tab_fim(); fxtail(); } function GPgre($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_SGRID]); $SQLQuery="SELECT gp.c_gre from gp where gp.rgp=".$rgp; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) $c_gre=$RSList["c_gre"]; if ($ano>=1990) { $ncol=7; } else { $ncol=6; } $SQLQuery="SELECT gp_gre.*, papi.rpi, papi.num, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome FROM (((gp_gre INNER JOIN papi ON papi.rpa = gp_gre.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma where gp_gre.rpa >= ".($rgp*1000)." and gp_gre.rpa < ".($rgp*1000+1000)." and gp_gre.cla < 100 and can.lin=".$linx." and mon.lin=".$linx." order by gp_gre.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_SGRID],1,1,$c_gre); $SQLQuery="SELECT gp_img.* From gp_img Where gp_img.rgp = ".$rgp." and gp_img.img like 'gr%'"; if ($zip<$Zip_CDROM and ($result2 = mysql_query($SQLQuery)) and ($RSimg= mysql_fetch_array($result2))) { tab_bor(); ?>=1990) { ?> =1990) { ?> = ".($rgp*1000)." and gp_gre.rpa < ".($rgp*1000+1000)." and gp_gre.cla > 100 and gp_gre.cla < 1000 and can.lin=".$linx." and mon.lin=".$linx." order by gp_gre.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?> =1990) { ?> = ".($rgp*1000)." and gp_gre.rpa < ".($rgp*1000+1000)." and gp_gre.cla > 1000 and gp_gre.cla < 10000 and can.lin=".$linx." and mon.lin=".$linx." order by gp_gre.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?> =1990) { ?> = ".($rgp*1000)." and gp_gre.rpa < ".($rgp*1000+1000)." and gp_gre.cla > 10000 and can.lin=".$linx." and mon.lin=".$linx." order by gp_gre.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?> =1990) { ?>

[s]

[%]
        
         
         
         
=$Zip_CDROM) { tab_bar(4); } else { gp_sel(0); } tab_fim(); } fxtail(); } function GPgrelayout($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_SGRID]); $SQLQuery="SELECT gp.c_gre from gp where gp.rgp=".$rgp; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) $c_gre=$RSList["c_gre"]; $SQLQuery="SELECT gp_gre.*, papi.rpi, papi.num, pin.nabr as pi_nome, pin.nome as pi_nomec, can.nome as co_nome, mon.nome as mo_nome FROM (((gp_gre INNER JOIN papi ON papi.rpa = gp_gre.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma where gp_gre.rpa >= ".($rgp*1000)." and gp_gre.rpa < ".($rgp*1000+1000)." and gp_gre.cla < 100 and can.lin=".$linx." and mon.lin=".$linx." order by gp_gre.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_SGRID],1,1,0); tab_bor(); ?>
__.gif">__.gif">ROWSPAN="2" VALIGN="top" ALIGN="">
&c="> - &c=">

E/
ROWSPAN="2" VALIGN="top">__.gif">
= ".($rgp*1000)." and gp_vmr.rpa < ".($rgp*1000+1000)." and can.lin=".$linx." and mon.lin=".$linx." order by "; switch ($sort) { case 1: $SQLQuery=$SQLQuery."papi.num,"; break; } $SQLQuery=$SQLQuery."gp_vmr.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_FLAPS],1,1,0); if (($ano >= 2003 or $super_modo == Modo_total) and $rgp <= $GP_rhc_last) { tab_bor(); echo(""); } tab_bor(); echo(""); gp_sort($titulo[$N_CLA],0); gp_sort($titulo[$N_NUMB],1); ?>
- 0) { ?>-       
=$Zip_CDROM) { tab_bar(4); } else { gp_sel(0); } tab_fim(); } fxtail(); } function GPvmr_seq($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_FLAPS]); $SQLQuery="Select gp_vmrs.*, papi.rpi, papi.num, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome from gp_vmrs, papi, pin, can, mon where papi.rpa=gp_vmrs.rpa and papi.rpi=pin.rpi and papi.rco=can.rco and papi.rma=mon.rma and gp_vmrs.rpa >= ".($rgp*1000)." and gp_vmrs.rpa < ".(($rgp+1)*1000)." and can.lin=".$linx." and mon.lin=".$linx." order by gp_vmrs.seq"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab("$titulo[$N_FLAPS] ($titulo[$N_SEQ])",1,1,0); // Graphic tab_bor(); echo(""); tab_bor(); echo(""); echo(""); echo(""); echo(""); echo(""); echo(""); echo(""); echo(""); // echo(""); // echo(""); $rpi = 0; $tim = 0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); echo(""); include("pa_num.php"); include("pi_nome.php"); include("cm_nome.php"); echo(""); if ($tim == 0) echo(""); else echo(""); $tim = $RSList["time"]; echo(""); // echo(""); // echo(""); echo(""); } echo("
$titulo[$N_ASEQ]$titulo[$N_NUMB]$titulo[$N_DRIV]$titulo[$N_CAEN]$titulo[$N_TIME]Evol$titulo[$N_ALAP]R.LapR.Time
".$RSList["seq"]." ".pri_time($RSList["time"],0)."   ".pri_time($tim-$RSList["time"],0)."  ".$RSList["dlap"]."  ".$RSList["rlap"]."  ".pri_time($RSList["rtime"],0)." 
"); tab_bor(); gp_menu(1); gp_sel(0); tab_fim(); } fxtail(); } function GPsessao($rgp,$ses) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[sessao($ses)]); gp_cab($titulo[sessao($ses)],1,1,0); $SQLQuery="SELECT pas.*, papi.rpi, papi.num, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome FROM (((pas INNER JOIN papi ON papi.rpa = pas.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma where pas.ses=".$ses." and pas.rpa >= ".($rgp*1000)." and pas.rpa < ".($rgp*1000+1000)." and can.lin=".$linx." and mon.lin=".$linx." order by "; switch ($sort) { case 1: $SQLQuery=$SQLQuery."papi.num,"; break; } $SQLQuery=$SQLQuery."pas.cla"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { tab_bor(); ?>
  
=$Modo_clube) { gp_sel(0); } else { tab_bar(4); } tab_fim(); fxtail(); return $function_ret; } function GPleaders($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_LALED]); $SQLQuery="SELECT gp_kom.*, papi.rpi, papi.num, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome FROM (((gp_kom INNER JOIN papi ON papi.rpa = gp_kom.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma where gp_kom.rpa >= ".($rgp*1000)." and gp_kom.rpa < ".($rgp*1000+1000)." and gp_kom.nv > 0 and can.lin=".$linx." and mon.lin=".$linx." order by gp_kom.nv desc"; if (($result = mysql_query($SQLQuery)) and ($nreg = mysql_num_rows($result)) > 0) { gp_cab($titulo[$N_LALED],1,1,0); tab_bor(); echo(""); if ($nreg>1) echo(""); ?>"); include("seq.php"); include("pa_num.php"); include("pi_nome.php"); include("cm_nome.php"); echo(""); } echo("
$titulo[$N_TOTAL]
 ".$RSList["nv"]." 
"); tab_bor(); if ($nreg>1) { $SQLQuery="SELECT gp_kom.*, papi.rpi, papi.num, pin.nabr as pi_nome, can.nome as co_nome, mon.nome as mo_nome FROM (((gp_kom INNER JOIN papi ON papi.rpa = gp_kom.rpa) INNER JOIN pin ON papi.rpi=pin.rpi) inner join can on papi.rco=can.rco) inner join mon on papi.rma=mon.rma where gp_kom.rpa >= ".($rgp*1000)." and gp_kom.rpa < ".($rgp*1000+1000)." and gp_kom.nv = 0 and can.lin=".$linx." and mon.lin=".$linx." order by gp_kom.vi"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?> "); include("seq.php"); include("pa_num.php"); include("pi_nome.php"); include("cm_nome.php"); echo(""); } echo("
 ".$RSList["vi"]); if ($RSList["vf"]>$RSList["vi"]) echo(" - ".$RSList["vf"]); echo("
"); tab_bor(); } } gp_menu(1); gp_sel(0); tab_fim(); } fxtail(); } function GPtrivia($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": Curiosidades"); gp_cab("Curiosidades",0,0,0); $SQLQuery="SELECT notes.id, notes.texto, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where (notes.lin=".$lin; if ($lin==$linBra) { $SQLQuery=$SQLQuery." or notes.lin=".$linPor; } $SQLQuery=$SQLQuery.") and notes.cref=".$REF_GP." and notes.ref=".$rgp." and notes.tipo=".$No_tipo_C." and notes.modo<=".$super_modo." and notes.page=".$cmd." Order by notes.lin desc"; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) { tab_bor(); ?>


[&c=14">Edit]

=".($rgp*1000)." and notes.ref<".($rgp*1000+999)." and notes.tipo=".$No_tipo_C." and notes.modo<=".$super_modo." Order by notes.lin desc"; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) { gp_cab("Análise",0,0,0); ?> 
 &c="> - &c=">
1984) gp_cab($titulo[$N_LAPC],0,1,0); else gp_cab($titulo[$N_LAPC],0,0,0); if ($ano < 2002) { $sql = "SELECT gp_img.* From gp_img Where gp_img.rgp = ".$rgp." and gp_img.img like 'vv%'"; if (($result = mysql_query($sql)) and ($RSimg= mysql_fetch_array($result))) { tab_bor(); echo(""); } } else if ($rgp <= $GP_lpc_last) { tab_bor(); echo(""); } /* Maybe one day... if (0 == 1 and ($ano==$anoFin || $super_modo>=$Modo_clube)) { $SQLQuery="SELECT max(vv.pos) as posmax FROM vv WHERE vv.rpa>=".($rgp*1000)." and vv.rpa<".($rgp*1000+999); if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) { tab_bor(); ?>0 and vv.rpa>=".($rgp*1000)." and vv.rpa<".($rgp*1000+999)." order by vv.pos, vv.lap"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { ?>
1) break; $lap=$RSList["lap"]; if ($lap==-1) { ?> 
<?           echo $titulo[$N_DRIVS]; ?>
 
 
0) { ?>
 &c=0">
0) { ?> 
 &c=">
<?           echo $RSList[" BORDER="0" WIDTH="12" HEIGHT="12">

0) { while ($RScomm= mysql_fetch_array($result)) { tab_bor(); ?>
[&c=14">Edit]
0) { $SQLQuery="SELECT tses.nome FROM tses WHERE tses.ses=".$ses." and tses.lin=".$lin; if (($result2 = mysql_query($SQLQuery)) and ($RSpp= mysql_fetch_array($result2))) gp_cab($titulo[$N_DWOR]."
".$RSpp["nome"],0,0,0); tab_bor(); while ($RSList= mysql_fetch_array($result)) { $SQLQuery="SELECT * FROM words WHERE rpa=".$RSList["rpa"]." and ses=".$ses." and (lin=".$lin; if ($lin!=$linEng) $SQLQuery=$SQLQuery." or lin=".$linEng; if ($lin==$linBra) $SQLQuery=$SQLQuery." or lin=".$linPor; $SQLQuery=$SQLQuery.") order by lin desc"; if (($result2 = mysql_query($SQLQuery)) and ($RSpp= mysql_fetch_array($result2))) { ?> &c=">-
" [&r=&s=&c=5">Edit] [&s=&c=6">TranslateSubmit translation]
 
imgimgz/" ALT="Photo">
0) { tab_bar2(4); } } tab_bor(); gp_menu(1); tab_bar(4); tab_fim(); fxtail(); return $function_ret; } function GPgraf ($rgp,$img,$nome) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$nome); if ($img=="rh" && ($ano==1967 or $ano==1969 or $ano==1970 or $ano==1971 or $ano>=1981)) gp_cab($nome,1,1,0); else gp_cab($nome,1,0,0); tab_bor(); $SQLQuery="SELECT gp_img.* From gp_img Where gp_img.rgp = ".$rgp." and gp_img.img like '".$img."%'"; if (($result = mysql_query($SQLQuery)) and ($RSimg= mysql_fetch_array($result))) { if ($img=="rh" and $super_modo == $Modo_total) { echo(""); sos_link (1, "\"Sos\""); echo(""); } else echo(""); // Comentario de Race History if ($img=="rh") { $SQLQuery="SELECT notes.id, notes.titulo, notes.texto, notes.store, contactos.copynote FROM notes inner join contactos on contactos.sig=notes.autor Where (notes.lin=".$lin; if ($lin==$linBra) $SQLQuery=$SQLQuery." or notes.lin=".$linPor; $SQLQuery=$SQLQuery.") and notes.cref=".$REF_GP." and notes.ref=".$rgp." and notes.tipo=".$No_tipo_C." and notes.modo<=".$super_modo." and notes.page=".$cmd." Order by notes.lin desc"; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) com_texto($RSList,592,$titulo[$N_COMM],false); sos_message("rhc",592); } } else { tab_bar1(4); echo("$titulo[$N_NONE]"); tab_bar1(4); } tab_bor(); gp_menu(0); tab_bar(4); tab_fim(); fxtail(); } function GP_flap_driv($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": ".$titulo[$N_FLAPS]); $SQLQuery="SELECT laps.rpa, first(laps.lap) as volta, min(laps.tim) as tempo, papi.rpi, papi.num, pin.nabr as pi_nome FROM (laps INNER JOIN papi ON papi.rpa=laps.rpa) INNER JOIN pin ON papi.rpi=pin.rpi where laps.rpa >= ".($rgp*1000)." and laps.rpa < ".($rgp*1000+1000)." Group by laps.rpa, papi.rpi, papi.num, pin.nabr order by min(laps.tim)"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_FLAPS],1,1,0); tab_bor(); ?>
  
= ".($rgp*1000)." and laps.rpa < ".($rgp*1000+1000)." order by laps.tim limit 20"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_FLAPS],1,1,0); tab_bor(); ?>
     
= ".($rgp*1000)." and laps.rpa < ".($rgp*1000+1000)." Group by laps.rpa, papi.rpi, papi.num, pin.nabr order by min(laps.tim)"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { gp_cab($titulo[$N_FLAPS],1,1,0); tab_bor(); ?>
  
0 and vv.rpa >= ".($rgp*1000)." and vv.rpa < ".($rgp*1000+1000)." Group by vv.rpa, vv.pos ORDER BY papi.num, vv.pos"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { tab_bor(); ?>$pos) { ?>
 
    
= ".($rgp*1000)." and box.rpa < ".($rgp*1000+1000); switch($sort) { case 1: $SQLQuery .= " order by papi.num, box.lap"; break; case 2: $SQLQuery .= " order by pin.apel, box.lap"; break; case 3: $SQLQuery .= " order by box.lap, papi.num"; break; case 4: $SQLQuery .= " order by box.time, box.lap"; break; default: $SQLQuery .= " order by box.seq, box.lap, papi.num"; break; } if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { if (($ano >= 2003 or ($ano >= 1996 and $super_modo >= $Modo_privado)) and $rgp <= $GP_rhc_last) { tab_bor(); echo(""); } tab_bor(); echo(""); if ($ano >= 2003) gp_sort($titulo[$N_ASEQ],0); gp_sort($titulo[$N_NUMB],1); gp_sort($titulo[$N_DRIV],2); gp_sort($titulo[$N_LAP], $ano>=2003?3:0); gp_sort($titulo[$N_TIME],4); echo(""); $seq=0; $rpi=0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); if ($ano >= 2003) echo(""); include("pa_num.php"); include("pi_nome.php"); echo(""); echo(""); } echo("
 ".$RSList["seq"]."  ".$RSList["lap"]."  ".pri_time($RSList["time"],0)." 
"); tab_bor(); } if ($username == "forix") { tab_bar2(4); echo("Edit"); tab_bar2(4); tab_bor(); } gp_menu(1); gp_sel(0); tab_fim(); fxtail(); } function GP_start($rgp) { extract($GLOBALS); fxhead("Forix: ".$ano.", ".$gp_nome.": Start order"); gp_cab("Start order",1,1,0); $SQLQuery="SELECT papi.rpa, papi.gre, papi.gini, papi.rpi, papi.num, pin.nome as pi_nome from papi, pin where papi.rpi=pin.rpi and papi.gini > 0 and papi.gini<=papi.gre and papi.rpa >= ".($rgp*1000)." and papi.rpa < ".($rgp*1000+1000)." order by papi.gini"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { tab_bor(); echo(""); echo(""); echo(""); echo(""); echo(""); echo(""); $rpi=0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); echo(""); echo(""); include("pa_num.php"); include("pi_nome.php"); echo(""); } } // Back of the grid $SQLQuery="SELECT papi.rpa, papi.gre, papi.gini, papi.rpi, papi.num, pin.nome as pi_nome from papi, pin where papi.rpi=pin.rpi and papi.gini>papi.gre and papi.rpa >= ".($rgp*1000)." and papi.rpa < ".($rgp*1000+1000)." order by papi.gini"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { echo(""); $rpi=0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); echo(""); echo(""); include("pa_num.php"); include("pi_nome.php"); echo(""); } } // Pit lane $SQLQuery="SELECT papi.rpa, papi.gre, papi.gini, papi.rpi, papi.num, pin.nome as pi_nome from papi, pin where papi.rpi=pin.rpi and papi.gini<-3 and papi.rpa >= ".($rgp*1000)." and papi.rpa < ".($rgp*1000+1000)." order by papi.gini desc"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { echo(""); $rpi=0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); echo(""); echo(""); include("pa_num.php"); include("pi_nome.php"); echo(""); } } // Qualified but not started $SQLQuery="SELECT papi.rpa, papi.gre, papi.rpi, papi.num, pin.nome as pi_nome from papi, pin where papi.rpi=pin.rpi and papi.gre>0 and papi.gini=0 and papi.rpa >= ".($rgp*1000)." and papi.rpa < ".($rgp*1000+1000)." order by papi.gre"; if (($result = mysql_query($SQLQuery)) and mysql_num_rows($result) > 0) { echo(""); $rpi=0; $BGC=$TR2_BGC; while ($RSList= mysql_fetch_array($result)) { if ($BGC==$TR1_BGC) $BGC=$TR2_BGC; else $BGC=$TR1_BGC; echo(""); echo(""); echo(""); include("pa_num.php"); include("pi_nome.php"); echo(""); } } echo("
$titulo[$N_ASEQ]$titulo[$N_GRID]$titulo[$N_NUMB]$titulo[$N_DRIV]
 ".$RSList["gini"]."  "); if ($RSList["gini"] == $RSList["gre"]) echo("="); else echo($RSList["gre"]); echo(" 
Back of the grid
 ".$RSList["gini"]."  ".$RSList["gre"]." 
Pit lane
 ".abs($RSList["gini"])."  ".$RSList["gre"]." 
Not started
 -  ".$RSList["gre"]." 
"); tab_bor(); gp_sel(0); tab_fim(); fxtail(); } $rgp=intval(get_arg("r")); $cmd=intval(get_arg("c")); $sort=intval(get_arg("s")); $ses=intval(get_arg("se")); $ano=intval($rgp/100)+1900; if (post_arg("form") == 1) { if (($anon = post_arg("ano")) > 0) { if ($anon < 50) $anon += 2000; if ($anon < 1950) $anon += 1900; $ano = $anon; } if (($rng = post_arg("rng")) == 0) $rgp = GP_ref_rgp ($ano, $rgp); else $rgp = GP_ref_rng ($ano, $rng); if ($rgp<=0 or intval(substr($rgp,strlen($rgp)-(2)))>80) { header("Location: cp.asp?$args&r=$ano&c=$cmdCPgpr"); exit(); } } // Current GP on its own page if ($Val_Active == 1 and $rgp == $Val_rgp) header("Location: actual.asp?".$args."&r=".$rgp."&c=".$cmd."&se=".$ses); if ($rgp>0) { $ss=intval(substr($rgp,strlen($rgp)-(2))); $SQLQuery="SELECT cp.ngp From cp Where cp.rcp = ".$ano; if (($result = mysql_query($SQLQuery)) and ($RSList = mysql_fetch_array($result))) $ngp=$RSList["ngp"]; log_page($REF_GP,$rgp,$cmd); $gp_nome= GPnome($rgp); if ($cmd==$cmdGPpar) GPpar($rgp); else if ($cmd==$cmdGPcla) GPcla($rgp); else if ($cmd==$cmdGPgre) GPgre($rgp); else if ($cmd==$cmdGPvmr) GPvmr($rgp); else if ($cmd==$cmdGPfls) { if ($ano >= 2003 or $super_modo >= Modo_privado) GPvmr_seq($rgp); else { $cmd = $cmdGPvmr; GPvmr($rgp); } } else if ($cmd==$cmdGPgrg) GPgraf($rgp,"gr",$titulo[$N_SGRID]); else if ($cmd==$cmdGPvvg) GPgraf($rgp,"vv",$titulo[$N_LAPC]); else if ($cmd==$cmdGPrhc) GPgraf($rgp,"rh",$titulo[$N_RHC]); else if ($cmd==$cmdGPfat) GPtrivia($rgp); else if ($cmd==$cmdGPkom) GPleaders($rgp); else if ($cmd==$cmdGPana) GPanalise($rgp); else if ($cmd==$cmdGPvav) GPvavolta($rgp); else if ($cmd==$cmdGPwor) GPwords($rgp); else if ($cmd==$cmdGPses && ($ano>=1990 || $super_modo>=$Modo_clube) && sessao($ses)>0) GPsessao($rgp,$ses); else if ($cmd==$cmdGPcap) GPposter($rgp); else if ($cmd==$cmdGPgrf) GPgrelayout($rgp); else if ($cmd==$cmdGPfl1) GP_flap_driv($rgp); else if ($cmd==$cmdGPfl2) GP_flap_race($rgp); else if ($cmd==$cmdGPfl3) GP_flap_lap($rgp); else if ($cmd==$cmdGPlap) GP_lap_top($rgp); else if ($cmd==$cmdGPpss) GP_pitstops($rgp); else if ($cmd==$cmdGPsta) GP_start($rgp); else GPfic($rgp); } else { fxhead("Forix: ".$titulo[$N_GPSE]); tab_ini(); tab_bar(4); gp_sel(1); tab_fim(); fxtail(); } ?>