Witam
Mam mały problem z moim odbiornikiem podczerwieni. Zbudowałem taki prowizoryczny na tsop4836. I mam mały problem. Otóż pilot wysyła sygnał i odbiornik go odbiera, ale za każdym razem komenda wynosi 106. Klikam wszystkie przyciski na pilocie ale komenda i adres się nie zmieniają. I jeszcze nie wiem czemu ale żeby coś mi się wyświetliło na wyświetlaczu to zegar procesora musi być 4 razy mocniejszy niż został zapisany w programie, przykładowo w programie ustawie zegar na 1MHz to w fusebitech muszę ustawić na 4MHz. Czemu się tak dzieje ?
Wiem że było dużo tematów o RC5 ale takiego jeszcze nie spotkałem (możliwe, że za słabo szukałem, ale szukałem).
oto kod:
Pozdrawiam i proszę o pomoc.
Mam mały problem z moim odbiornikiem podczerwieni. Zbudowałem taki prowizoryczny na tsop4836. I mam mały problem. Otóż pilot wysyła sygnał i odbiornik go odbiera, ale za każdym razem komenda wynosi 106. Klikam wszystkie przyciski na pilocie ale komenda i adres się nie zmieniają. I jeszcze nie wiem czemu ale żeby coś mi się wyświetliło na wyświetlaczu to zegar procesora musi być 4 razy mocniejszy niż został zapisany w programie, przykładowo w programie ustawie zegar na 1MHz to w fusebitech muszę ustawić na 4MHz. Czemu się tak dzieje ?
Wiem że było dużo tematów o RC5 ale takiego jeszcze nie spotkałem (możliwe, że za słabo szukałem, ale szukałem).
oto kod:
$crystal = 1000000
$regfile "attiny2313.dat"
Config Lcd = 16 * 2
Cursor Off
Cls
Config Rc5 = Pind.5
Dim Address As Byte , Command As Byte , Nic As Byte
Enable Interrupts
Do
Getrc5(address , Command )
If Address = 10 Then
Command = Command And &B01111111
Cls
Lcd "adres: " ; Address
Lowerline
Lcd "komenda: " ; Command ;
Waitms 500
End If
Loop
EndPozdrawiam i proszę o pomoc.