Foros del Web » Programación para mayores de 30 ;) » Programación General »

urgente ayuda con programa de coordenadas

Estas en el tema de urgente ayuda con programa de coordenadas en el foro de Programación General en Foros del Web. soy nuevo en al foro pero la verdad es que tengo este problema, pues cuando ingreso una latitud y una longitud en grados, minutos y ...
  #1 (permalink)  
Antiguo 12/11/2009, 06:45
 
Fecha de Ingreso: noviembre-2009
Mensajes: 9
Antigüedad: 14 años, 5 meses
Puntos: 0
urgente ayuda con programa de coordenadas

soy nuevo en al foro pero la verdad es que tengo este problema, pues cuando ingreso una latitud y una longitud en grados, minutos y segundos, pues lo que quiero que al apretar el boton calcular pues que haga lo que tiene que hacer (calcular) pues tengo todo pero no me muestra lo que hace en sus respectivas utm...

<?php
$calcular=$_POST['calcular'];
{
if ($calcular)


if ($orientalong=="1") { /* Si la orientacion de la Latitud esta al oeste*/
$sd=(-1*((($segundoslong/60)/60)+($minutoslong/60)+($longitud)));/*Formula para hallar las sexas decimales*/
$rd=$sd*3.1416/180;
$aux=$sd/6+31;
$huso=(int)$aux;
$merhuso=($huso*6)-183;
$delta=$rd-($merhuso*3.1416)/180;
$a=(cos($rdlat))*(sin($delta));
$xi=(1/2)*log((1+$a)/(1-$a));
$eta=atan((tan($rdlat))/cos($delta))-$rdlat;
}
else if ($orientalong=="2") {/* Si la orientacion de la Latitud esta al este del meridiano de Greenwich*/
$sd=((($segundoslong/60)/60)+($minutoslong/60)+($longitud));
$rd=$sd*3.1416/180;/*en radianes*/
$aux=$sd/6+31;/*Calculo huso*/
$huso=(int)$aux;;/*Calculo huso*/
$merhuso=($huso*6)-183;
$delta=$rd-($merhuso*3.1416)/180;
$a=cos($rdlat)*sin($delta);
$xi=(1/2)*log((1+$a)/(1-$a));
$eta=atan((tan($rdlat))/cos($delta))-$rdlat;
}
if ($orientalat=="1") { /*Calculando los valores de l Latitud*/
$sd1=(-1*((($segundoslat/60)/60)+($minutoslat/60)+($latitud)));/*Formula para hallar las sexas decimales*/
$rdlat=$sd1*3.1416/180;/*en radianes*/
$eta=atan((tan($rdlat))/cos($delta))-$rdlat;
$asemiejemayor=6378057.238;
$bsemiejemenor=6334883.8;
$a1=($asemiejemayor*$asemiejemayor);
$b1=($bsemiejemenor*$bsemiejemenor);
$c1=($a1-$b1)/$asemiejemayor;
$excentricidad=sqrt((pow($asemiejemayor,2))-(pow($bsemiejemenor,2)))/$asemiejemayor;
$segundaexcentricidad=sqrt((pow($asemiejemayor,2))-(pow($bsemiejemenor,2)))/$bsemiejemenor;
$edos=pow($segundaexcentricidad,2);

$rpc=pow($asemiejemayor,2)/$bsemiejemenor; /*radio polar de curvatura */
/*$nuno=($rpc/(1+$edos(cos($rdlat)))*/
$cero=$rpc/(1+$edos);
$r=sqrt(cos(pow($rdlat,2)));
$ni=($cero+$r)*0.9996;/*Ni*/
$r1=($edos/2)*(pow($xi,2));
$r2=(cos($rdlat));
$r3=(pow($r2,2));
$zeta=($r1*$r3);
$res=2*$rdlat;/*Calculo de A1*/
$auno=sin($res);
$auxdos=cos($rdlat);/*Calculod e A2*/
$auxtres=(pow($auxdos,2));
$ados=$auno*$auxtres;
$jdos=$rdlat+($auno/2);/*Calculod e J2*/
$jcuatro=((3*$jdos)+$ados)/4;/*Calculod e J4*/
$jseis1=5*$jcuatro+$ados;
$jseis2=pow($rdlat,2);/*Calculod e J6 verificarlo*/
$jseis3=cos($jseis2)/3;
$jseis=$jseis1*$jseis3;
$alfa=(3/4)*$edos;/*Calculod de Alfa/
$beta=(5/3)*(pow($alfa,2));/*Calculod de Beta*/
$gama=(35/27)*(pow($alfa,3));/*Calculod de Gama*/
$bfi=(0.9996*$rpc)*($rdlat-($alfa*$jdos)+($beta*$jcuatro)-($gama*$jseis));/*Calculod de B(fi)*/
$utme=($xi*$ni)*(1+($zeta/3))+500000;
$utmnorte=($eta*$ni)*(1+$zeta)+$bfi+10000000;/*si la Latitues Norte*/
}

else if ($orientalat=="2") {
$sd1=((($segundoslat/60)/60)+($minutoslat/60)+($latitud));
$rdlat=$sd1*3.1416/180;/*en radianes*/
$eta=atan((tan($rdlat))/cos($delta))-$rdlat;
$asemiejemayor=6378057.238;
$bsemiejemenor=6334883.8;
$a1=($asemiejemayor*$asemiejemayor);
$b1=($bsemiejemenor*$bsemiejemenor);
$c1=($a1-$b1)/$asemiejemayor;
$excentricidad=sqrt((pow($asemiejemayor,2))-(pow($bsemiejemenor,2)))/$asemiejemayor;
$segundaexcentricidad=sqrt((pow($asemiejemayor,2))-(pow($bsemiejemenor,2)))/$bsemiejemenor;
$edos=pow($segundaexcentricidad,2);
$rpc=pow($asemiejemayor,2)/$bsemiejemenor; /*radio polar de curvatura */
/*$nuno=($rpc/(1+$edos(cos($rdlat)))*/
$cero=$rpc/(1+$edos);
$r=sqrt(cos(pow($rdlat,2)));
$ni=($cero+$r)*0.9996;/*Ni*/
$r1=($edos/2)*(pow($xi,2));
$r2=(cos($rdlat));
$r3=(pow($r2,2));
$zeta=($r1*$r3);
$res=2*$rdlat;/*Calculo de A1*/
$auno=sin($res);
$auxdos=cos($rdlat);/*Calculod e A2*/
$auxtres=(pow($auxdos,2));
$ados=$auno*$auxtres;
$jdos=$rdlat+($auno/2);/*Calculod e J2*/
$jcuatro=((3*$jdos)+$ados)/4;/*Calculod e J4*/
$jseis1=5*$jcuatro+$ados;
$jseis2=pow($rdlat,2);/*Calculod e J6 verificarlo*/
$jseis3=cos($jseis2)/3;
$jseis=$jseis1*$jseis3;
$alfa=(3/4)*$edos;/*Calculod de Alfa/
$beta=(5/3)*(pow($alfa,2));/*Calculod de Beta*/
$gama=(35/27)*(pow($alfa,3));/*Calculod de Gama*/
$bfi=(0.9996*$rpc)*($rdlat-($alfa*$jdos)+($beta*$jcuatro)-($gama*$jseis));/*Calculod de B(fi)*/
$utme=($xi*$ni)*(1+($zeta/3))+500000;
$utmnorte=(($eta*$ni)*(1+$zeta)+$bfi); /*Si la latitud es sur*/
}
}
?>
<tr>
<td>Latitud</td>
<td><input name="latitud" type="text" size="10" maxlength="13" value="" ></td>
<td>Minutos</td>
<td><input name="minutoslat" type="text" size="3" maxlength="3" value=""></td>
<td>Segundos</td>
<td><input name="segundoslat" type="text" size="3" maxlength="3" value=""></td>
<td><select name="orientalat" >
<option value="1">N</option>
<option value="2">S</option>
</select>
</td>
<tr>
<td>Longitud </td>
<td><input name="longitud" type="text" value="" size="10" maxlength="13" ></td>
<td> Minutos</td>
<td><input name="minutoslong" type="text" size="3" value="" maxlength="3" ></td>
<td>Segundos</td>
<td><input name="segundoslong" type="text" size="3" maxlength="3" value="" ></td>
<td>
<select name="orientalong" >
<option value="1">E</option>
<option value="2">W</option>
</select>
</td></tr>
<td>
<input type=submit name='calcular'value="calcula" style="border:0px solid; color:#FFFFFF; background-color:#005B99" title="Calcular UTM" >
</td>
<td>&nbsp;</td>
<td colspan="3">&nbsp;</td>
</tr>
<tr>
<td>Coord. UTM </td>
<td>&nbsp;</td>
<td>UTM Norte </td>
<td><input name="utmnorte" type="text" size="10" maxlength="15" value="<?php echo $utmnorte;?>" disabled></td>
<td>UTM Este</td>
<td><input name="utme" type="text" size="10" maxlength="15" value="<?echo $utme;?>" disabled></td>
<td>&nbsp;</td>
<td colspan="3">&nbsp;</td>
</tr>
<tr>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 20:43.