[Talk-es] Error en coordenadas

"Martín RV (OPENGeoMap)" martin en opengeomap.org
Mar Mar 25 23:48:43 GMT 2008


Dani Baeyens escribió:

>El mar, 18-03-2008 a las 01:08 +0100, "Martín RV (OPENGeoMap)" escribió:
>  
>
>>Dani Baeyens escribió: 
>>    
>>
>>>El lun, 17-03-2008 a las 13:05 +0100, Miguel R. Luaces escribió:
>>>  
>>>      
>>>
>>>>Hola,
>>>>        
>>>>
>
>Hola de nuevo,
>
>[...explicación genial...]
>
>Muchísimas gracias por la ayuda. Me ha servido perfectamente. Me llevé
>un chascazo porque convertí correctamente el pequeño juego de puntos que
>me habían dado de prueba, pero luego al convertir el juego completo de
>coordenadas, la trial de CoordTrans me dijo que máximo 10.
>
>Así que utilizando todo lo que me habías dado (y la guía de geodesia que
>recordaba de la lista, pero no había encontrado antes) me he hecho la
>conversión en cuatro pipas
>
>  
>
>>>trial para Windows), que puedes anotar las coordenadas en el geoide que
>>>quieras y pulsar un botón que te muestra el punto en Google Maps.
>>>
>>>Así, he conseguido descubrir que las coordenadas que tengo son UTM sobre
>>>ED50, y ahora ya puedo pasarlas a lat/lon sobre WGS84 :) Supongo que
>>>ahora con algún script de perl podré pasar todos los puntos de tirón
>>>fácilmente
>>>  
>>>      
>>>
>>Si te recomiendo que uses cs2cs con la rejilla del CNIG.
>>    
>>
>
>Así lo he hecho, y me ha ido muy bien. Respecto a Google Maps (la fuente
>más precisa que tengo para comparar resultados, pero que tampoco puedo
>dar por exacta), algun punto se me desvía como máximo 3 metros. Otros
>están clavados en la ortofotografía, así que para la precisión que
>necesito me sobra
>  
>
>  
>
>>Si vas a hacer algo en PERL o Ruby yo estoy interesado en montar las
>>ventanas con GTK-perl o ruby-gnome.
>>Prefiero Ruby si  se puede elegir. 8-) 
>>    
>>
>
>Lo poco que he hecho te lo envío para que veas todo lo que necesitaba en
>perl :P Está "guarro" y no hace mucho, pero de momento me sirve. De
>todas formas, le debo una a la lista, así que si me cuentas un poco la
>idea que llevabas y algún día tengo algo de tiempo no descarto que
>podamos hacer algún conversor para linux :)
>
>Un saludo,
>  
>
Thanks Dani. en cuanto saque un poco de tiempo monto unas ventanitas. 
Muchas de las cosas que  se hacen en openstreetmap sirve para trabajos 
profesionales en topografia, GIS,... ;-) . Para que luego digan que 
somos una cabras locas :-D .
Yo no se como hacen en otros paises  con las rejillas???
Estaría genial montar un servidor de rejillas planimétricas, 
altimétricas y de modelos de geoides para luego usarlas en el escritorio 
para usar con cs2cs o similar.

Ahora mismo no existe ningún web que controle esto. Lo más avanzado está 
en planimetría donde esta bastante estandarizado el formato del CNIG,..
Más aún sería genial crear un EPSG realmente libre para todos:


Ahora mismo lo gestionan los talibanes del petroleo, gases,...:
http://www.epsg.org/Geodetic.html

Nos dan una base de datos con extensión .mdb 8-) , pero yo no se muy 
bien como abrir eso. Rodrigo moya & + hackers  quizas sepan como abrir 
eso en gnu/linux... hehe :-P .
Lo suyo sería montarlo en mysql o similar y con un visor web acompañado 
de las rejillas para libre descarga. También sría genial para sqlite si 
queremos algo como access, o en openoffice base.


Saludos.


_____________________________________________
#!/usr/bin/perl

use strict;



my $input_file = "./CoordenadasParaConvertir20080325.csv";

open (FILE, "<", $input_file) || die("Could not open file\n");



my $line = <FILE>;

$line = substr($line, 0, -1);

print $line . ";\"LAT\";\"LONG\"\n";



while ($line = <FILE>)

{

    (my $field1, my $field2, my $field3, my $field4, my $field5) = split 
';', $line;

    $field5 = substr($field5, 0, -1);

    my $output = `echo "$field4 $field5" | cs2cs -f "%.6f" +proj=utm 
+ellps=intl +zone=30 +nadgrids=./sped2et.gsb +to +proj=latlong 
+datum=WGS84`;

    $output =~ /^(.+)\t(.+)\ .*$/;

    my $field6 = $2;

    my $field7 = $1;

    print $field1 . ";" . $field2 . ";" . $field3 . ";" . $field4 . ";" 
. $field5 . ";" . $field6 . ";" . $field7 . "\n";

}



close (F);









------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: http://lists.openstreetmap.org/pipermail/talk-es/attachments/20080326/20d4d2cf/attachment-0001.htm 


Más información sobre la lista de distribución Talk-es