GPS (WGS84)

Ellipsoide Parameter verschiedener Ellipsoide.
MapX Tipps und Tricks Parameter verschiedener Ellipsoide.
GPS2GK GPS-Koordinaten nach Bessel/Gauß-Krüger.
GK2GPS Bessel/GK nach GPS(WGS84).
Kras2Bessel Krassovsky/GK nach Bessel/Gauß-Krüger-Koordinaten.
TK25 Topographischen Karte 1:25000
Helmerttransformation
Affin Tranformation
Garmin GPS III+ Routing PKW/Mopped.
Wandlung Routenplanung ins Garmin-Format wandeln.
Übersicht (Home)

GPS2GK

GPS -> GKDatumsShift
Programm zur Wandlung von geografischen GPS-Koordinaten in kartesische Gauß-Krüger-Koordinaten
mit Datenshift vom WGS84- ins Bessel-Ellipsoid.
DownloadDownload up


GK2GPS

GPS <- GKDatumsShift
Programm zur Wandlung von kartesischen Gauß-Krüger-Koordinaten in geografische GPS-Koordinaten
mit Datenshift vom Bessel- ins WGS84-Ellipsoid.
DownloadDownload up


Kras2Bessel

Kras -> Bessel
Programm zur Wandlung von Krassovsky/Gauß-Krüger-Koordinaten in Bessel/Gauß-Krüger-Koordinaten
Wird im gleichen Streifen transformiert, so werden die Differenzen in Klammern angezeigt.

DownloadDownload up


Helmerttransformation Seitenanfang

Überbestimmte Ähnlichkeitstransformation, benötigt mindestens zwei identische Punkte zwischen den zu transformierenden Datenmengen.

Mathematisches Modell:

X = Xo + x*m*cos(a) - y*m*sin(a)
Y = Yo + x*m*sin(a) + y*m*cos(a)
a = m*cos(a)
o = m*sin(a)
Ky=Yo
Kx=Xo
Yneu = Ky + A * Yalt + O * Xalt
Xneu = Kx + A * Xalt - O * Yalt

Affintransformation Seitenanfang

Die eineindeutige Umrechnung von rechtwinklig ebenen Koordinaten eines Systems in ein anderes, wobei außer zwei Verschiebungen und Drehungen eine in zwei Hauptrichtungen unterschiedliche Maßstabsänderung vorgenommen wird.
Es werden mindestens 3 identische Punkte zwischen den zu transformierenden Datenmengen benötigt.

Folgende Gleichungen liegen zugrunde:

X = Xo + x*mx*cosa - y*my*sin(a+b)
Y = Yo + x*mx*sina + y*my*cos(a+b)
a0= X0
a1 = mx*cosa
a2 = -my*sin(a+b)
b0= X0
b1 = mx*sina
b2 = my*cos(a+b)
Yneu = B0 + B1 * Yalt + B2 * Xalt
Xneu = A0 + A1 * Xalt + A2 * Yalt

Garmin GPS IIIplus

GarminGarmin
Mit Landkarten und erweiterter Speicherkapazität
Dieses Gerät kann waagerecht und senkrecht betrieben werden,
da sich das Display um 90 Grad drehen läßt.
Die eingebaute Landkarte enthält Europa, Asien und den mittleren Osten.
Weitere Karten können gespeichert werden
Bildschirmdarstellung: 0.1 sm bis 3000 sm (180m bis 1600 km)

Enthalten sind: Städte, Landesgrenzen, Autobahnen und Straßen, Bahnlinien, Flüße und Seen.

 Technische Daten:

12 Kanal parallel Empfänger

Warmstart: ca. 15 Sek.
Kaltstart: ca. 45 Sek.
Autocate: ca. 5 Min.
Interface NMEA0183* und RS-232 DGPS*
Postionsupdate jede Sekunde

Abnehmbare Antenne mit BNC Stecker
Größe 5,9 x 12,7 x 4,1cm
Gewicht 255g mit Batterien

Versorgungsspannung 10-40V DC oder 4 AA Batterien*
Leistungsaufnahme nur 0.75 W
Interne Lithium Backupbatterie hält bis zu 10 Jahren
Batterielebensdauer bis zu 36 Stunden

LCD* Display beleuchtet 100x160 pixel - 5,6 x 3,8cm -
kann um 90 Grad gedreht werden

500 Wegepunkte mit Name und Symbol
20 umkehrbare Routen mit je 30 Wegepunkten
MOB* und TracBack-Funktion*
über 100 verschiedene Kartendaten (incl. WGS84*)

Arbeitet mit 'MapSource Straßen und Hinweise' Landkarten
Damit können Sie die wichtigen Karten mit dem PC in das Gerät laden.

Wird mit PC Interface Kabel geliefert.
Achtung: 1.2V-NiMh-Accus mit 1800mAh sind schlecht geeignet, da sie nur wenige Stunden halten.

up


Wandlung Routenplanung nach Garmin

Route von Balatonfenyves nach Graz aus Map&Guide mit GPS-Koordinaten.
WEGNAME=Balatonfenyves -Graz
Entfernung=203.8
FAHRZEIT=0 03:33(Tage/Stunden/Minuten)
Kosten=194.74

   15:32     0 Balatonfenyves             auf            B7     12 SO (172855,464211)Nadasd

   15:44    12 -                          rechts auf     B76     9 NW (172121,464033)Nadasd
   15:53  20.7 -                          halb links auf L76    11 W  (171519,464221)Nadasd
   16:08  31.4 -                          links auf      L75    22 W  (170907,464342)Nadasd
   16:37  53.5 -                          rechts auf     B74    16 N  (165241,464342)Nadasd
   16:56  69.1 -                          geradeaus auf  L76    26 W  (165126,465037)Nadasd
   17:30    95 -                          halb rechts au B86     4 N  (163753,465913)Körmend
   17:34  98.7 bei Körmend                links auf      B8     26 SW (163749,470119)Fürstenfeld
   18:01 124.8 Grenzübertritt Rabafüzes   geradeaus auf  -     1.6 W  (161755,465852)Fürstenfeld
   18:03 126.4 Grenzübertritt Eltendorf   geradeaus auf  H65    30 W  (161642,465904)Fürstenfeld
   18:35 155.9 AS Ilz-Fürstenfeld         links auf      A2     41 W  (155749,470447)AS Gleisdorf-Süd
   18:55 196.4 AD Graz-Ost                weiter auf     A2      4 NW (152921,470108)A2
   18:57 200.3 AE Graz-Münzgrabenstr      halb rechts au -       4 W  (152737,470247)Graz

   19:05 203.8 Graz / 01.Bez.:Innere Stadt


Programm zur Wandlung von Dateien aus Routenplanung in das Format der Garmin-Geräte.

Programm up
'(c) Dipl.-Ing. Hans Adelt 2002

Dim Zael&

Private Sub Wandel_Click()
Dim Route As String, S(1 To 20) As String, Idn$, RNr%, File$,A
Randomize
Open App.path & "\routen.rte" For Output As 1
Header
Do
  Zael = 0
  Idn = Chr$(Int((26 * Rnd) + 65)) + Chr$(Int((26 * Rnd) + 65)) + Chr$(Int((26 * Rnd) + 65))
  File = OpenFile("*.txt")
  If Len(File) = 0 Then Exit Do
  Close 9: Open File For Input As 9
  RNr = RNr + 1
  Line Input #9, A$
  posi = InStr(A$, "="): Route = Mid(A, posi + 1)
  HeadRoute SF(RNr + 100, 2, 0), Route
  Line Input #9, A$
  Line Input #9, A$
  Line Input #9, A$
  Line Input #9, A$
  While Not EOF(9)
    Line Input #9, A$
    Tabs A, S(), N
    If N > 7 Then
       If Trim(S(8)) > "" Then Waypoint Idn, S(8), S(3)
    End If
  Wend
Loop
Close 1, 9
End Sub
Sub Waypoint(Idn$, Geo$, Descript$)
Geo = "N" & Mid$(Geo, 9, 6) & ".000 E0" & Mid$(Geo, 2, 6) & ".000"
Zael = Zael + 1
Print #1, "W  " & Idn & Right(Zael + 1000, 3) & " " & Geo & " 27-JUN-02 00:00:00 -9999 " & Left(Descript$ + Space(40), 40) & " 0.00000e+00     0"
End Sub

Sub Header()
Print #1, ""
Print #1, "H  SOFTWARE NAME & VERSION"
Print #1, "I  PCX5 2.05"
Print #1, ""
Print #1, "H  R DATUM                IDX DA            DF            DX            DY            DZ"
Print #1, "M  G WGS 84               103 +0.000000e+00 +0.000000e+00 +0.000000e+00 +0.000000e+00 +0.000000e+00"
Print #1, ""
Print #1, "H  COORDINATE SYSTEM"
Print #1, "U  LAT LON DMS"
End Sub

Sub HeadRoute(Nr$, Route$)
Print #1, ""
Print #1, "R  " & Nr & "  " & Left$(Route + String(20, "_"), 20)
Print #1, ""
Print #1, "H  IDNT   LATITUDE    LONGITUDE    DATE      TIME     ALT   DESCRIPTION                              PROXIMITY    SYMBOL ;waypts"
End Sub

Sub Tabs(A$, S$(), Nr)
Nr = 0
Do
  posi = InStr(A$, Chr$(9))
  If posi = 0 Then Exit Do
  Nr = Nr + 1: S(Nr) = Left(A, posi - 1): A = Mid$(A, posi + 1)
Loop: Nr = Nr + 1: S(Nr) = A
End Sub
up Datei der Route für GPS III+ (graz.rte)
H  SOFTWARE NAME & VERSION
I  PCX5 2.05

H  R DATUM                IDX DA            DF            DX            DY            DZ
M  G WGS 84               103 +0.000000e+00 +0.000000e+00 +0.000000e+00 +0.000000e+00 +0.000000e+00

H  COORDINATE SYSTEM
U  LAT LON DMS

R  01  Balatonfenyves -Graz

H  IDNT   LATITUDE    LONGITUDE    DATE      TIME     ALT   DESCRIPTION                              PROXIMITY    SYMBOL
W  TAC001 N464211.000 E0172855.000 27-MAR-02 00:00:00 -9999 Balatonfenyves                           0.00000e+00     1
W  TAC002 N464033.000 E0172121.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC003 N464221.000 E0171519.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC004 N464342.000 E0170907.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC005 N464342.000 E0165241.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC006 N465037.000 E0165126.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC007 N465913.000 E0163753.000 27-MAR-02 00:00:00 -9999 -                                        0.00000e+00     1
W  TAC008 N470119.000 E0163749.000 27-MAR-02 00:00:00 -9999 bei Körmend                              0.00000e+00     1
W  TAC009 N465852.000 E0161755.000 27-MAR-02 00:00:00 -9999 Grenzübertritt Rabafüzes                 0.00000e+00     1
W  TAC010 N465904.000 E0161642.000 27-MAR-02 00:00:00 -9999 Grenzübertritt Eltendorf                 0.00000e+00     1
W  TAC011 N470447.000 E0155749.000 27-MAR-02 00:00:00 -9999 AS Ilz-Fürstenfeld          43           0.00000e+00     1
W  TAC012 N470108.000 E0152921.000 27-MAR-02 00:00:00 -9999 AD Graz-Ost                 43           0.00000e+00     1
W  TAC013 N470247.000 E0152737.000 27-MAR-02 00:00:00 -9999 AE Graz-Münzgrabenstr       43           0.00000e+00     1
up






© Dipl.-Ing. Hans Adelt , Juni 2002