Pic E Modulo Trasmettitore/ricevitore

[piero77]

Un saluto a tutti,

sono nuovo nel mondo dell'elettronica e per imparare sto realizzando una banale applicazione.

Voglio semplicemente far accendere un led sul ricevitore dopo aver premuto un pulsante sul trasmettitore.

Sto usando 2 PIC 16F84 e due moduli Aurel, uno Tx e uno Rx, rispettivamente il TX-SAW 433/S-Z ed il BC-NBK.

Per quanto riguarda i circuiti ho collegato l'uscita del PIC tx all'ingresso del modulo tx, e l'ingresso del PIC rx all'uscita del modulo rx.

L'ingresso del PIC tx è collegata al pulsante e l'uscita del PIC rx è collegata al LED.

I PIC sono stati programmati secondo le seguenti routine:

TRASMISSIONE

;-----------------------------------------------------------------------

; USO PORTE:

;

; RA0 in

; RA1 not used

; RA2 not used

; RA3 not used

; RA4 not used

;

; RB0 not used

; RB1 uscita

; RB2 not used

; RB3 not used

; RB4 not used

; RB5 not used

; RB6 not used

; RB7 not used

;-----------------------------------------------------------------------

;-----------------------------------------------------------------------

; DEFINIZIONI

;-----------------------------------------------------------------------

PROCESSOR 16F84a ;clock 4 Mhz

RADIX DEC

INCLUDE "P16F84a.INC"

__CONFIG 1111111110001B

#DEFINE BANK0 BCF STATUS,RP0

#DEFINE BANK1 BSF STATUS,RP0

#DEFINE IN PORTA,0

#DEFINE OUT PORTB,1

ORG 0CH

CONT RES 2

;-----------------------------------------------------------------------

; PROGRAMMA

;-----------------------------------------------------------------------

ORG 0

BANK1

CLRF TRISB

BANK0

MOVLW 11111101B

MOVWF PORTB

;----------CICLO PRINCIPALE DEL PROGRAMMA

MAINLOOP BTFSS IN

CALL INVIA

GOTO MAINLOOP

;-----------------------------------------------------------------------

INVIA BSF OUT

MOVLW 168

MOVWF CONT

MOVLW 97

MOVWF CONT+1

LAB DJNZ16 CONT,LAB

BCF OUT

RETURN

;-----------------------------------------------------------------------

DJNZ16 MACRO VAR,ADDR

DECF VAR,F

INCF VAR,W

BTFSC STATUS,Z

DECF VAR+1,F

MOVF VAR,W

IORWF VAR+1,W

BTFSS STATUS,Z

GOTO ADDR

ENDM

;------------------------------------------------------------------------

END

RICEZIONE

; USO PORTE:

;

; RA0 in Ingresso

; RA1 not used

; RA2 not used

; RA3 not used

; RA4 not used

;

; RB0 not used

; RB1 uscita sul LED

; RB2 not used

; RB3 not used

; RB4 not used

; RB5 not used

; RB6 not used

; RB7 not used

;-----------------------------------------------------------------------

;-----------------------------------------------------------------------

; DEFINIZIONI

;-----------------------------------------------------------------------

PROCESSOR 16F84a ;clock 4 Mhz

RADIX DEC

INCLUDE "P16F84a.INC"

__CONFIG 1111111110001b

#DEFINE BANK0 BCF STATUS,RP0

#DEFINE BANK1 BSF STATUS,RP0

#DEFINE RXIN PORTA,0

#DEFINE OUT PORTB,1

;-----------------------------------------------------------------------

; PROGRAMMA

;-----------------------------------------------------------------------

ORG 0

;----------PREDISPOSIZIONE PORTE

BANK1

CLRF TRISB

BANK0

MOVLW 11111101B

MOVWF PORTB

BCF RXIN

;----------CICLO PRINCIPALE DEL PROGRAMMA

MAINLOOP GOTO SERRX

GOTO MAINLOOP

;---------------------------------------------------------------------------

SERRX BTFSS RXIN

GOTO $-1

BSF OUT

RETURN

;----------------------------------------------------------------------

END

Risultato: Quando premo il pulsante non succede niente.

Ovviamente ho collegato ai due moduli anche due antenne.

Qualche suggerimento?