Berechnungen -> Abstand Längengrad u. Breitengrad
Verfasst: 29.04.2010 - 16:20
Hab mir mal ein paar Gedanken dazu gemacht, wie man den Abstand vom Nullmeridian zum Längengrad und vom Equator zum Breitengrad berechnen kann.
Hierzu musste ich erstmal den Radius der Erde wissen.
Nachdem ich den Radius wusste, konnte ich schon mal den Abstand vom Equator zum Breitengrad bestimmen.
Dies ging jedoch nicht so einfach beim Längengrad zum Nullmeridian.
Denn der Umfang jedes Breitengrades wird ja Richtung Nord bzw Südpol geringer.
Dies nicht lineal, sondern trigonometrisch.
Das bedeutet, dass ich den Cosinuswert an einem Einheitskreis herausfinden musste.
hier der freebasic Code:
Wäre nett, wenn mir jemand sagen könnte, ob es so korrekt ist.
Stimmt der Radius?
Cu Andy
Hierzu musste ich erstmal den Radius der Erde wissen.
Nachdem ich den Radius wusste, konnte ich schon mal den Abstand vom Equator zum Breitengrad bestimmen.
Dies ging jedoch nicht so einfach beim Längengrad zum Nullmeridian.
Denn der Umfang jedes Breitengrades wird ja Richtung Nord bzw Südpol geringer.
Dies nicht lineal, sondern trigonometrisch.
Das bedeutet, dass ich den Cosinuswert an einem Einheitskreis herausfinden musste.
hier der freebasic Code:
Code: Alles auswählen
screenres 200,200,32
dim as double laengengrad, breitengrad, pi,r,U,breitengrad1, x,y
laengengrad =8.607150000000001
breitengrad =49.794829
pi = 3.14159265
'Der Radius der Erde
r=6371
'Den Umfang des Laengengrades bestimmen = ist immer gleich dieser Umfang
U = Pi *(r+r)
'Hier den Breitengrad ins Bogenmaß bringen
breitengrad1 = breitengrad * PI / 180
'hiermit habe ich erst einmal den Kosinuswert
x = cos(breitengrad1)
'mit Hilfe des Kosinuswertes, kann ich jetzt den Umfang des Breitengrades berechnen
x = x * (r+r) * Pi
'Anschliessend durch 360 teilen und mal den Laengengrad nehmen.
x = x /360 * laengengrad
print x
'Und hier einen Kreissegment berechnet.
'Kreissegment = Abstand vom Equator zum gegebenen Breitengrad
y= U * (Breitengrad/360)
print y
sleep
Stimmt der Radius?
Cu Andy