init III

Finde Einstiegsposition in GPX Track/nearestpositionontrack.sh

@@ -0,0 +1,66 @@
+#!/bin/bash
+
+# Nearest Position On Track
+
+FILE=$1
+LAT=$2
+LON=$3
+
+echo "
+$0 track.gpx 50.12666 8.76599
+
+Bspw
+Jakobsbrunnenstraße 14:  50.12666 8.76599
+Campingplatz Bürgel:  50.12582 8.77139
+"
+
+if [ "$LAT" == "" ]; then LAT=50.12582; fi
+if [ "$LON" == "" ]; then LON=8.77139; fi
+if [ "$FILE" == "" ]; then exit; fi
+
+A=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*100000)/100000; printf "%2.5f\n", $f' $LAT`
+O=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*100000)/100000; printf "%2.5f\n", $f' $LON`
+echo "
+Prüfe 5 Nachkommastellen LAT $A LON $O"
+cat $FILE | grep -n "$A" | grep "$O"
+if [ "$?" == "0" ]
+then
+ echo "nearest point"
+ exit
+fi
+
+A=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*10000)/10000; printf "%2.4f\n", $f' $LAT`
+O=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*10000)/10000; printf "%2.4f\n", $f' $LON`
+echo "
+Prüfe 4 Nachkommastellen LAT $A  LON $O"
+cat $FILE | grep -n "$A" | grep "$O"
+if [ "$?" == "0" ]
+then
+ echo "nearest point"
+ exit
+fi
+
+
+A=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*1000)/1000; printf "%2.3f\n", $f' $LAT`
+O=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*1000)/1000; printf "%2.3f\n", $f' $LON`
+echo "
+Prüfe 3 Nachkommastellen LAT $A   LON $O"
+cat $FILE | grep -n "$A" | grep "$O"
+if [ "$?" == "0" ]
+then
+ echo "nearest point"
+ exit
+fi
+
+A=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*100)/100; printf "%2.2f\n", $f' $LAT`
+O=`perl -e '$f=$ARGV[0]; $f =~ s/,/\./; $f=int($f*100)/100; printf "%2.2f\n", $f' $LON`
+echo "
+Prüfe 2 Nachkommastellen LAT $A    LON $O"
+cat $FILE | grep -n "$A" | grep "$O"
+if [ "$?" == "0" ]
+then
+ echo "nearest point"
+ exit
+fi
+
+echo "nearest point is too far"