Ma siii aggiungiamo al navi un po di... Punti d Interesse

Nemis · 1 Dicembre 2005

ho preso dei comuni a caso e controllando con la cartografia online (mappe di virgilio libero etc etc) ci sono dei scarti diversi x ogni comune :-(

cioe rimini è "fuori" di 2,42 e 8,50, ventimiglia 1,46 e 8,45, vicino casa mia 2,19 e 8,79. senza considerare i spiccioli

so che esistono tanti ma tanti modi di considerare le coordinata (i vari dater tipo il wgs84 x esempio) ma non ho trovato come passare da uno all altro

Nemis · 26 Dicembre 2005

news:
un tale su e90post è riuscito ad aggiungere una categoria nuova di punti di interesse...
quando posta piu info e magari il programmino mi metto all opera x i velox iihih

Nemis · 27 Dicembre 2005

aleeee oooohhhh

allora i punti si convertono cosi:
coordinate del gps * 2^31/180 = coordinate da scrivere nel file
ovvero coordinate * 11930464,71

quindi roma cimapino
150208249,498688653 diventa -> 12,5903099.... e 41,7996...

collegamento a mappe virgilio x controllare http://mappe.virgilio.it/tc/mappa.j...z=8.0&lv=1&ct=&st=&cs=&nm=&al=0&type=null&d=1

sottolineo cx=12.59062 & cy=41.799 esattissimo
ci siamo quasi per aggiungerci i preferiti decenti o cmq quelli che vogliamo oleee ooohhhh che bel regalo di Natale che mi sto facendo
bhe magari anche a qualcun altro

con calma

Emiliano · 27 Dicembre 2005

sei grande!!!!!

Nemis · 27 Dicembre 2005

sarebbe piu merito di un tipo su e90post, al discorso del 2^31/180 nn c ero arrivato :-(
cmq a "scomodare" gente in giro i risutati si ottengono
appena ho tempo faccio un convertitore (excel piu access penso) tra i file su poigps e questi qua

che aggiungiamo/cambiamo ?

dragone 320d · 27 Dicembre 2005

veloxxxxxxxxxxxxxx!

Nemis · 27 Dicembre 2005

ihihi, lo sapevo!!

pero ora son divisi in diversi gruppi fissi,mobili,telecamere,photored,sivce... e non possiamo visualizzarli tutti assieme :-(

Nemis · 27 Dicembre 2005

copio e incollo:
jav ha scritto:
Let's see if I can clearly explain the complete process I followed. Keep in mind that I tried to be as unintrusive as possible to prevent problems. I know it isn't very simple, but it worked for me. If someone is interested in writing a graphical program to do everything, is very welcomed :-)

1.- Copy all DVD to a hard disk folder.
2.- In \tpd\ntcBeu_...., open *.psc file with a text editor. This file (and the rest that we'll be editing) may have some special features (for instance, uses Unix-style line ends) so I used a text editor that maintains formatting as much as possible. Wordpad or notepad won't do it. It may work or it may not.
3.- Look for line "TPD-DEF". The number will define the default lenguage.
4.- Look for lines "TPD-LSC". These are the files that we'll be editing for each lenguage. Look for the file corresponding to your language of choice and also for the default language (defined by the number in step 3). You can edit the languages you want, but you need to also edit the default lenguage if you want the icons to work.
5.- Open the file of the chosen language in a text editor (for instance, ger/ger.lsc).
6.- Look for the "TPD-CAT" lines and add a new one for your category. As they are sorted, keep them that way (just in case). For instance, add:

TPD-CAT 9000 N Fast Food

For fast food restaurants.
7.- Look for the "TPD-GRP" lines and add the new category to one of them so it appears in the menu. For instance, changing the line:

TPD-GRP 10003 7314 41015

to

TPD-GRP 10003 7314 41015 9000

will make the "Fast Food" option to appear in the "Hotels and Restaurants" menu in the thrid place.
8.- Look for the "TPD-ICO" lines and add a new one for the new category. Once again, keep them sorted. Specify a new icon for the category. The icon must be a 16x16 pixels 256 colors GIF image with transparency. The image should go in the icons directory with the rest (that could be used as examples).
9.- Look for the "TPD-SEA" lines and add a new one for the new category. Sorted as always. Just copy and paste another line and modify the numbers.
10.- Look for the "TPD-SEV" lines and add a new one for the new category. These ones aren't sorted so I just added it at the end. The new one needs to refer to new *.idx and *.url files in the tables\0 directory. I just named them 0099.idx and 0100.url.
11.- Copy one sf_*.htm and one st_*.htm files in the language directory to the new name (let's say sf_9000.htm and st_9000.htm) and edit them with a text editor, changing the number in the first line to the new one and the name of the category (to "Fast Food" in the example).
12.- Repeat steps 5 to 12 for any other language needed.
13.- Add the new *.url and *.idx files to the tables\0 directory.
14.- Burn all the files to a DVD. I used Nero and configured it as: DVD-ROM UDF/ISO, No multisession, with the default parameters using the same name and and volume creation date for the disk as the original.

I generated the *.idx and *.url files downloading some POIs in MapSource format (*.asc) from www.todopoi.tk and using the following perl program, which will generate a "url" and a "idx" files.
Codice:
#!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
    if $running_under_some_shell;
			# this emulates #! processing on NIH machines.
			# (remove #! line above if indigestible)

$/ = "\r\n";		# set input record separator
$\ = "\r\n";		# set output record separator

LINE: while () {
  chomp;
  next LINE if (/^;/);

  if (/(.+),(.+),[^"]*"(.+)"/) {
    $rec[0] = sprintf("%d", $1 * 2**29 / 45);
    $rec[1] = sprintf("%d", $2 * 2**29 / 45);
    $rec[2] = $3;
    $rec[2] =~ s/ +/ /g;
    $rec[2] = substr($rec[2], 0, 35);
    $tlen = length( $rec[0] . $rec[1] ) + 1;
    $wgslen = $tlen if ($tlen > $wgslen);
    $tlen = length ($rec[2]);
    $namelen = $tlen if ($tlen > $namelen);
    push @data, [ @rec ];
  }
}
@data = @data[sort { $data[$a][0]  $data[$b][0] } 0 .. $#data];

open URL, ">url";
open IDX, ">idx";

print URL "CATURL-eng/sf_9000.htm__";
print URL "POSWGS:S:$wgslen|VILLAGE:S:0|CITY:S:0|NAME:S:$namelen|STREET:S:0|HOUSENUMBER:S:0|PHONE:S:0|COUNTRY:S:6|ENTP1:S:$wgslen|ENTP2:S:0|ENTP3:S:0|ENTP4:S:0|ENTP5:S:0|ENTP6:S:0|ENTP7:S:0|ENTP8:S:0|ENTP9:S:0|BRANDNAME:S:0|_:S:0";
for $i (0 .. $#data) {
  $wgs = pack("a" . $wgslen, $data[$i][0] . "," . $data[$i][1]);
  print URL $wgs . pack ("a". $namelen, $data[$i][2]) . "ESPAÑA" . $wgs;
}

close URL;

$idlen = int(log($#data)/log(10) + 1);
$delta = ($#data - 2) / int($#data / 50 + .9999);
print IDX "Glambda- CATIDX-eng/sf_9000.htm___";
print IDX "ID:I:$idlen|POS:P:8|NAME:S:$namelen|_:S:0";

$j = 0;
LOOP: for $i (0 .. $#data) {
  next LOOP if ($i < $j);

  $S = $S . pack("N2",$i,$data[$i][0]) . "|";
  $j += $delta;
}
print IDX substr($S, 0, length($S) - 1) . "\0";

for $i (0 .. $#data) {
  print IDX sprintf("%*s", $idlen, $i) . pack("N2a" . $namelen, $data[$i][0], $data[$i][1], $data[$i][2]);
}

close IDX;
The MapSource format (at least what I've seen) is much simpler than the one in Navteq DVD, so I only add the available fields. Much more things could be added (phone numbers, cities, streets, ...).
Clicca per allargare...
chi conosce il perl ora?

paper888 · 29 Dicembre 2005

Grandissimo Nemis !!!
Anche se non ci capisco molto, stanotte ci do un'occhiata (sono in ferie)
Ci sentiamo piu avanti se ci sono novita'.
Ciao

paper888 · 6 Gennaio 2006

Azz.. ho fatto tutto (per ora ho messo velox fissi + sicve)....
non riesco a far funzionare lo script ..mi da un errore
riprovo e vi faccio sapere

Nemis · 6 Gennaio 2006

anche a me non va lo script, hai activeperl o altro?

ho anche chiesto di far un convertitore da .url che me li faccio a mano casomai a .idx che han un sacco di caratteri strani
che poi son numeri che non ho capito da dove arrivano, il perl non lo conosco e la funzione pack no so come farla in excel

copio e incollo

jav ha scritto:

Here you have a program to convert *.url to *.idx.

Keep in mind, if you generate your own *.url that:

1.- Longitudes must be sorted in ascending order.
2.- Names seems to have a maximum length of 35 characters.
3.- Fields are filled with null characters, not spaces.

Codice:

#!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
    if $running_under_some_shell;
                # this emulates #! processing on NIH machines.
                # (remove #! line above if indigestible)

$/ = "\r\n";            # set input record separator
$\ = "\r\n";            # set output record separator

open IDX, ">idx";

while () {
    chomp;
    if ($. == 1) {
      s/^.*CATURL/Glambda- CATIDX/;
      print IDX $_;
    }
    if ($. == 2) {
      $n = (@a = split(/\|/));
      $offset = 0;
      for $i (0 .. $n-1) {
          @b = split(/:/, $a[$i]);

          if ($b[0] eq 'POSWGS') {
        if ($offset) {
            $Spos =  "x" . $offset . "a" . $b[2];
        } else {
            $Spos =  "a" . $b[2];
        }
          }
          if ($b[0] eq 'NAME') {
        if ($offset) {
            $Sname =  "x" . $offset . "a" . $b[2];
        } else {
            $Sname =  "a" . $b[2];
        }
        $namelen = $b[2];
          }
          $offset += $b[2];
      }
    }
    if ($. > 2) {
      @pos = split(/,/, unpack ($Spos, $_));
      $name = unpack ($Sname, $_);
      @rec = ( @pos, $name );
      push @data, [ @rec ];
    }
}

$idlen = int(log($#data)/log(10) + 1);
$delta = ($#data - 2) / int($#data / 50 + .9999);
print IDX "ID:I:$idlen|POS:P:8|NAME:S:$namelen|_:S:0";

$j = 0;
LOOP: for $i (0 .. $#data) {
  next LOOP if ($i < $j);

  $S = $S . pack("N2",$i,$data[$i][0]) . "|";
  $j += $delta;
}
print IDX substr($S, 0, length($S) - 1) . "\0";

for $i (0 .. $#data) {
  print IDX sprintf("%*s", $idlen, $i) . pack("N2a" . $namelen, $data[$i][0], $data[$i][1], $data[$i][2]);
}

close IDX;

Clicca per allargare...

paper888 · 6 Gennaio 2006

Nemis ha scritto:

anche a me non va lo script, hai activeperl o altro?

ho anche chiesto di far un convertitore da .url che me li faccio a mano casomai a .idx che han un sacco di caratteri strani
che poi son numeri che non ho capito da dove arrivano, il perl non lo conosco e la funzione pack no so come farla in excel

copio e incollo
Clicca per allargare...

Ho provato con sia con activeperl da windows sia da linux con il suo interprete perl ma mi da il seguente errore:
Can't take log of 0 at ./dvd.pl line 41, chunk 1.

Quando ho un attimo provo l'altro script per gli idx e ti so dire.
Teniamoci in contatto
Ciao

paper888 · 6 Gennaio 2006

Sopra ho scritto male. Non ho provato da linux ma da Solaris 8 (che e' un sistema operativo UNIX).
Appena posso provo anche su linux

Nemis · 6 Gennaio 2006

paper888 ha scritto:

Ho provato con sia con activeperl da windows sia da linux con il suo interprete perl ma mi da il seguente errore:
Can't take log of 0 at ./dvd.pl line 41, chunk 1.

Quando ho un attimo provo l'altro script per gli idx e ti so dire.
Teniamoci in contatto
Ciao
Clicca per allargare...

io son paziente, aspetto sia te che il tipo che ha scritto i script su e90post

ma intanto cerco di veder se capisco che cavolo combina quella funzione pack

paper888 · 6 Gennaio 2006

Provato anche su linux, nisba, errore:
Can't take log of 0 at ./dvd.pl line 41, chunk 1
Viene scritta solo la prima riga del file url e l'idx rimane vuoto.
Io per ora metto a monte e ci penso piu' avanti
Cioa

falcodellastrada · 7 Gennaio 2006

Ciao ragazzi,
complimenti a tutti per quanto state facendo,
speriamo che riesca poi a capirci qualcosa
Buon Lavoro

Nemis · 7 Gennaio 2006

paper888 ha scritto:

Provato anche su linux, nisba, errore:
Can't take log of 0 at ./dvd.pl line 41, chunk 1
Viene scritta solo la prima riga del file url e l'idx rimane vuoto.
Io per ora metto a monte e ci penso piu' avanti
Cioa
Clicca per allargare...

il tipo su e90post dice d'aver provato convertire uno dei .asc dento questo file http://perso.wanadoo.es/custom27/descargas/radarvelocidadmap.zip

qualcosa tipo: perl dvd.pl ES_R_Semaforo.asc

Nemis · 8 Gennaio 2006

@ paper888 ho richiesto i file e gli script x mail, se mi lasci la tua in pm appena arrivano te li giro

paper888 · 8 Gennaio 2006

Nemis ha scritto:

@ paper888 ho richiesto i file e gli script x mail, se mi lasci la tua in pm appena arrivano te li giro
Clicca per allargare...

Fatto in mp. Poi se funzia giriamo il tutto qui nel forum.
P.S. Io ho provato anche convertire il file ES_R_Semaforo.asc, scaricato nel link del messaggio precedente ma mi da lo stesso errore.

Nemis · 10 Gennaio 2006

t ho mandato i file x mail, li hai provati?

su e90post ho messo il tuo errore x veder cosa e se mi risponde lo spagnolo iihih

Entra / Registra

Forum

Ma siii aggiungiamo al navi un po di... Punti d Interesse

Nemis Primo Pilota

Nemis Primo Pilota

Nemis Primo Pilota

Emiliano Presidente Onorario BMW

Nemis Primo Pilota

dragone 320d Presidente Onorario BMW

Nemis Primo Pilota

Nemis Primo Pilota

paper888 Collaudatore

paper888 Collaudatore

Nemis Primo Pilota

paper888 Collaudatore

paper888 Collaudatore

Nemis Primo Pilota

paper888 Collaudatore

falcodellastrada Primo Pilota

Nemis Primo Pilota

Nemis Primo Pilota

paper888 Collaudatore

Nemis Primo Pilota

Condividi questa Pagina

Entra / Registra

Ricerche Utili

Ma siii aggiungiamo al navi un po di... Punti d Interesse

Nemis Primo Pilota

Nemis Primo Pilota

Nemis Primo Pilota

Emiliano Presidente Onorario BMW

Nemis Primo Pilota

dragone 320d Presidente Onorario BMW

Nemis Primo Pilota

Nemis Primo Pilota

paper888 Collaudatore

paper888 Collaudatore

Nemis Primo Pilota

paper888 Collaudatore

paper888 Collaudatore

Nemis Primo Pilota

paper888 Collaudatore

falcodellastrada Primo Pilota

Nemis Primo Pilota

Nemis Primo Pilota

paper888 Collaudatore

Nemis Primo Pilota

Condividi questa Pagina