自制FM收音機

單片機控制的哦，用到了24c02，可以掉電存臺，4位數碼管顯示，自動搜索，音量調整，rda5807收音模塊，2822音頻放大，紅外遙控的。

下面是今天6月24日搞出來的程序

#include <reg52.h>
#include <intrins.h>
#include "IIC.h"
#include "delay.h"

sbit K1 = P2^3;//
sbit K2 = P2^2;//
sbit K3 = P2^1;//
sbit K4 = P2^0;//

#define uchar unsigned char
#define uint unsigned int

uchar data IRcode[4]; //定義一個4字節的數組用來存儲代碼
uchar CodeTemp; //編碼字節緩存變量
sbit IRsignal=P3^2; //紅外接收頭OUT端直接連P3.2(INT0)

uchar chanl=0x00;

unsigned long frequency;

// RDA5807 寄存器
unsigned char RDA_reg_data[8] =
{
0xd0,0x00, // 02H
0x00,0x00, // 03H
0x00,0x40, // 04H
0x90,0x88, // 05H
};

char code reserve[3]_at_ 0x3b; //保留0x3b開始的3個字節

/*
紅外部分
*/
/************************中斷0解碼服務子程序**********************/
void int0(void) interrupt 0 using 2
{
uchar i,j,k; //循環變量
EA=0;
for(k=0;k<10;k++)
{Delay0_9ms();
if (IRsignal==1) //如果0.9ms后IRsignal=1，說明不是引導碼
{k=10;break;}
else if(k==9) //如果持續了10×0.9ms=9ms的低電平，說明是引導碼
{while(IRsignal==0);
Delay4_5ms(); //跳過持續4.5ms的高電平
for(i=0;i<4;i++) //分別讀取4個字節
{for(j=1;j<=8;j++) //每個字節8個bit的判斷
{ while(IRsignal==0); //等待上升沿
Delay0_9ms(); //從上升沿那一時刻開始延時0.9ms，再判斷IRsignal
if(IRsignal==1) //如果IRsignal是"1",則向右移入一位"1"
{Delay1ms();
CodeTemp=CodeTemp|0x80;
if(j<8) CodeTemp=CodeTemp>>1;
}
else
if(j<8)CodeTemp=CodeTemp>>1;//如果IRsignal是"0",則向右移一位，自動補"0"
}
IRcode[i]=CodeTemp;
CodeTemp=0;
}
for(i=0;i<4;i++) //通過串口將代碼發出
{
SBUF=IRcode[i];
while(!TI); //等待一個字節發送完畢
TI=0;
}
Delay();
}
}
EA=1;
}
/***********************串口初始化程序*********************/
void initUart(void)
{
TMOD|=0x20;
SCON=0x50;
PCON|=0x80;
TH1=0xff; //57600bps @ 11.0592MHz
TL1=0xff;
TR1=1;
}

/**********************************************************

連續寫寄存器子函數

**********************************************************/
void RDA5807_write_reg(void)
{
uchar i;

I2C_start();
// 收音模塊寫入操作
I2C_write_byte(0x20);
// 寄存器連續寫操作
for(i=0; i<8; i++)
{
I2C_write_byte(RDA_reg_data[i]);
}
I2C_stop();
}

/**********************************************************

連續讀寄存器子函數

**********************************************************/
void RDA5807_read_reg(uchar *reg_buf)
{
I2C_start();

// 收音模塊讀取操作
I2C_write_byte(0x21);

// 寄存器連續讀操作
reg_buf[0] = I2C_read_byte(I2C_ACK);
reg_buf[1] = I2C_read_byte(I2C_ACK);
reg_buf[2] = I2C_read_byte(I2C_ACK);
reg_buf[3] = I2C_read_byte(I2C_NACK);

I2C_stop();
}

/**********************************************************

寫24c02子函數

**********************************************************/
void a24c02_write(void)
{
I2C_start();//啟動總線
I2C_write_byte(0xa0);//發送器件地址
I2C_write_byte(0x00);////發送器件子地址
I2C_write_byte(RDA_reg_data[2]);
I2C_write_byte(RDA_reg_data[3]);
I2C_stop();
}
/**********************************************************

讀24c02子函數

**********************************************************/
void a24c02_read(void)
{
I2C_start();//啟動總線
I2C_write_byte(0xa0);//發送器件地址
I2C_write_byte(0x00);////發送器件子地址
I2C_start();//啟動總線
I2C_write_byte(0xa1);//發送器件讀地址
RDA_reg_data[2] = I2C_read_byte(I2C_ACK);
RDA_reg_data[3] = I2C_read_byte(I2C_NACK);
I2C_stop();
}
/**********************************************************

模塊上電初始化子函數

**********************************************************/
void RDA5807_power(void)
{
delayms(50);

// 發送軟件復位指令
RDA_reg_data[0] = 0x00;
RDA_reg_data[1] = 0x02;
RDA5807_write_reg();

delayms(10);

// 收音模塊默認參數
RDA_reg_data[0] = 0xd0;
RDA_reg_data[1] = 0x01;
a24c02_read();//讀取保存的頻率
RDA_reg_data[3] += 0x10; //調諧啟用
RDA5807_write_reg();
}

/**********************************************************

頻率計算子函數

**********************************************************/
void show_frequency(void)
{
unsigned int temp;
temp = (RDA_reg_data[2]*256)+(RDA_reg_data[3]&0xc0); //計算
temp = temp>>6;
frequency = (unsigned long)(100*temp+87000)/100;
}

/**********************************************************

功能描述：收音模塊自動尋臺模式

**********************************************************/
void RDA5807_FM_seek(void)
{
uint chan;
uchar reg_data[4] = {0x00, 0x00, 0x00, 0x00};

RDA_reg_data[3] &= ~(1 << 4); //調諧禁用

// 內部自動尋臺使能
RDA_reg_data[0] |= (1 << 0); //搜索位置1
RDA5807_write_reg();

// 等待STC 標志置位
while(0 == (reg_data[0] & 0x40))
{
delayms(10);
// 讀取內部狀態
RDA5807_read_reg(reg_data);
}
// 獲取當前工作頻點
chan = reg_data[0] & 0x03;
chan = reg_data[1] | (chan << 8);
chan = chan << 6;

// 保存當前工作頻點
RDA_reg_data[2] = (chan >> 8) & 0xff;
RDA_reg_data[3] = (chan & 0xff);
a24c02_write();//保存當前頻率
}

/************************************************************************
led顯示
************************************************************************/
sbit ge=P2^4;
sbit shi=P2^5;
sbit bai=P2^6;
sbit qan=P2^7;
#define LED P0
//unsigned char tab[]={ 0x3f,0x30,0x6d,0x79,0x72,0x5b,0x5f,0x31,0x7f,0x7b,0x40};//共陰
//0, 1, 2 3 4 5 6 7 8 9
unsigned char tab[]={ 0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};//共陽
//0, 1, 2 3 4 5 6 7 8 9

/************************************************************************/
void Led_Display(unsigned long i) //顯示函數
{
LED = tab[i/1000];
qan = 1;
if((i/1000)>0)
{qan = 0;}
bai = 1;shi = 1;ge = 1;
delayms(1);

LED = tab[(i%1000)/100];
qan = 1;bai = 0;shi = 1;ge = 1;
delayms(1);

LED = 0x7f&tab[((i%1000)%100)/10];//加個小數點
qan = 1;bai = 1;shi = 0;ge = 1;
delayms(1);

LED = tab[(((i%1000)%100)%10)/1];
qan = 1; bai = 1;shi = 1;ge = 0;
delayms(1);
}

/**********************************************************

音量顯示子函數

**********************************************************/
void show_volume(void)
{
uchar i,vol;
vol=RDA_reg_data[7] & 0x0f; //取音量值
i=90;
while(i--)
{Led_Display(vol*10);}
}

/**********************************************************

主函數

**********************************************************/
void main(void)
{
initUart();
IT0=1; //INT0為負邊沿觸發, (1：負邊沿觸發，0：低電平觸發)
EX0=1; //外部中斷INT0開, (1：開， 0：關 )
EA=1; //開所有中斷
CodeTemp=0; //初始化紅外編碼字節緩存變量
Delay();

RDA5807_power();

show_frequency();
while(1)
{
//紅外遙控檢測
if(IRcode[0]==0x00)
{
IRcode[0]=0x1a;
if(IRcode[2]==0x1e)
{
RDA_reg_data[0] &= ~(1 << 1); //向下搜索
RDA5807_FM_seek();
show_frequency();//更新頻率
}
if(IRcode[2]==0x0e)
{
RDA_reg_data[0] |= (1 << 1); //向上搜索
RDA5807_FM_seek();
show_frequency();//更新頻率
}
if(IRcode[2]==0x4d)
{
if((RDA_reg_data[7] & 0x0f) < 0x0f)
{
RDA_reg_data[0] = 0xd0;
RDA_reg_data[1] = 0x01;
RDA_reg_data[3] &= ~(1 << 4);

RDA_reg_data[7]++; // 音量遞增
RDA5807_write_reg();
}
show_volume(); //顯示音量
}
if(IRcode[2]==0x1a)
{
if((RDA_reg_data[7] & 0x0f) > 0x00)
{
RDA_reg_data[0] = 0xd0;
RDA_reg_data[1] = 0x01;
RDA_reg_data[3] &= ~(1 << 4);

RDA_reg_data[7]--; // 音量遞減
RDA5807_write_reg();
}
show_volume(); //顯示音量
}
}
// 紅外，，

if(K1 == 0)
{
delayms(20);
if(K1 == 0)
{
while(K1 == 0);
RDA_reg_data[0] |= (1 << 1); //向上搜索
RDA5807_FM_seek();
show_frequency();//更新頻率
}
}

if(K2 == 0)
{
delayms(20);
if(K2 == 0)
{
while(K2 == 0);
RDA_reg_data[0] &= ~(1 << 1); //向下搜索
RDA5807_FM_seek();
show_frequency();//更新頻率
}
}

if(K3 == 0)
{
delayms(20);
if(K3 == 0)
{
while(K3 == 0);
if((RDA_reg_data[7] & 0x0f) < 0x0f)
{
RDA_reg_data[0] = 0xd0;
RDA_reg_data[1] = 0x01;
RDA_reg_data[3] &= ~(1 << 4);

RDA_reg_data[7]++; // 音量遞增
RDA5807_write_reg();
}
show_volume(); //顯示音量
}
}

if(K4 == 0)
{
delayms(20);
if(K4 == 0)
{
while(K4 == 0);
if((RDA_reg_data[7] & 0x0f) > 0x00)
{
RDA_reg_data[0] = 0xd0;
RDA_reg_data[1] = 0x01;
RDA_reg_data[3] &= ~(1 << 4);

RDA_reg_data[7]--; // 音量遞減
RDA5807_write_reg();
}
show_volume(); //顯示音量
}
}
Led_Display(frequency);//顯示頻率
}
}

/*********************************************************/

相關文章