Hi,
ähm OK - das &H60 ist die Position im Speicher, wo die Variable abgelegt wird - beim Mega8 beginnt das eben bei &H60 - darum hatte ich gehofft, daß es beim Mega128 auch so wäre...
Edit: so, ich habe mal verschiedene Werte ausprobiert - jedesmal ohne Erfolg - bin da jetzt auch etwas ratlos...
Edit2:
so habs jetzt doch hinbekommen... probier mal das - wird jetzt ohne Fehler compiliert...
Code:
$regfile = "m128def.dat"
$crystal = 16000000
$baud = 4800
$baud1 = 4800
On Urxc Onrxd 'InterruptRoutine setzen
Enable Urxc 'Interupt URXC einschalten
Enable Interrupts
Open "COM1:" For Binary As #1
Open "COM2:" For Binary As #2
Dim Buffer(40) As Byte At &H0110
Dim Gps As String * 40 At &H0110 Overlay
Dim a as Byte
Dim b as Byte
do
if a = 41 or b = 13 then
Print #2 , Gps
Gps = ""
End If
Loop
onrxd:
b = udr
if b = asc("$") then
a = 1
end if
if a < 41 then
Buffer(a) = B
incr a
end if
Return
Lesezeichen