// 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)))
{
?>
Curiosíssima (Homero Benevides) |
echo $RStriv["texto"]; ?> [outra] |
|
}
}
}
// Aniversários do dia corrente
aniversario();
// Stat-ix
statix();
// Antes do inicio da época
if ($anoNul==1)
{
?> echo $anoFin; ?>
|
gp_next($anoFin);?>
echo $titulo[$N_GPRIS]; ?>
echo $titulo[$N_MAKES]; ?> & echo $titulo[$N_DRIVS]; ?>
if (0==1)
{
?>
echo $titulo[$N_WWW]; ?>
} ?>
// call test_session (N_PST) ?>
|
|
}
// 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);
?>
echo $ano; ?>
|
// Próximo GP
gp_next($ano);
// Ultimo GP disputado
if ($anoNul==0 && strlen($nogp)>0) {
echo("");
echo("$nogp ");
if ($rgp == $GP_rhc_last)
echo(" ");
$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(" " .$RSList["cla"]. " " .$RSList["pi_nome"]. " ");
}
}
// Campeonato de Pilotos
?> echo $titulo[$N_DCHAM]; ?>
$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))
{
?> &c= echo $cmdPIfic; ?>"> echo $RSList["pi_nome"]; ?> ( echo $RSList["pon"]/100; ?>)
$n=$n+1;
}
}
// Campeonato de Construtores
?> echo $titulo[$N_CCHAM]; ?>
$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"];
?> &c= echo $cmdCMfic; ?>"> echo $car; ?>
if ($car!=$mot)
{
if ($lin==$linJap)
{
?>E }
else
{
?>/ } ?>&c= echo $cmdCMfic; ?>"> echo $mot; ?>
}
?> ( echo $RSList["pon"]/100; ?>)
$n=$n+1;
}
}
?> echo $titulo[$N_GPRIS]; ?>
echo $titulo[$N_SBYS]; ?>: echo $titulo[$N_SGRID]; ?>
echo $titulo[$N_CLAC]; ?> & echo $titulo[$N_LARAC]; ?>
echo $titulo[$N_DRIVS]; ?>
if ($anoNul==0)
{
?>
echo $titulo[$N_MAKES]; ?> & echo $titulo[$N_DRIVS]; ?>
} ?>
if ($titulo[$N_RULES]!="?" && $lin>$linEng)
{
?> echo $titulo[$N_RULES]; ?>
}
if (0==1)
{
?> echo $titulo[$N_WWW]; ?>
// call test_session (N_STST)
} ?>
|
|
}
// Temporada de testes
// call test_session_section (N_PST)
// test_session_section($N_STST);
?>
1950-2003
|
echo $titulo[$N_GPRIS]; ?>
if ($lin==$linPor)
{
?> Portugal, Brasil
}
else
if ($lin==$linBra)
{
?> Brasil
}
else
if ($lin==$linIta)
{
?> Italia, San Marino
}
else
if ($lin==$linEsp)
{
?> Argentina, España, México
}
else
if ($lin==$linSue)
{
?> Sverige
}
else
if ($lin==$linHun)
{
?> Magyarország
}
else
if ($lin==$linJap)
{
?> “ú–{
}
?>
echo $titulo[$N_CIRCS]; ?>
if ($lin==$linBra)
{
?> Interlagos, Jacarepaguá
}
else
if ($lin==$linIta)
{
?> Monza, Enzo e Dino Ferrari
}
?>
echo $titulo[$N_DRIVS]; ?>
if ($lin==$linEng)
{
?> Where are they now ?
}
if ($titulo[$N_WOMEN]!="?")
{
?> echo $titulo[$N_WOMEN]; ?>
}
// 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));
?> echo $titulo[$N_PGAL]; ?>: echo $titulo[$N_NEW]; ?> ( echo pri_data(fdia($RSList["dat"]),fmes($RSList["dat"]),0,0); ?>)
if ($lin==$linChe)
{
?> echo $titulo[$N_CAREE]; ?> (R.Pavelka)
}
else
if (0==1 && $lin==$linHun)
{
?> echo $titulo[$N_CAREE]; ?> (E.Zsolt)
}
?> echo $titulo[$N_BORN]; ?> & echo $titulo[$N_DIED]; ?>
echo(" $titulo[$N_DDEA] ".chr(10));
?> echo $titulo[$N_CLACS]; ?>
echo $titulo[$N_SBYS]; ?>
if ($lin==$linPor)
{
?> Portugal, Brasil
}
else
if ($lin==$linBra)
{
?> Brasil
}
else
if ($lin==$linIta)
{
?> Italia
}
else
if ($lin==$linSue)
{
?> Sverige
}
else
if ($lin==$linFin)
{
?> Suomi
}
else
if ($lin==$linDin)
{
?> Danmark
}
else
if ($lin==$linJap)
{
?> “ú–{
}
?> echo $titulo[$N_CTRYS]; ?>
echo $titulo[$N_MAKES]; ?>
echo $titulo[$N_ENGS]; ?>
echo $titulo[$N_TYRES]; ?>
|
|
// Non championship races
if ($zip<10)
{
?>
echo $titulo[$N_NONC]; ?>
|
echo $titulo[$N_YEARS]; ?>
echo $titulo[$N_RACES]; ?>
|
|
}
// F3000
?>
F.3000
|
if (0==1)
{
?>
2003: echo $titulo[$N_RACES]; ?>
}
if (0==0)
{
if (0 == 1) {
?>
echo pri_data(13,9,0,1); ?>: Monza
}
?>Monza
1 Bjorn Wirdheim
2 Patrick Friesacher
3 Ricardo Sperafico
} if (0==0)
{?>
2003: echo $titulo[$N_CHAM]; ?>
Bjorn Wirdheim (78)
Ricardo Sperafico (43)
Giorgio Pantano (41)
}
?>
|
|
|
// Noticias
if ($zip<10)
{
if ($lin==$linEng && $servidor!="forix-s")
{
}
// Francês
if ($lin==$linFra)
{
ask_forix();
colabora();
}
else
// Espanhol
if ($lin==$linEsp)
{
?> Comentarios |
Entrevista con Fritz d'Orey (A.Carvalho)
1 de mayo de 1994 (M.Affabili)
|
|
ask_forix();
colabora();
if ($tipo_servidor==1)
{
?> Noticias TheF1 |
|
|
}
}
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"];
?>
echo $titulo[$N_PGAL]; ?>: echo $titulo[$N_NEW]; ?> ( echo pri_data($dd,$mm,0,0); ?>)
|
|
if ($zoom==0)
{
?>
}
else
{
?>
}
?> echo $copy; ?> | |
/*
// Timesharing
$anuncio= rand(0,15);
if ($anuncio<2)
{
// Richard Macey Artwoork
if ($lin==$linEng)
{
?> | |
}
}
else
if ($anuncio<4)
{
// Paolo Baldinotti
?>Paolo Baldinotti
Wallpaper ( echo pri_data(6,6,0,0); ?>) |
}
else
{
// TotalPoster
?>TotalPoster
|
}
// Outras galerias
?>"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;
}
?> | 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;
}
?> |
*/
?>
|
}
// Promotions
if ($zip<10 || $zip==$Zip_ATL)
{
if (($lin==$linPor || $lin==$linBra))
{
?>
if ($lin==$linEng)
{
?>See also }
else
if ($lin==$linPor || $lin==$linBra)
{
?>Veja também } ?>
|
if ($lin==$linPor || $lin==$linBra)
{
?>
if ($lin==$linPor)
{
?>
GP Áustria – Entre a emoção e a razão... (J.M.Barros, 17 Maio)
Ordens de equipa, sempre existiram! (J.M.Barros, 17 Maio)
A germanização da Fórmula 1 (J.C.Costa, 23 Jun)
}
if ($lin==$linBra)
{
?>
Entrevista com Fritz d'Orey (A.Carvalho, 20 Jan)
A germanização da Fórmula 1 (J.C.Costa, 23 Jun)
}
?>
As Heranças (A.Rowlands)
Trivia: Nelson Piquet
?>
}
?>
|
|
}
}
// 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)
{
?>
echo $titulo[$N_COMM]; ?>
|
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;
?> echo $pri_data[$dd][$mm][0][0]; ?> 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); ?> echo GPnome($ref); ?>
if ($tipo==$TXT_RHC)
{
?> - echo $titulo[$N_RHC]; ?>
}
else
if ($tipo==$TXT_FAT)
{
?> - Facts & Trivia
}
else
if ($tipo==$TXT_VAV)
{
?> - 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); ?> echo $RSList2["nome"]; ?> - echo $RSList2["nabr"]; ?>
}
$RSList2->Close;
$RSlist2=null;
}
?> ( echo $RSList["copynote"]; ?>)
$RSList->MoveNext;
}
?> |
}
*/
}
// Statistics
?> | echo $titulo[$N_STATS]; ?>
|
Wildsoft F1 Ranking
echo $titulo[$N_ANNI]; ?>
echo $titulo[$N_DSCH]; ?>
Top 6, echo $titulo[$N_WINS]; ?>, echo $titulo[$N_POLES]; ?>
echo $titulo[$N_SEQS]; ?>
|
|
// Palavras de pilotos
last_words();
?>
if ($lin==$linEpt)
{
?> TTT }
else
{
?>WWW } ?>
|
if ($lin!=$linPor && $lin!=$linBra && $lin!=$linRus)
{
?>Atlas F1 News
Atlas F1 Magazine
}
else
if ($lin==$linRus)
{
?>
Atlas F1 - Æóðíàë î Ôîðìóëå 1
Íîâîñòè î Ôîðìóëå 1
Áèîãðàôèè ïèëîòîâ Ôîðìóëû 1
if (0==1)
{
?>
Ïðåäâàðèòåëüíûé îáçîð Ãðàí Ïðè Èòàëèè
}
}
?> echo $titulo[$N_WWW]; ?>
|
|
// Sugestao de leitura
leitura();
?>
++
|
if ($lin==$linPor || $lin==$linBra)
{
?>As bandeiras na Fórmula 1
}
if ($lin==$linEng || $lin==$linFra || $lin==$linEsp || $lin==$linIta || $lin==$linAle)
{
switch ($lin)
{
case $linEng:
$qia="FIA Q&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;
}
?> echo $qia; ?>
}
echo("");
echo("$titulo[$N_SEAR], $titulo[$N_SEAR]-$titulo[$N_PGAL] ");
echo("$titulo[$N_JUMP] ");
if ($zip==$Zip_BMW) {
?>
}
if ($zip<10 || $zip==$Zip_ATL)
{
?>
Daniele Amaduzzi
if (0 == 1 and $lin==$linEng)
{
?>
Share your knowledge
} ?>
echo $titulo[$N_HOWL]; ?>
if ($lin==$linPor)
{
?>
Forix @ Público
} ?>
echo $titulo[$N_SLAN]; ?>
if ($zip<10 && $zip!=0)
{
?>
} ?>
if ($zip<10 && $zip!=1)
{
?>
} ?>
if ($zip<10 && $zip!=2)
{
?>
} ?>
} ?>
|
|
if ($zip<10 or $zip == $Zip_BMW or $zip == $Zip_TAG)
{
?>
|
// 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!="")
{
?> echo $username; ?> |
echo $tit_subs[0]; ?>
echo $tit_subs[1]; ?>
echo $tit_subs[2]; ?>
echo $tit_subs[3]; ?>
|
tab_bar2(6);
?>
|
}
else
{
if (LOGIN_ACTIVE)
{
echo("
tab_bar2(6);
?>
|
}
}
// Mensagens de Natal e Ano Novo
if ($hmes==12 && $hdia>14 && $hdia<=25)
{
?> echo $titulo[$N_NATAL]; ?> |
|
|
}
else
if (($hmes==12 && $hdia>25) || ($hmes==1 && $hdia<7))
{
?> echo $titulo[$N_ANOVO]; ?> |
|
|
}
// Partners
if ($lin==$linBra)
{
?>
|
|
|
|
}
// Special promotions
if ($zip == $Zip_TAG) {
echo(" | ");
echo("
| ");
} else {
if ($lin == $linEsp) {
echo(" | ");
echo("
| ");
}
echo(" Diego García | ");
echo(" | ");
echo("
| ");
}
// F1 le logiciel
if ($lin==$linFra)
{
?>
F1 Le Logiciel |
|
|
// Autosprint
}
else
if ($lin==$linIta)
{
?> Autosprint |
|
|
// R.Pavelka
}
else
if (0 == 1 and $lin==$linChe)
{
?> |
|
}
// Skyscraper 24/7
if ($pub_part==1 && $tipo_servidor==1 && $serv_addr!=$serv_AtlasF1)
{
?>
|
}
?> |
}
?>