Hallo!
Ich hoffe ich habe das richtige Unterforum erwischt.
Ich habe einen Attiny24, welcher Daten über IR (RC5) empfangen soll und nebenbei auch Daten über UART empfangen soll.
Jedoch funktionieren beide miteinander nicht. D.h. ich kann nur über IR oder über UART empfangen, beides gleichzeitig funktioniert nicht.
Einzeln funktionieren beide einwandfrei, nur miteinander halt nicht.
Folgendes Programm habe ich dazu geschrieben:
Worin könnte hier das Problem liegen?
Ich vermute, dass das Problem irgendwas mit dem Timer zutun hat, nur hilft mir das auch nicht weiter.
Ich hoffe jemand hier kann mir weiterhelfen.
Gruß
Merzi
Ich hoffe ich habe das richtige Unterforum erwischt.
Ich habe einen Attiny24, welcher Daten über IR (RC5) empfangen soll und nebenbei auch Daten über UART empfangen soll.
Jedoch funktionieren beide miteinander nicht. D.h. ich kann nur über IR oder über UART empfangen, beides gleichzeitig funktioniert nicht.
Einzeln funktionieren beide einwandfrei, nur miteinander halt nicht.
Folgendes Programm habe ich dazu geschrieben:
Code:
$regfile = "attiny24.dat"
$crystal = 9830400
$hwstack = 10
$swstack = 16
$framesize = 22
'-----------------------------------------------------------------------------
'-----------------------------------------IR init-----------------------------
'-----------------------------------------------------------------------------
Dim Geraet As Byte , Kommando As Byte
Config Pinb.2 = Input
Portb.2 = 1
Config Rc5 = Pinb.2
Enable Interrupts
Config Porta.0 = Output
Porta.0 = 0
'-----------------------------------------------------------------------------
'---------------------------UART init-----------------------------------------
'-----------------------------------------------------------------------------
Open "coma.5:9600,8,n,1" For Input As #1
Dim Uart_data As Byte
Do
'-----------------------------------------------------------------------------
'--------------Prüfen ob Daten über IR-Empfänger empfangen wurden-------------
'-----------------------------------------------------------------------------
Getrc5(geraet , Kommando)
'-------------------wenn Daten empfangen wurden-------------------------
If Geraet < 255 Then
Kommando.7 = 0
Porta.0 = 1
End If
'-----------------------------------------------------------------------------
'---------------UART Daten empfangen------------------------------------------
'-----------------------------------------------------------------------------
Uart_data = Inkey(#1)
If Uart_data = "x" Then
Porta.0 = 1
End If
Loop
'-----------------------------------------------------------------------------
'-------------------------UART schließen--------------------------------------
'-----------------------------------------------------------------------------
Close #1
End
Worin könnte hier das Problem liegen?
Ich vermute, dass das Problem irgendwas mit dem Timer zutun hat, nur hilft mir das auch nicht weiter.
Ich hoffe jemand hier kann mir weiterhelfen.
Gruß
Merzi