设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › AVR单片机 › AVR单片机ATmega8/16内部晶振校准 源程序
返回列表 发新帖
查看: 3336|回复: 2
打印 上一主题 下一主题
收起左侧

AVR单片机ATmega8/16内部晶振校准 源程序

[复制链接]
跳转到指定楼层
楼主
ID:882468 发表于 2021-2-3 14:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
AVR单片机ATmega8/16内部晶振校准，本例程适用于内部8M  波特率38400。使用方法：

下载到单片机后打开串口（波特率38400）自动发送十六进制55，成功时串口收到OK指令。

单片机源程序如下:
  1. #define F_CPU 4000000UL
  2. #include <avr/io.h>
  3. #include <string.h>
  4. #include <util/delay.h>
  5. #include <avr/interrupt.h>
  6. #define INT8U unsigned char
  7. #define INT16U unsigned int

  9. INT8U flag=0,flag1=0;
  10. INT8U DataBuf;

  12. //初始化
  13. void Init_USART()
  14. {
  15.         UCSRB=_BV(RXEN)|_BV(TXEN)|_BV(RXCIE);
  16.         UCSRC=_BV(URSEL)|_BV(UCSZ1)|_BV(UCSZ0);
  17.         UBRRL=(F_CPU/38400/8-1)%256;
  18.         UBRRH=(F_CPU/38400/8-1)/256;
  19.         UCSRA|=_BV(U2X);
  20. }
  21. //发送一个字符
  22. void PutChar(char c)
  23. {        
  24.         UDR=c;
  25.         while(!(UCSRA&_BV(UDRE)));
  26. }

  28. void tx(char *s) //发送一个字符串
  29. {
  30.         INT8U i=0;
  31.         while(s[i]!='\0') PutChar(s[i++]);
  32. }
  33. void EepromWrite(INT16U uiAddress,INT8U ucData)
  34. {
  35.         while(EECR&(1<<EEWE));
  36.         EEAR=uiAddress;
  37.         EEDR=ucData;
  38.         EECR|=(1<<EEMWE);
  39.         EECR|=(1<<EEWE);
  40. }
  41. /******************************************/
  42. /******************************************/
  43. INT8U EepromRead(INT16U uiAddress)
  44. {
  45.         while(EECR&(1<<EEWE));
  46.         EEAR=uiAddress;
  47.         EECR|=(1<<EERE);
  48.         return (EEDR);
  49. }


  52. int main()
  53. {
  54.         DDRC=0xFF;// 输出低
  55.         PORTC=0x00;//气阀，测试开关
  56.         
  57.         DDRB=0x00;//下载输入弱上拉
  58.         PORTB=0xFF;//传感器
  59.         
  60.         DDRD=0x02;// D0输入上拉D1输出高
  61.         PORTD=0xFF;//按键  检测
  62.         Init_USART();
  63.         sei();
  64.         OSCCAL=0x00;
  65.         /**************** 晶振修正 **************************
  66.         DataBuf=EepromRead(0x0F);
  67.         PutChar(DataBuf);
  68.         if(DataBuf!=0xFF)
  69.         OSCCAL=DataBuf;
  70.         _delay_ms(500);
  71.         ***************************************************/                                       
  72.         while (1)
  73.         {
  74.                                        
  75.         }
  76. }
  77. ISR (USART_RXC_vect)
  78. {
  79.         static INT8U i=0;
  80.         INT8U a;
  81.         a=UDR;
  82.                
  83.         if(a==0x55)
  84.         {
  85.                 //PutChar(a);
  86.                 i++;
  87.                 if (i==50)
  88.                 {
  89.                         UCSRB&=0x7F;
  90.                         EepromWrite(0x0F,OSCCAL);
  91.                         tx("OK");
  92.                 }
  93.         }
  94.         else
  95.         OSCCAL++;        
  96. }
  97. /*串口接受中断
  98. ISR (USART_RXC_vect)
  99. {
  100.         static INT8U i=0;
  101.         INT8U a;
  102.         a=UDR;
  103.         PutChar(a);        
  104.         if(a=0x55)
  105.         {
  106.                 PutChar('0');
  107.                 i++;
  108.                 if (i==50)
  109.                 {                        
  110.                         UCSRB&=0x7F;                        
  111.                         EepromWrite(0x03,a);
  112.                         tx("OK");
  113.                 }
  114.         }
  115.         else
  116.         OSCCAL++;
  117. }*/
  118.                         
复制代码

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:656419 发表于 2022-6-3 13:58 来自手机 | 只看该作者
这个是8m的吗？
回复

使用道具 举报

板凳
ID:163139 发表于 2024-2-1 13:27 | 只看该作者
这个是8m的吗？
回复

使用道具 举报

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

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表