hola que tal yo use primero dos pics con dos modulos de TX y RX de 433mhz y funciono muy bien pero me funciono mucho mejor con los decodificadores de holtek y los 2 pics usando basic.lo k hice era una alrma a distancia mira si te sirve puedes checar estos modulos en
www.robodacta.commira este fue el pinino sin modulos:
este es el TX (con ayuda del amigo RALF2
'****************************************************************
'* Name : UNTITLED.BAS *
'* Author : Max. E. Reyes Vera Juarez *
'* Notice : Copyright (c) 2005 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 21/09/2005 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
include "modedefs.bas"
trisb=1
boton var PORTA.0
C VAR BYTE
PAUSE 300
loop:
if boton=0 then
HIGH PORTA.2
LOW PORTA.3
gosub led_on
else
LOW PORTA.2
HIGH PORTA.3
gosub led_off
endif
goto loop
led_on:
FOR C=0 TO 16
serout porta.1,T300,[6,6,"OK",3]
IF BOTON=1 THEN
GOTO LOOP
ENDIF
PAUSE 3000
NEXT C
goto loop
led_off:
FOR C=0 TO 16
serout porta.1,T300,[6,6,"OK",8]
IF BOTON=0 THEN
GOTO LOOP
ENDIF
PAUSE 3000
NEXT C
goto loop
end
-------------------------------------------
aqui el RX
'****************************************************************
'* Name : UNTITLED.BAS *
'* Author : Max. E. Reyes Vera Juarez *
'* Notice : Copyright (c) 2005 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 21/09/2005 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
include "modedefs.bas"
trisb=1
datos var byte
led_rojo var portb.1
led_verde var portb.2
PAUSE 300
Loop:
serin portb.0,T300,["OK"],datos
If datos=3 then led_on
if datos=8 then led_off
goto Loop
led_on:
LCDOUT #DATOS
High led_rojo
low led_verde
goto Loop
led_off:
LCDOUT #DATOS
low led_rojo
high led_verde
goto Loop
end
--------------------------------------------------------------
El prog se hizo mas facil con los decodificadores de holtek ya que son direccionables
espero te sirva en algo saludoss
