telecontrolli RF module

[ngeronikolos]

Hello to every picbasic fan,

I have just return from summer vacations and I am back for more coding...

I bought from a local shop a set of Tx and Rx 433Mhz RF Modules RT4 and RR3 by telecontrolli.

See datasheet
RT4: http://www.telecontrolli.com/pdf/transmitter/rt4.pdf
RR3:http://www.telecontrolli.com/pdf/receiver/rr3.pdf
Does anyone have any experience with them???
I failure to make a link.

My project
Tx
16f627 -4Mhz Ext.osc- rt4 -Antenna wire 17cm

Rx
16f627 -4Mhz Ext.osc -rr3 -Antenna wire 17cm -USART RS232


I use the manchester code from Ioannis(thanks)
-------------------------------------------------------------------
'tx
encoded var word
mydata var byte
mydata="T"
loop:
gosub encod_r
serout2 PORTB.0,813,[$55, $55, $AA, encoded.lowbyte,encoded.highbyte]
pause 1000
goto loop

encod_r:
For i=0 TO 7
IF mydata.0[i]=0 Then
encoded.0[i*2]=0
encoded.0[i*2+1]=1
Else
encoded.0[i*2]=1
encoded.0[i*2+1]=0
EndIF
Next i
Return
--------------------------------------------------------------

'rx
encoded var word
mydata var byte


loop:
SERIN2 reception, 813, [WAIT($AA),encoded.lowbyte,encoded.highbyte]
gosub decod_r

serout2 info, 813, [mydata]

goto loop


decod_r:
For i=0 TO 7
IF encoded.0[i*2]=0 Then
IF encoded.0[i*2+1]=1 Then
mydata.0[i]=0
EndIF
Else
mydata.0[i]=1
EndIF
Next
Return
------------------------------------------------------------------

My usart connecting with my PC is working BUT the link is dead.

Please any help is usefull
Nikos Geronikolos