Ja ,ich will es per Hand machen. Ich habe es jetzt aber schon hinbekommen.
Ich habe mich jetzt mal mit dem Auslesen des Moduls beschäftigt ,doch irgenwie funktioniert das nicht ,da ich nur den Wert vom ersten Mid bekomme ... ????
Ich verwende Bascom.
Code:
$regfile = "m32def.dat"
$crystal = 16000000
$baud = 9600
$hwstack = 32
$swstack = 32
$framesize = 32
Dim A As String * 20 'Das bekomme ich vom Gps Modul
Dim B As String * 10 'Das sollen die Werte sein ,die haben möchte
Dim C As String * 10
Dim D As String * 10
Dim E As String * 10
Dim F As String * 10
Dim K As Byte 'Wo soll er anfangen zu Suchen
Dim L As Byte 'Wie viel soll er rausschreiben
A = "100.258,N,487.456,W"
Print "A= " ; A 'Ich lasse mir den Wert den ich vom gps bekomme anzeigen
K = 1
L = 7
B = Mid(a , K , L)
Print "B= " ; B 'Soll mir den ersten Wert bis zum Komma vor N sagen
K = 9
L = 1
B = Mid(a , K , L)
Print "C= " ; C 'Soll mir N ausgeben
K = 11
L = 7
B = Mid(a , K , L)
Print D 'Soll mir den zweiten Wert nennen
K = 19
L = 1
B = Mid(a , K , L)
Print F 'Soll mir W ausgeben
End
Auf dem Simulator bekomme ich nur : A=100.258,N,487.456,W
B=100.258
C=
Warum bekomme ich das nicht vollständig angezeigt ??? Wie kann man das sonst machen ??
Lesezeichen