rovag
06.11.2007, 14:38
Moin,
ich habe folgendes Problem:
Ich möchte mit dem RN Control eine Aufgabe realisieren. Ich will über das Terminal ein paar Zeichen senden und der Controller soll diese über das Terminal zurück geben. Dafür hab ich mir folgende Funktion rausgesucht:
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000
$baud = 9600
Dim Ton As Integer
Dim S As String * 10
Enable Interrupts
Enable Urxc
On Urxc Onrxd
Do
If Len(s) > 9 Then
Print S
S = ""
End If
Loop
End
Onrxd : S = S + Chr(udr)
Return
Allerdings hab ich das Problem, dass Bascom mir beim übersetzen jedesmal den Fehler Unknown statement [Onrxd] ausgibt. Ok denk ich mir da hab ich mich bestimmt verschrieben, um das zu überprüfen hab ich mal die Zeile Onrxd:... auskommentiert, und siehe da ich bekomme den fehler Label not found: [Onrxd]
Also folgere ich dass ich keinen Tipfehler habe denn sonst würde er ja jetzt nicht auf einmal das Label vermissen?
Ich bin am verzweifeln und würde mich sehr freuen wenn jemand von euch die Lösung parat hätte
Gruß Björn
ich habe folgendes Problem:
Ich möchte mit dem RN Control eine Aufgabe realisieren. Ich will über das Terminal ein paar Zeichen senden und der Controller soll diese über das Terminal zurück geben. Dafür hab ich mir folgende Funktion rausgesucht:
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000
$baud = 9600
Dim Ton As Integer
Dim S As String * 10
Enable Interrupts
Enable Urxc
On Urxc Onrxd
Do
If Len(s) > 9 Then
Print S
S = ""
End If
Loop
End
Onrxd : S = S + Chr(udr)
Return
Allerdings hab ich das Problem, dass Bascom mir beim übersetzen jedesmal den Fehler Unknown statement [Onrxd] ausgibt. Ok denk ich mir da hab ich mich bestimmt verschrieben, um das zu überprüfen hab ich mal die Zeile Onrxd:... auskommentiert, und siehe da ich bekomme den fehler Label not found: [Onrxd]
Also folgere ich dass ich keinen Tipfehler habe denn sonst würde er ja jetzt nicht auf einmal das Label vermissen?
Ich bin am verzweifeln und würde mich sehr freuen wenn jemand von euch die Lösung parat hätte
Gruß Björn