pos2nmea: dfm09 verbose-ecc-output

pull/11/head
Zilog80 2019-02-14 20:34:42 +01:00
rodzic 19ff0c87dd
commit a8889a60a9
1 zmienionych plików z 1 dodań i 1 usunięć

Wyświetl plik

@ -56,9 +56,9 @@ while ($line = <$fpi>) {
print STDERR $line; ## entweder: alle Zeilen ausgeben
if ( ($line =~ /(\d\d):(\d\d):(\d\d\.?\d?\d?\d?).*\ +lat:\ *(-?\d*)(\.\d*)\ +lon:\ *(-?\d*)(\.\d*)\ +alt:\ *(-?\d*\.\d*).*/)
or ($line =~ /(\d\d):(\d\d):(\d\d\.?\d?\d?\d?).* lat:\ *(-?\d*)(\.\d*).* lon:\ *(-?\d*)(\.\d*).* alt:\ *(-?\d*\.\d*).*/)
or ($line =~ /\((\d\d):(\d\d):(\d\d)\)\ +lat:\ *(-?\d*)(\.\d*)°\ +lon:\ *(-?\d*)(\.\d*)°\ +alt:\ *(-?\d*)m.*/) ) # imet1rs
{
#print STDERR $line; ## oder: nur Zeile mit Koordinaten ausgeben
$hms = $1*10000+$2*100+$3;