RC5 Transmitter

[John7]

Hi all!

After trying to build RC5 InfraRed Transmitter for a week
i'm quite frustrated.
I'll be much obliged if anyone could help me with it.

[mister_e]

Better are your chance to have an answer if you provide all the details

code
pic used
schematic
some beer

[jrt4fun]

John,

Have a look here: http://www.picbasic.nl/indexes_uk.htm
It's the site from a guy who made some RC5 applications.
The programs are written with Proton Plus so the timing, which is quite important in RC5, might not be correct.
I tried some of the apps. with the PBP compiler and it didn't work.
However when I tried a test version of Proton it worked.

So remember timing issues are to be solved when using PBP.

Regards,

[Ingvar]

I ripped the interesting parts from a working program. It transmits RC5 codes via an IRLED, modulation is 38.5kHz. Not exactly 38kHz but close enough. There are loads of information on the net regarding addresses, commands and all the rest you need to know about RC5.

This link seems to cover just about all you need to know.
http://info.fuw.edu.pl/~pablo/s/opisy/www.xs4all.nl/~sbp/knowledge/ir/rc5.htm

Have fun.
/Ingvar


DEFINE OSC 4

SendIRword VAR WORD
SendIRcommand VAR BYTE
SendIRaddr VAR BYTE
SendIRtoggle VAR BIT
SendIRbit VAR BIT
Counter VAR BYTE

SendIRpin VAR PortB.0 'connect IRLED via resistor to ground

LOW SendIRpin



Send_IR:
SendIRword = %0000000000000110
SendIRword = (SendIRword + SendIRtoggle) << 5
SendIRword = (SendIRword + SendIRaddr) << 6
SendIRword = (SendIRword + SendIRcommand)
FOR bitcounter = 13 TO 0 STEP -1
SendIRbit = ~(SendIRword.0(bitcounter))
GOSUB ToggleSendPin
SendIRbit = SendIRword.0(bitcounter)
GOSUB ToggleSendPin
NEXT
SendIRpin = 0
RETURN

ToggleSendPin:
IF SendIRbit THEN
FOR Counter = 1 TO 34
SendIRpin = 1
ASM
nop
nop
nop
nop
nop
nop
nop
nop
ENDASM
SendIRpin = 0
ASM
nop
nop
nop
nop
nop
nop
nop
nop
ENDASM
NEXT
ELSE
PAUSEUS 875
ENDIF
RETURN

[mister_e]

John,

I tried some of the apps. with the PBP compiler and it didn't work.
However when I tried a test version of Proton it worked.

So remember timing issues are to be solved when using PBP.

Regards,

TIP OF THE DAY: never trust anybody else than you ;)

[paramotor]

assembly code for RC5 TX
RC5 TX (http://www.sixca.com/tip/mainform.php?id=21&s=0&e=10)

[aloncha]

Paramotor, could you send to me that RC5 TX code?
[email protected]
Thanks a lot!!!