Consulta de los cometas con magnitud visual teórica menor que la magnitud máxima introducida, en estos momentos. Base de datos de cometas actualizada el día echo date("d/m/Y H:i:s",$fecha);?>. Si la fecha de actualización no es reciente, puedes actualizarla aquí. (Una vez actualizada, si la fecha no se actualiza pulsa F5 para refrescar la página).
include("../mpc/orbitas.php"); $dbh=mysql_connect ("localhost", "mpc_joaquin", "190988") or die ('I cannot connect to the database because: ' . mysql_error()); mysql_select_db ("elcae959_mpc"); $consulta="SELECT * FROM cometas ORDER BY designacion ASC"; $resultado=mysql_query($consulta,$dbh); printf("%-16s%-35s%-10s%-9s%-9s%-8s%-7s%-11s%-13s%-11s\n\n",'Designación','Cometa', 'magnitud','dias per','d.tierr','d.sol','elon','fase','A.R','DEC'); while($row=mysql_fetch_row($resultado)) { // $tiempo=getdate(); // $t=$tiempo["0"]; if($row[1]!=0) { $dia=(int) $row[3]; $aux=($row[3]-$dia)*60.0; $hora=(int) $aux; $min=(int) (($aux-$hora)*60.0); $perihelio=mktime($hora,$min,0,$row[2],$dia,$row[1]); $t=mktime(gmdate("H"),gmdate("i"),gmdate("s"),gmdate("m"),gmdate("d"),gmdate("y")); $c=Orbita($t,$row[0]); $perihelio=($t-$perihelio)/86400.0; if ($c['magnitud']<=$magnitudmaxima) { $ar=formatoAR($c['r_equ']['phi']/Rad/15.0); $dec=formatoDEC($c['r_equ']['theta']/Rad); printf("%-16s%-35s%' 6.1f %' 9.1f %' 7.3f %' 7.3f %' 6.1f %' 6.1f %' 13s %' 11s\n",$row[0],$row[12], $c['magnitud'], $c['tiempoperihelio'], $c['d_geocentrica'], $c['d_heliocentrica'],$c['elongacion'], $c['fase'],$ar,$dec); // echo "Magnitud= ".$c['magnitud']."\t"."cometa: ".$row[12]."
"; } } } ?>