21ic电子技术开发论坛 › 单片机与嵌入式系统 › 新唐MCU › 自制FM收音机
返回列表 发新帖我要提问

[应用方案] 自制FM收音机

[复制链接]
1337|4
 楼主| Bermanrep 发表于 2016-2-25 22:24 | 显示全部楼层 |阅读模式
FM收音机, code, rc, include, unsigned

单片机控制的哦，用到了24c02，可以掉电存台，4位数码管显示，自动搜索，音量调整，rda5807收音模块，2822音频放大，红外遥控的。
下面是今天6月24日搞出来的程序
复制
  1. #include <reg52.h>
    

  2. #include <intrins.h>
    

  3. #include "IIC.h"
    

  4. #include "delay.h"
    


  5. 

  6. sbit K1 = P2^3;//
    

  7. sbit K2 = P2^2;//
    

  8. sbit K3 = P2^1;//
    

  9. sbit K4 = P2^0;//
    


  10. 


  11. 

  12. #define uchar unsigned char
    

  13. #define uint unsigned int
    


  14. 

  15. uchar data IRcode[4]; //定义一个4字节的数组用来存储代码
    

  16. uchar CodeTemp; //编码字节缓存变量
    

  17. sbit IRsignal=P3^2; //红外接收头OUT端直接连P3.2(INT0)
    


  18. 

  19. uchar chanl=0x00;
    


  20. 

  21. unsigned long frequency;
    


  22. 

  23. // RDA5807 寄存器
    

  24. unsigned char RDA_reg_data[8] =
    

  25. {
    

  26. 0xd0,0x00, // 02H
    

  27. 0x00,0x00, // 03H
    

  28. 0x00,0x40, // 04H
    

  29. 0x90,0x88, // 05H
    

  30. };
    


  31. 

  32. char code reserve[3]_at_ 0x3b; //保留0x3b开始的3个字节
    


  33. 

  34.  
    


  35. 

  36. /*
    

  37. 红外部分
    

  38. */
    

  39. /************************中断0解码服务子程序**********************/
    

  40. void int0(void) interrupt 0 using 2
    

  41. {
    

  42. uchar i,j,k; //循环变量
    

  43. EA=0;
    

  44. for(k=0;k<10;k++)
    

  45. {Delay0_9ms();
    

  46. if (IRsignal==1) //如果0.9ms后IRsignal=1，说明不是引导码
    

  47. {k=10;break;}
    

  48. else if(k==9) //如果持续了10×0.9ms=9ms的低电平，说明是引导码
    

  49. {while(IRsignal==0);
    

  50. Delay4_5ms(); //跳过持续4.5ms的高电平
    

  51. for(i=0;i<4;i++) //分别读取4个字节
    

  52. {for(j=1;j<=8;j++) //每个字节8个bit的判断
    

  53. { while(IRsignal==0); //等待上升沿
    

  54. Delay0_9ms(); //从上升沿那一时刻开始延时0.9ms，再判断IRsignal
    

  55. if(IRsignal==1) //如果IRsignal是"1",则向右移入一位"1"
    

  56. {Delay1ms();
    

  57. CodeTemp=CodeTemp|0x80;
    

  58. if(j<8) CodeTemp=CodeTemp>>1;
    

  59. }
    

  60. else
    

  61. if(j<8)CodeTemp=CodeTemp>>1;//如果IRsignal是"0",则向右移一位，自动补"0"
    

  62. }
    

  63. IRcode[i]=CodeTemp;
    

  64. CodeTemp=0;
    

  65. }
    

  66. for(i=0;i<4;i++) //通过串口将代码发出
    

  67. {
    

  68. SBUF=IRcode[i];
    

  69. while(!TI); //等待一个字节发送完毕
    

  70. TI=0;
    

  71. }
    

  72. Delay();
    

  73. }
    

  74. }
    

  75. EA=1;
    

  76. }
    

  77. /***********************串口初始化程序*********************/
    

  78. void initUart(void)
    

  79. {
    

  80. TMOD|=0x20;
    

  81. SCON=0x50;
    

  82. PCON|=0x80;
    

  83. TH1=0xff; //57600bps [url=home.php?mod=space&uid=72445]@[/url] 11.0592MHz
    

  84. TL1=0xff;
    

  85. TR1=1;
    

  86. }
    


  87. 


  88. 

  89. /**********************************************************
    


  90. 

  91. 连续写寄存器子函数
    


  92. 

  93. **********************************************************/
    

  94. void RDA5807_write_reg(void)
    

  95. {
    

  96. uchar i;
    


  97. 

  98. I2C_start();
    

  99. // 收音模块写入操作
    

  100. I2C_write_byte(0x20);
    

  101. // 寄存器连续写操作
    

  102. for(i=0; i<8; i++)
    

  103. {
    

  104. I2C_write_byte(RDA_reg_data[i]);
    

  105. }
    

  106. I2C_stop();
    

  107. }
    


  108. 

  109. /**********************************************************
    


  110. 

  111. 连续读寄存器子函数
    


  112. 

  113. **********************************************************/
    

  114. void RDA5807_read_reg(uchar *reg_buf)
    

  115. {
    

  116. I2C_start();
    


  117. 

  118. // 收音模块读取操作
    

  119. I2C_write_byte(0x21);
    


  120. 

  121. // 寄存器连续读操作
    

  122. reg_buf[0] = I2C_read_byte(I2C_ACK);
    

  123. reg_buf[1] = I2C_read_byte(I2C_ACK);
    

  124. reg_buf[2] = I2C_read_byte(I2C_ACK);
    

  125. reg_buf[3] = I2C_read_byte(I2C_NACK);
    


  126. 

  127. I2C_stop();
    

  128. }
    


  129. 

  130. /**********************************************************
    


  131. 

  132. 写24c02子函数
    


  133. 

  134. **********************************************************/
    

  135. void a24c02_write(void)
    

  136. {
    

  137. I2C_start();//启动总线
    

  138. I2C_write_byte(0xa0);//发送器件地址
    

  139. I2C_write_byte(0x00);////发送器件子地址
    

  140. I2C_write_byte(RDA_reg_data[2]);
    

  141. I2C_write_byte(RDA_reg_data[3]);
    

  142. I2C_stop();
    

  143. }


回复

收藏 举报

相关帖子
 楼主| Bermanrep 发表于 2016-2-25 22:25 | 显示全部楼层
复制
  1. /**********************************************************
    


  2. 

  3. 读24c02子函数
    


  4. 

  5. **********************************************************/
    

  6. void a24c02_read(void)
    

  7. {
    

  8. I2C_start();//启动总线
    

  9. I2C_write_byte(0xa0);//发送器件地址
    

  10. I2C_write_byte(0x00);////发送器件子地址
    

  11. I2C_start();//启动总线
    

  12. I2C_write_byte(0xa1);//发送器件读地址
    

  13. RDA_reg_data[2] = I2C_read_byte(I2C_ACK);
    

  14. RDA_reg_data[3] = I2C_read_byte(I2C_NACK);
    

  15. I2C_stop();
    

  16. }
    

  17. /**********************************************************
    


  18. 

  19. 模块上电初始化子函数
    


  20. 

  21. **********************************************************/
    

  22. void RDA5807_power(void)
    

  23. {
    

  24. delayms(50);
    


  25. 

  26. // 发送软件复位指令
    

  27. RDA_reg_data[0] = 0x00;
    

  28. RDA_reg_data[1] = 0x02;
    

  29. RDA5807_write_reg();
    


  30. 

  31. delayms(10);
    


  32. 

  33. // 收音模块默认参数
    

  34. RDA_reg_data[0] = 0xd0;
    

  35. RDA_reg_data[1] = 0x01;
    

  36. a24c02_read();//读取保存的频率
    

  37. RDA_reg_data[3] += 0x10; //调谐启用
    

  38. RDA5807_write_reg();
    

  39. }
    


  40. 

  41. /**********************************************************
    


  42. 

  43. 频率计算子函数
    


  44. 

  45. **********************************************************/
    

  46. void show_frequency(void)
    

  47. {
    

  48. unsigned int temp;
    

  49. temp = (RDA_reg_data[2]*256)+(RDA_reg_data[3]&0xc0); //计算
    

  50. temp = temp>>6;
    

  51. frequency = (unsigned long)(100*temp+87000)/100;
    

  52. }
    


  53. 


  54. 

  55. /**********************************************************
    


  56. 

  57. 功能描述：收音模块自动寻台模式
    


  58. 

  59. **********************************************************/
    

  60. void RDA5807_FM_seek(void)
    

  61. {
    

  62. uint chan;
    

  63. uchar reg_data[4] = {0x00, 0x00, 0x00, 0x00};
    


  64. 

  65. RDA_reg_data[3] &= ~(1 << 4); //调谐禁用
    


  66. 

  67. // 内部自动寻台使能
    

  68. RDA_reg_data[0] |= (1 << 0); //搜索位置1
    

  69. RDA5807_write_reg();
    


  70. 

  71. // 等待STC 标志置位
    

  72. while(0 == (reg_data[0] & 0x40))
    

  73. {
    

  74. delayms(10);
    

  75. // 读取内部状态
    

  76. RDA5807_read_reg(reg_data);
    

  77. }
    

  78. // 获取当前工作频点
    

  79. chan = reg_data[0] & 0x03;
    

  80. chan = reg_data[1] | (chan << 8);
    

  81. chan = chan << 6;
    


  82. 

  83. // 保存当前工作频点
    

  84. RDA_reg_data[2] = (chan >> 8) & 0xff;
    

  85. RDA_reg_data[3] = (chan & 0xff);
    

  86. a24c02_write();//保存当前频率
    

  87. }
    


  88. 

  89. /************************************************************************
    

  90. led显示
    

  91. ************************************************************************/
    

  92. sbit ge=P2^4;
    

  93. sbit shi=P2^5;
    

  94. sbit bai=P2^6;
    

  95. sbit qan=P2^7;
    

  96. #define LED P0
    

  97. //unsigned char tab[]={ 0x3f,0x30,0x6d,0x79,0x72,0x5b,0x5f,0x31,0x7f,0x7b,0x40};//共阴
    

  98. //0, 1, 2 3 4 5 6 7 8 9
    

  99. unsigned char tab[]={ 0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};//共阳
    

  100. //0, 1, 2 3 4 5 6 7 8 9
回复

收藏 举报

 楼主| Bermanrep 发表于 2016-2-25 22:25 | 显示全部楼层
复制
  1. /************************************************************************/
    

  2. void Led_Display(unsigned long i) //显示函数
    

  3. {
    

  4. LED = tab[i/1000];
    

  5. qan = 1;
    

  6. if((i/1000)>0)
    

  7. {qan = 0;}
    

  8. bai = 1;shi = 1;ge = 1;
    

  9. delayms(1);
    


  10. 

  11. LED = tab[(i%1000)/100];
    

  12. qan = 1;bai = 0;shi = 1;ge = 1;
    

  13. delayms(1);
    


  14. 

  15. LED = 0x7f&tab[((i%1000)%100)/10];//加个小数点
    

  16. qan = 1;bai = 1;shi = 0;ge = 1;
    

  17. delayms(1);
    


  18. 

  19. LED = tab[(((i%1000)%100)%10)/1];
    

  20. qan = 1; bai = 1;shi = 1;ge = 0;
    

  21. delayms(1);
    

  22. }
    


  23. 

  24.  
    


  25. 


  26. 

  27. /**********************************************************
    


  28. 

  29. 音量显示子函数
    


  30. 

  31. **********************************************************/
    

  32. void show_volume(void)
    

  33. {
    

  34. uchar i,vol;
    

  35. vol=RDA_reg_data[7] & 0x0f; //取音量值
    

  36. i=90;
    

  37. while(i--)
    

  38. {Led_Display(vol*10);}
    

  39. }
    


  40. 

  41. /**********************************************************
    


  42. 

  43. 主函数
    


  44. 

  45. **********************************************************/
    

  46. void main(void)
    

  47. {
    

  48. initUart();
    

  49. IT0=1; //INT0为负边沿触发, (1：负边沿触发，0：低电平触发)
    

  50. EX0=1; //外部中断INT0开, (1：开， 0：关 )
    

  51. EA=1; //开所有中断
    

  52. CodeTemp=0; //初始化红外编码字节缓存变量
    

  53. Delay();
    


  54. 

  55.  
    


  56. 

  57. RDA5807_power();
    


  58. 

  59. show_frequency();
    

  60. while(1)
    

  61. {
    

  62. //红外遥控检测
    

  63. if(IRcode[0]==0x00)
    

  64. {
    

  65. IRcode[0]=0x1a;
    

  66. if(IRcode[2]==0x1e)
    

  67. {
    

  68. RDA_reg_data[0] &= ~(1 << 1); //向下搜索
    

  69. RDA5807_FM_seek();
    

  70. show_frequency();//更新频率
    

  71. }
    

  72. if(IRcode[2]==0x0e)
    

  73. {
    

  74. RDA_reg_data[0] |= (1 << 1); //向上搜索
    

  75. RDA5807_FM_seek();
    

  76. show_frequency();//更新频率
    

  77. }
    

  78. if(IRcode[2]==0x4d)
    

  79. {
    

  80. if((RDA_reg_data[7] & 0x0f) < 0x0f)
    

  81. {
    

  82. RDA_reg_data[0] = 0xd0;
    

  83. RDA_reg_data[1] = 0x01;
    

  84. RDA_reg_data[3] &= ~(1 << 4);
    


  85. 

  86. RDA_reg_data[7]++; // 音量递增
    

  87. RDA5807_write_reg();
    

  88. }
    

  89. show_volume(); //显示音量
    

  90. }
    

  91. if(IRcode[2]==0x1a)
    

  92. {
    

  93. if((RDA_reg_data[7] & 0x0f) > 0x00)
    

  94. {
    

  95. RDA_reg_data[0] = 0xd0;
    

  96. RDA_reg_data[1] = 0x01;
    

  97. RDA_reg_data[3] &= ~(1 << 4);
    


  98. 

  99. RDA_reg_data[7]--; // 音量递减
    

  100. RDA5807_write_reg();
    

  101. }
    

  102. show_volume(); //显示音量
    

  103. }
    

  104. }
    

  105. // 红外，，
    


  106. 

  107. if(K1 == 0)
    

  108. {
    

  109. delayms(20);
    

  110. if(K1 == 0)
    

  111. {
    

  112. while(K1 == 0);
    

  113. RDA_reg_data[0] |= (1 << 1); //向上搜索
    

  114. RDA5807_FM_seek();
    

  115. show_frequency();//更新频率
    

  116. }
    

  117. }
    


  118. 

  119. if(K2 == 0)
    

  120. {
    

  121. delayms(20);
    

  122. if(K2 == 0)
    

  123. {
    

  124. while(K2 == 0);
    

  125. RDA_reg_data[0] &= ~(1 << 1); //向下搜索
    

  126. RDA5807_FM_seek();
    

  127. show_frequency();//更新频率
    

  128. }
    

  129. }
    


  130. 

  131. if(K3 == 0)
    

  132. {
    

  133. delayms(20);
    

  134. if(K3 == 0)
    

  135. {
    

  136. while(K3 == 0);
    

  137. if((RDA_reg_data[7] & 0x0f) < 0x0f)
    

  138. {
    

  139. RDA_reg_data[0] = 0xd0;
    

  140. RDA_reg_data[1] = 0x01;
    

  141. RDA_reg_data[3] &= ~(1 << 4);
    


  142. 

  143. RDA_reg_data[7]++; // 音量递增
    

  144. RDA5807_write_reg();
    

  145. }
    

  146. show_volume(); //显示音量
    

  147. }
    

  148. }
    


  149. 

  150. if(K4 == 0)
    

  151. {
    

  152. delayms(20);
    

  153. if(K4 == 0)
    

  154. {
    

  155. while(K4 == 0);
    

  156. if((RDA_reg_data[7] & 0x0f) > 0x00)
    

  157. {
    

  158. RDA_reg_data[0] = 0xd0;
    

  159. RDA_reg_data[1] = 0x01;
    

  160. RDA_reg_data[3] &= ~(1 << 4);
    


  161. 

  162. RDA_reg_data[7]--; // 音量递减
    

  163. RDA5807_write_reg();
    

  164. }
    

  165. show_volume(); //显示音量
    

  166. }
    

  167. }
    

  168. Led_Display(frequency);//显示频率
    

  169. }
    

  170. }
回复

收藏 举报

deviceplugs 发表于 2016-2-26 21:54 | 显示全部楼层
有LCD显示吗，能收多少个台？
回复

收藏 举报

500days 发表于 2016-2-27 20:39 | 显示全部楼层
调台的话是用什么方式，按键吗
回复

收藏 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Bermanrep

22

主题

132

帖子

2

粉丝
快速回复 在线客服 返回列表 返回顶部