GSM-GPS Auswertung gleichzeitig

[Matthias S. (mat-sche)]

Hallo liebe Gemeinde,

hänge nun schon zu lange in meinem Projekt fest und bräuchte mal nen 
paar Tips von Euch Profis!

Bin gerade dabei mir mit einem GSM/GPS Modul eine Motorradalarmanlage 
aufzubauen. Beide Geräte benötigen einen Uartport für die 
Datenauswertung. Ich progge in Bascom einen ATmega644p.

Beide Module habe ich am Laufen, auch gemeinsam funktioniert alles gut. 
Jedenfalls wenn ich Daten nach der GPS-Auswertung per SMS sende habe ich 
alles wie ich es will.Nun wollte ich mich mit dem Empfang von Daten über 
GSM beschäftigt und da fängt mein Problem an!

Bisher habe ich einen comport vom Mega für die Programmierung über einen 
Bootloader genutzt, den 2. hängt mein GSM dran. Den GPS-String lese ich 
per Interrupt und Softuart ein.

Mein Problem ist, dass ich den GPS-String dauernd über den Interrupt 
einlese und auswerte. Rufe ich nun mein GSM an, werden nicht die 
gesamten GSM-Daten eingelesen. Die Ursache ist der interrupbasierende 
GPS-Datenempfang.

Nun zu meiner Frage:

wie würdet Ihr mein Problem lösen?
Ich möchte den GPS-String immer einlesen aber auch dabei gleichzeitig 
einen Datenstring über den anderen Com-Port empfangen wollen.

MAT

[Weingut P. (weinbauer)]

Ohne den Quellcode kann man praktisch nix sagen.

Prinzipiell kannst Du beide UARTs per Interrupt RXC lesen
und auch Sendebuffer per TXC realisieren ...
kann mir fast nicht vorstellen das da bei "normalen"
Baudraten Timingprobleme auftauchen sollten.

[Thomas (Gast)]

Matthias S. schrieb:
> Mein Problem ist, dass ich den GPS-String dauernd über den Interrupt
> einlese und auswerte. Rufe ich nun mein GSM an, werden nicht die
> gesamten GSM-Daten eingelesen. Die Ursache ist der interrupbasierende
> GPS-Datenempfang.

Zur Not könntest du vielleicht auf die Aktualisierung der GPS Daten 
verzichten, während du gerade dein GSM anrufst. Oder bist du 
Dauertelefonierter, so dass die GPS Daten dann hoffnungslos veralten 
würden? Mit welcher Datenrate kommunizierst du denn mit dem GSM?

[Matthias S. (mat-sche)]

Hi!
DAnke für Eure Antworten!

Das GPS läuft mit 4800 und GSM mit 19600. Die Sache in der ich ein 
Problem sehe ist, was passiert mit den Daten vom GSM Uart wenn gerade 
ein GPS-String eingelesen wird? Das GPS Modul sendet 7 verschiedene 
Strings von max. 70 Zeichen. Aus diesen Strings muss ich mir 2 
raussuchen, in der meine benötigten Daten liegen.

Ich will aus Bascom die Routinen mit dem gepufferten Empfang nutzen.

=> jetzt funktioniert schon einmal der gepufferte Empfang vom 
GPS-String:

Do

If Z = 1 Then
   If _rs_bufcountr1 > 50 And _rs232inbuf1(_rs_bufcountr1) = 13 Then
         Disable Urxc1
         Print "nmea " ; Nmea
         Gosub Gps_auswertung

   End If
End If

Loop
Close #1
Close #2

End


'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ GPS-Stringauswertung
Gps_auswertung:
    Nmea_name = Mid(nmea , 1 , 5)
    Print "Nmea_name = " ; Nmea_name                                                                                                                  'Left(nmea , 5)                                                                                                                        ' NMEA - Messagestring erkennen
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "GPRMC" ~~~~~~~~~~~~~~~~~~
    If Nmea_name = "GPRMC" Then
       Nmea_time = Mid(nmea , 7 , 2) + ":" + Mid(nmea , 9 , 2) + ":" + Mid(nmea , 11 , 2)
       Nmea_valid = Mid(nmea , 14 , 1)
       Nmea_latitude_grad = Mid(nmea , 16 , 2)
       Nmea_latitude_min_sec = Mid(nmea , 18 , 7)
       Nmea_n_s = Mid(nmea , 26 , 1)
       Nmea_longitude_grad = Mid(nmea , 28 , 3)
       Nmea_longitude_min_sec = Mid(nmea , 31 , 7)
       Nmea_e_w = Mid(nmea , 39 , 1)
       Nmea_speed = Mid(nmea , 41 , 5)
       Nmea_date = Mid(nmea , 51 , 2) + "." + Mid(nmea , 53 , 2) + "." + Mid(nmea , 55 , 2)
       Latitude_singl = Val(nmea_latitude_min_sec)
       Longitude_singl = Val(nmea_longitude_min_sec)



'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "GPGGA" ~~~~~~~~~~~~~~~~~~
    Elseif Nmea_name = "GPGGA" Then
       Nmea_time = Mid(nmea , 7 , 2) + ":" + Mid(nmea , 9 , 2) + ":" + Mid(nmea , 11 , 2)
       Nmea_latitude_grad = Mid(nmea , 14 , 2)
       Nmea_latitude_min_sec = Mid(nmea , 16 , 7)
       Nmea_n_s = Mid(nmea , 24 , 1)
       Nmea_longitude_grad = Mid(nmea , 26 , 3)
       Nmea_longitude_min_sec = Mid(nmea , 29 , 7)
       Nmea_e_w = Mid(nmea , 37 , 1)
       Latitude_singl = Val(nmea_latitude_min_sec)
       Longitude_singl = Val(nmea_longitude_min_sec)

   End If
       If Print_debug = 1 Then
         Print "time= " ; Nmea_time ; "," ; Nmea_date
         Print "Latitude= " ; Nmea_latitude_grad ; " " ; Nmea_n_s ; " " ; Nmea_latitude_min_sec
         Print "Longitude= " ; Nmea_longitude_grad ; " " ; Nmea_e_w ; " " ; Nmea_longitude_min_sec
         Print "Speed= " ; Nmea_speed
         Print "Valid= " ; Nmea_valid
   End If
   'Rs232_dummy = Memcopy(mem_dummy , _rs232inbuf1(1) , _rs_bufcountr1 , 2)
   Nmea = ""
   First_str = 0
   Nmea_count = 0
   Enable Urxc1
   Reset Z
Return

'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Uart ISR
'Uart Interrupt bei jedem eingehenden Zeichen zur Nutzung Erkennung Ende einer Übertragung
'wird Timer Count nicht mehr genullt, dann in der Alarmmain auslesen des RS232 Buffer
Serial1charmatch:
Clear Serialin1
Set Z

Return

nun will ich mal schauen wie sich die Auswertung auswirkt wenn ich den 2 
uart in betrieb nehme....

Danke schon einmal bis dahin