include ('fxinit.php'); $key_gerry = 103564; if ($key <> $key_gerry) include ('login_inc.php'); else include ('fxconn.php'); include ('actual.php'); include ('fxtitu.php'); include ('comandos.php'); include ('fxheta.php'); include ("ng_util.php"); include ("nc_util.php"); include ("pi_util.php"); include ("eq_util.php"); include ("co_util.php"); include ("mo_util.php"); include ("pn_util.php"); include ("util.php"); $cmd=-1; $ano=-1; $rng=-1; $rnc=-1; $rpi=-1; $req=-1; $rco=-1; $rma=-1; $rrca=-1; $rpn=-1; $rna=-1; $m_eq=-1; $ini_dos=0; $trpi = 0; $modo=strtolower(trim(get_arg("cmd"))); $modo=str_replace("+"," ",$modo); if (strlen($modo)>0) { if (!(strpos("words",$modo) === false)) { $cmd=2; } else if (!(strpos("photos",$modo) === false)) { $cmd=3; $fotografo=str_replace("+"," ",get_arg("p")); $dias=intval(get_arg("day")); if ($dias>0 && $dias<=60) { $inicio=$Hoje; // $DateAdd["d"][-$dias][$Hoje]; $ini_dos=0; // (strftime("%Y")$inicio-1980)*512+strftime("%m")$inicio*32+$Day[$inicio]; } } else if (!(strpos("comments",$modo) === false)) { $cmd=4; } } log_page($REF_GOGO,0,$cmd); if (get_arg("mod")!="") { $rnc= NCref(get_arg("cir")); $nonc= NCnome($rnc); } if (get_arg("y")!="") { $oano="="; $ano=get_arg("y"); if (!is_numeric(substr($ano,0,1))) { $oano=substr($ano,0,1); $ano=substr($ano,strlen($ano)-(strlen($ano)-1)); } if (is_numeric($ano)) { $ano=intval($ano); } else $ano=0; } if ($ano<$anoIni) $ano=$ano+1900; if ($ano<$anoIni || $ano>$anoFin) $ano=-1; // Damage control if ($key == $key_gerry) $ano = $anoFin; if (get_arg("gp")!="") { $rng= NGref(get_arg("gp")); $nong= NGnome($rng); } else if (get_arg("rng")!="") { $rng=get_arg("rng"); $nong= NGnome($rng); } if (get_arg("cir")!="") { $rnc= NCref(get_arg("cir")); $nonc= NCnome($rnc); } if (get_arg("dri")!="") { $rpi= PIref(get_arg("dri")); $pi_nome= PInome($rpi); } else if (get_arg("rpi")!="") { $pi_nome= PInome(get_arg("rpi")); $rpi= PIref($pi_nome); $pi_nome= PInome($rpi); } else if (get_arg("cty")!="") { $rna= Pais_cod(get_arg("cty")); $cy_nome= Pais($rna); } if (get_arg("ent")!="") { if (get_arg("ent")=="y") { $m_eq=1; } else { $req= EQref(get_arg("ent")); $eq_nome= EQnome($req); } } else if (get_arg("req")!="") { $req=get_arg("req"); $eq_nome= EQnome($req); } if (get_arg("mak")!="") { $rco= COref(get_arg("mak")); $ma_nome= COnome($rco); } else if (get_arg("rma")!="") { $rco=get_arg("rma"); $ma_nome= COnome($rco); } if (get_arg("eng")!="") { $rma= MOref(get_arg("eng")); $mo_nome= MOnome($rma); } else if (get_arg("rmo")!="") { $rma=get_arg("rmo"); $mo_nome= MOnome($rma); } if (get_arg("typ")!="") { $rrca= CAref($rco,get_arg("typ")); if ($rrca>0) { $ca_nome= CAnome($rrca); $rco=-1; } } if (get_arg("rca")!="") { $rrca=intval(get_arg("rca")); $ca_nome= CAnome($rrca); } if (get_arg("tyr")!="") { $rpn= PNref(get_arg("tyr")); $pn_nome= PNnome($rpn); } else if (get_arg("rpn")!="") { $rpn=get_arg("rpn"); $pn_nome= PNnome($rpn); } if (get_arg("tyr")=="x") { $tp=1; } else { $tp=0; } $stat = intval(get_arg("stat")); $cgre=get_arg("grid"); if ($cgre=="") { $ogre="..."; } else { if (!is_numeric(substr($cgre,0,1))) { $ogre=substr($cgre,0,1); $cgre=substr($cgre,strlen($cgre)-(strlen($cgre)-1)); } else { $ogre="="; } } $ccla=get_arg("race"); if ($ccla=="") { $ocla="..."; } else { if (!is_numeric(substr($ccla,0,1))) { $ocla=substr($ccla,0,1); $ccla=substr($ccla,strlen($ccla)-(strlen($ccla)-1)); } else { $ocla="="; } } $cvmr=get_arg("flap"); if ($cvmr=="") { $ovmr="..."; } else { if (!is_numeric(substr($cvmr,0,1))) { $ovmr=substr($cvmr,0,1); $cvmr=substr($cvmr,strlen($cvmr)-(strlen($cvmr)-1)); } else { $ovmr="="; } } $numb=get_arg("n"); if (strlen($numb)>0 && is_numeric($numb)) { $numb=intval($numb); } else { $numb=-1; } if ($super_modo>$Modo_publico) { $cha=get_arg("cha"); $nqu=get_arg("nqu"); $npq=get_arg("npq"); $led=get_arg("led"); } fxhead("Forix: ".$titulo[$N_SEAR]); if ($ano>0 || $rng>0 || $rnc>0 || $rpi>0 || $req>0 || $rco>0 || $rma>0 || $rrca>0 || $rna>0 || $ogre!="..." || $ocla!="..." || $ovmr!="..." || $numb>=0 || $ini_dos>0) { $SQLQuery="SELECT papi.*, pin.nabr as pi_nome, eq.nome as eq_nome, ngn.nome as ng_nome, can.nome as co_nome, ca.nome as ca_nome, mon.nome as mo_nome, mot.tipo as mo_tipo, tpar.nome as ncpar, tabd.nome as ncaba, tpneu.nome as pneu, tlub.nome as lubr, tlub1.nome as fuel"; if ($cmd==3) { $SQLQuery=$SQLQuery.", fotos.foto, fotos.dat, contactos.copynote"; } else if ($cmd==4) { $SQLQuery=$SQLQuery.", texto.fich, contactos.copynote"; } $SQLQuery=$SQLQuery." FROM (((((((((((((((ngn INNER JOIN papi ON papi.rng = ngn.rng) INNER JOIN pin ON papi.rpi=pin.rpi) INNER JOIN eq ON papi.req=eq.req) inner join can on papi.rco=can.rco) inner join ca on papi.rca=ca.rca) inner join mon on papi.rma=mon.rma) inner join mot on papi.rmo=mot.rmo) INNER JOIN tpar ON papi.cpar=tpar.cod) INNER JOIN tabd ON papi.caba=tabd.cod) inner join tpneu on papi.cpne=tpneu.cod) INNER JOIN tlub ON papi.club=tlub.cod) INNER JOIN tlub as tlub1 ON papi.ccom = tlub1.cod) inner join pil on papi.rpi=pil.rpi) inner join tpais on tpais.cod=pil.cpais"; if ($cmd==3) { $SQLQuery=$SQLQuery.") inner join fotos on papi.rpa=fotos.ref) inner join contactos on fotos.sig=contactos.sig "; } else if ($cmd==4) { $SQLQuery=$SQLQuery.") inner join texto on papi.rpa=texto.ref) inner join contactos on texto.autor=contactos.name "; } else { $SQLQuery=$SQLQuery.")) "; } $SQLQuery=$SQLQuery."WHERE ((ngn.lin=".$lin.") and (tpar.lin=".$lin." and can.lin=".$linx." and mon.lin=".$linx.") and (tabd.lin=".$lin.") and (tpais.lin=".$lin.") and (tpneu.lin=".$linx.") and (tlub.lin=".$linx.") and (tlub1.lin=".$linx.") "; if ($cmd==3) { $SQLQuery=$SQLQuery."and (fotos.dat<=".$hiso.") and (fotos.cref=".$REF_PA.")"; if (strlen($fotografo)>0) { $SQLQuery=$SQLQuery."and (contactos.copynote like '%".$fotografo."%')"; } if ($ini_dos>0) { $SQLQuery=$SQLQuery."and (fotos.dat >=".$ini_dos.")"; } } else if ($cmd==4) { $SQLQuery=$SQLQuery."and (texto.cref=".$REF_PA.") and (texto.tipo=".$TXT_PAR.") and (texto.lin=".$lin.")"; } if ($ano>0) { if ($oano=="=") { $SQLQuery=$SQLQuery."and (papi.rpa>=".(($ano-1900)*100000)." and papi.rpa<".(($ano-1899)*100000).")"; } else if ($oano=="<") { $SQLQuery=$SQLQuery."and (papi.rpa<".(($ano-1900)*100000).")"; } else if ($oano==">") { $SQLQuery=$SQLQuery."and (papi.rpa>".(($ano-1900+1)*100000).")"; } } if ($rng>0) $SQLQuery=$SQLQuery."and (papi.rng=".$rng.")"; if ($rnc>0) $SQLQuery=$SQLQuery."and (papi.rnc=".$rnc.")"; if ($rpi>0) { $trpi=1; $SQLQuery=$SQLQuery."and (papi.rpi=".$rpi.")"; } if ($req>0) { // trpi = 1 $SQLQuery=$SQLQuery."and (papi.req=".$req.")"; } if ($rna>0) $SQLQuery=$SQLQuery."and (tpais.cod=".$rna.")"; if ($rco>0) $SQLQuery=$SQLQuery."and (papi.rco=".$rco.")"; if ($rma>0) $SQLQuery=$SQLQuery."and (papi.rma=".$rma.")"; if ($rrca>0) $SQLQuery=$SQLQuery."and (papi.rca=".$rrca.")"; if ($rpn>=0) $SQLQuery=$SQLQuery."and (papi.cpne=".$rpn.")"; if ($stat > 0) switch ($stat) { case $cmdStatVit: $SQLQuery .= "and (papi.cla=1)"; break; case $cmdStatPol: $SQLQuery .= "and (papi.gre=1)"; break; case $cmdStatVmr: $SQLQuery .= "and (papi.vmr=1)"; break; case $cmdStatPod: $SQLQuery .= "and (papi.cla>=1) and (papi.cla<=3)"; break; case $cmdStatPli: $SQLQuery .= "and (papi.pli=1)"; break; case $cmdStatGpc: $SQLQuery .= "and (papi.cnv>0)"; break; } if ($ogre=="-") $SQLQuery=$SQLQuery."and (papi.gre=0)"; else if ($ogre!="...") { if (!is_numeric($cgre)) $cgre=1; $SQLQuery=$SQLQuery."and (papi.gre <> 0) and (papi.gre".$ogre.$cgre.")"; } if ($ocla=="-") { $SQLQuery=$SQLQuery."and (papi.cla=0)"; } else if ($ocla!="...") { if (!is_numeric($ccla)) { $ccla=1; } $SQLQuery=$SQLQuery."and (papi.cla <> 0) and (papi.cla".$ocla.$ccla.")"; } if ($ovmr=="-") { $SQLQuery=$SQLQuery."and (papi.vmr=0)"; } else if ($ovmr!="...") { if (!is_numeric($cvmr)) { $cvmr=1; } $SQLQuery=$SQLQuery."and (papi.vmr <> 0) and (papi.vmr".$ovmr.$cvmr.")"; } if ($numb>=0) $SQLQuery=$SQLQuery."and (papi.num=".$numb.")"; if (strlen($cha)>0) $SQLQuery=$SQLQuery."and (papi.cha like '".$cha."')"; if ($nqu==1) $SQLQuery=$SQLQuery."and (papi.nqu=1)"; if ($npq==1) $SQLQuery=$SQLQuery."and (papi.npq=1)"; if ($led>0) $SQLQuery=$SQLQuery."and (papi.cnv=$led)"; $SQLQuery=$SQLQuery.") order by "; if ($ini_dos>0) $SQLQuery=$SQLQuery."fotos.dat, "; $SQLQuery=$SQLQuery."truncate(papi.rpa/1000,0), papi.num, papi.rpa"; if ($super_modo==$Modo_publico) $SQLQuery=$SQLQuery." Limit 100"; $result = mysql_query($SQLQuery); $RSList= mysql_fetch_array($result); tab_ini(); tab_bar(2); ?>
echo $titulo[$N_ASEQ]; ?> | if ($ini_dos>0) { ?>echo $titulo[$N_DATE]; ?> | } ?> if ($ano<=0 || $oano!="=") { ?>echo $titulo[$N_YEAR]; ?> | } ?>echo $titulo[$N_GPR]; ?> | echo $titulo[$N_NUMB]; ?> | if ($m_eq>0) { ?>echo $titulo[$N_ENTN]; ?> | } ?> if ($rpi<=0) { ?>echo $titulo[$N_DRIV]; ?> | } ?> if ($super_modo>$Modo_publico) { ?> if ($rrca<=0) { ?>echo $titulo[$N_CAR]; ?> | } ?>echo $titulo[$N_CHAS]; ?> | echo $titulo[$N_ENG]; ?> | } else { ?>echo $titulo[$N_CAEN]; ?> | } if ($ini_dos==0) { if ($tp==1) { ?>echo $titulo[$N_TYRES]; ?> | echo $titulo[$N_OILF]; ?> | } else { ?>echo $titulo[$N_GRID]; ?> | echo $titulo[$N_RACE]; ?> | echo $titulo[$N_FLA]; ?> | } } ?>
"> echo $seq; ?> | if ($ini_dos>0) { $aa=intval($RSList["dat"]/512); $mm=intval(($RSList["dat"]-$aa*512)/32); $dd=$RSList["dat"]-$aa*512-$mm*32; ?>echo pri_data($dd,$mm,0,0); ?> | } } else { include("seq.php"); } if ($ano<=0 || $oano!="=") { include("cp_ano.php"); } include("gp_nome.php"); include("pa_num.php"); if ($m_eq>0) { ?>echo $RSList["eq_nome"]; ?> | } ?> if ($trpi<=0) { include("pi_nome.php"); } ?> if ($super_modo>$Modo_publico) { ?> if ($rrca<=0) { include("car_link.php"); } ?>echo $RSList["cha"]; ?> | include("mot_link.php"); } else { include("cm_nome.php"); } if ($ini_dos==0) { if ($tp==1) { ?>echo $RSList["pneu"]; ?> | echo $RSList["lubr"]; ?> if (strlen($RSList["fuel"])>0 && $RSList["fuel"]!=$RSList["lubr"]) { ?> / echo $RSList["fuel"]; ?> } ?> | } else { include("pa_gre.php"); include("pa_cla.php"); include("pa_vmr.php"); } } ?>
$sesa=0;
while ($RSpp= mysql_fetch_array($result2))
{
$ses=$RSpp["ses"];
if ($ses!=$sesa)
{
$sesa=$ses;
?> echo $RSpp["nome"]; ?>: " echo $RSpp["txt"]; ?>" echo $RSpp["com"]; ?> if ($super_modo==$Modo_total) { ?> [&r= echo $rpa; ?>&s= echo $ses; ?>&c=5">Editar] } if ($lin!=$RSpp["lin"] && $RSpp["lin"]==$linEng) { ?> [ if ($tipo_servidor==0) { ?>Traduzir } else { ?>Send translation } ?>] } ?> } } ?> |
lang= |
english (default) afrikaans armenian basque belarusian bulgarian catalan chinese (Big5) gbchinese (GB) croatian czech danish dutch esperanto |
estonian faroese finnish french german greek hungarian icelandic italian japanese korean latvian lithuanian maltese |
malay norwegian polish portuguese romanian russian serbian slovak slovene spanish swedish turkish ukrainian |
y= | 'year', '>year' or '<year', where 'year' equals 50 to 99 or 1950 to echo $anoFin; ?> |
gp= |
cir= |
mak= |
typ= | Car type |
eng= |
dri= | free format driver name (use '+' as word separator) |
cty= |
tyr= |
grid= race= flap= |
'position', '>position' or '<position' |
When searching for photos the first column of the results table has direct links to the photos. | |
cmd=photos | |
p= | photo provider name |
day= | photos published during the last 'n' days (max 60) |
Restricts the result to those participations having comments and shows the corresponding text. | |
cmd=comments |
n= cha= nqu=1 npq=1 led= |
Car number Chassis number Not qualified Not pre-qualified Number of laps led |
Michael Schumacher's 6th places
$Query="dri=mi+schum&race=6";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>
Wins starting from 10th or worse in the grid, portuguese
$Query="lang=por&race=1&grid=>9";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>
Senna poles in Lotus
$Query="dri=ayr+senna&mak=lotus&grid=1";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>
Italian driver's wins for Ferrari
$Query="cty=italy&mak=ferrari&race=1";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>
Fastest laps of a Williams-Ford
$Query="flap=1&mak=williams&eng=ford";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>
Photos of french drivers in the French Grand Prix, in french
$Query="lang=fre&gp=france&cty=france&cmd=pho";
?>http://www.forix.com/asp/search.asp? echo $Query; ?>