'Przyklad dla kodowania 5 bitowego
Dim New As Bit , Komenda As Byte , Adres As Byte
Dim Predkosc_przod_tyl As Byte , Przod_tyl As Bit
Dim Przycisk1 As Bit
Reset Tcon.0 : On Int0 Receiverc5
Enable Int0 : Enable Interrupts
Do
If New = 1 Then
New = 0
Disable Int0
If Adres = 27 Then
'informacja o prędkości do przodu/tylu
Przycisk1 = Komenda.5
Przod_tyl = Komenda.4
Predkosc_przod_tyl = Komenda
Predkosc_przod_tyl = Predkosc_przod_tyl And &B00001111
'w wyniku dostajemy 4-bitowa zmienna predkosci, 1 bit kierunku i 1 stan przycisku
Elseif Adres = 28 Then

'takie same operacje jazdy na boki
End If
Enable Int0
End If
Loop

Receiverc5:
Getrc5(adres , Komenda)
New = 1
Return