单片机教程网

电脑版
提示:原网页已由神马搜索转码, 内容由www.51hei.com提供.
查看:5044|回复: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.                 
复制代码

评分

黑币 +50
收起理由
+ 50
共享资料的黑币奖励！

查看全部评分

ID:656419发表于 2022-6-3 13:58来自手机|显示全部楼层
这个是8m的吗？
ID:163139发表于 2024-2-1 13:27|显示全部楼层
这个是8m的吗？

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

Powered by 单片机教程网