Hola de nuevo, he probado con el sintonizador digital en la banda de 136 Mhz a 174 Mhz, y tampoco he conseguido escuchar nada.
El programa que he escrito es este:
# include <16F84a.h>
# use delay(clock=4000000)
# use i2c(MASTER, SDA=PIN_A4, SCL=PIN_A3,SLOW,FORCE_SW,RESTART_WDT)
# fuses XT,NOWDT,NOPUT,NOPROTECT
# BYTE PORTA = 0x05
# BYTE PORTB = 0x06
# bit INC = PORTB.0
# bit DEC = PORTB.1
# bit LED1 = PORTB.2
# bit LED2 = PORTB.3
# define LimInf 2810
# define LimSup 3420
# define ON 1
# define OFF 0
long DivisorPLL;
int Phigh,Plow;
/********************************************/
void Retardo(void){
long m;
for(m=0;m!=100;m++){
restart_wdt();
delay_ms(1);}
}
/*********************************************/
void CargaDivPLL(void){
Plow=DivisorPLL;
Phigh=DivisorPLL>>8;
i2c_start();
i2c_write(0b11000010);//dirección
i2c_write(Phigh);//parte alta
i2c_write(Plow);//parte baja
i2c_stop();
}
/****************************************************************************/
void main(){
Set_TRIS_A(0b11111111);
Set_TRIS_B(0b11110011);
i2c_start();
i2c_write(0b11000010);//dirección
i2c_write(0x0A);//parte alta 2810
i2c_write(0xFA);//parte baja 2810
i2c_write(0b10001110);//configuración
i2c_write(0b00000000);//configuración
i2c_stop();
while(1){
if(INC){
DivisorPLL++;
if(DivisorPLL>=LimSup){
DivisorPLL=LimSup;
LED1=ON;
LED2=OFF;
}
CargaDivPLL();
Retardo();
}
if(DEC){
DivisorPLL--;
if(DivisorPLL<=LimInf){
DivisorPLL=LimInf;
LED2=ON;
LED1=OFF;
}
CargaDivPLL();
Retardo();
}
}
}
Aparentemente funciona, pues he puesto unos led que se encienden cuando se llega al tope de sintonia superior e inferior, y se encienden.
He revisado las conexiones mil veces y estan bien, tanto electricamente como en su disposición adecuada.
No se que más hacer.