找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 7654|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

AVR單片機ATmega8/16內(nèi)部晶振校準(zhǔn) 源程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:882468 發(fā)表于 2021-2-3 14:14 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
AVR單片機ATmega8/16內(nèi)部晶振校準(zhǔn)，本例程適用于內(nèi)部8M  波特率38400。使用方法：

下載到單片機后打開串口（波特率38400）自動發(fā)送十六進(jìn)制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. //發(fā)送一個字符
  22. void PutChar(char c)
  23. {        
  24.         UDR=c;
  25.         while(!(UCSRA&_BV(UDRE)));
  26. }

  28. void tx(char *s) //發(fā)送一個字符串
  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;//氣閥，測試開關(guān)
  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.                         
復(fù)制代碼

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:656419 發(fā)表于 2022-6-3 13:58 來自手機 | 只看該作者
這個是8m的嗎？
回復(fù)

使用道具 舉報

板凳
ID:163139 發(fā)表于 2024-2-1 13:27 | 只看該作者
這個是8m的嗎？
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表