OK, dann mach das mal wie folgt:

Code:
$regfile = "m32def.dat"
$crystal = 16000000
$framesize = 32
$swstack = 32
$hwstack = 32

Open "Com1:9600,8,N,1" For Output As #1                     ' COM 1 Output
Open "Coma.3:4800,8,N,1,inverted" For Input As #2

Dim Zaehler As Integer
Dim A As Byte
Dim GpsDaten(75) As Byte

   Zaehler = 0
   Do
      A = Waitkey(#2)
      If A = 36 Then
         Do
            A = Waitkey(#2)
            GpsDaten(Zaehler) = A
            Print #1 , Chr(GpsDaten(Zaehler));
            Zaehler = Zaehler + 1
            If Zaehler > 75 Then Zaehler = 1
         Loop
      End If
   Loop
   Close #1
   Close #2
End
Wobei hier
Open "Coma.3:4800,8,N,1,inverted" For Input As #2
als Input für den GPS-Empfänger gilt und die empfangenden Daten über die serielle Schnittstelle ausgegeben werden. Über ein Terminalprogramm mit den Parametern 9600,8,N,1 hättest Du die Daten in Deinem Terminalprogramm.
Eine andere Möglichkeit ist nun, die empfangenden Daten nicht über COM an den PC auszugeben, sondern auf dem Board entsprechend dem anderen Programm auszuwerten und auf dem LCD-Display wiederzugeben. Dü könntest jetzt aus den beiden Programmen eines machen.
Ich hoffe, ich konnte Dir so helfen.

Peter