Mam problem i nigdzie nie mogę znaleźć odpowiedzi. Mianowicie, chce, żeby mój program odbierał kod w przerwaniu, tak, aby nie miało to wpływu na pracę programu.
Mam taki kod:
Gdy wciskam, przycisk na pilocie, to nic się nie dzieje. Pilot działa na pewno, bo próbowałem jakimś innym kodem odbierać dane, ale to w pętli głównej.
Mam taki kod:
$regfile = "attiny2313.dat"
$crystal = 8000000
$baud = 19200
Dim Kod As Bit
Dim Command As Byte , Subaddress As Byte
Config Pind.2 = Input
Config Int0 = Low Level
On Int0 Receiverc5
Enable Int0
Enable Interrupts
Config Rc5 = Pind.2 , Timer = 0
Do
If Kod = 1 Then
Disable Int0
Cls
Print "Com: " ; Command ; ",Adr: " ; Subaddress
Kod = 0
Enable Int0
End If
Loop
Receiverc5:
Getrc5(Subaddress , Command)
Kod = 1
ReturnGdy wciskam, przycisk na pilocie, to nic się nie dzieje. Pilot działa na pewno, bo próbowałem jakimś innym kodem odbierać dane, ale to w pętli głównej.