標(biāo)題: 求助 數(shù)碼管做個簡單單片機(jī)時鐘的秒數(shù)問題 [打印本頁]
作者: imlwg    時間: 2018-2-22 16:03
標(biāo)題: 求助 數(shù)碼管做個簡單單片機(jī)時鐘的秒數(shù)問題
本帖最后由 imlwg 于 2018-2-22 16:16 編輯

德飛萊hc6800-es v2.0單片機(jī)，八位數(shù)碼管做個簡單時鐘，1毫秒中斷，運(yùn)行后發(fā)現(xiàn)一秒的時間和現(xiàn)實相差太多，以下是代碼，請教各位大蝦是哪兒出了問題。

  2. #include<reg52.h>
  3. #include<intrins.h>

  5. #define duanxian P0

  7. sbit led138c=P2^4;
  8. sbit led138b=P2^3;
  9. sbit led138a=P2^2;
  10. unsigned char  duan[11]= {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x80};

  12. void timeinit();
  13. void displayinit();
  14.   void display();
  15.   void dely(unsigned int dat){while(dat--);}


  18. unsigned long int cnt=0;
  19. unsigned int sec=0,min=0,hour=0;
  20. unsigned char temp,b=0x00;

  22. void main()
  23. {        
  24.            timeinit();         
  25.     displayinit();
  26.    
  27.     while(1);
  28.         

  30.   
  31.   }
  32.   
  33.   void timeinit()
  34.   {
  35.           TMOD |=0X01;
  36.         TH0=0XFC;
  37.         TL0=0X18;
  38.         ET0=1;
  39.         EA=1;
  40.         TR0=1;
  41.   }        
  42.   
  43.   void displayinit()
  44.   {
  45.           unsigned int n=0;
  46.          do
  47.                 {        for(n=0;n<8;n++)
  48.                     {
  49.                     switch(n)
  50.                         {
  51.                                    case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[0];break;
  52.                                    case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[0];break;
  53.                               case(2): led138c=0;led138b=1;led138a=0;duanxian=0x80;break;
  54.                     case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[0];break;
  55.                     case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[0];break;
  56.                     case(5): led138c=1;led138b=0;led138a=1;duanxian=0x80;break;
  57.                     case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[0];break;
  58.                     case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[0];break;
  59.                 };
  60.                dely(100);
  61.                duanxian=0x00;
  62.                    };
  63.             }while(TF0==0);
  64.   }

  66.   void time0() interrupt 1
  67.   {
  68.    
  69.           TH0=0XFC;
  70.         TL0=0X18;
  71.         cnt++;
  72.         display();
  73.         if(cnt==100)
  74.         {
  75.                 cnt=0;
  76.                 sec++;
  77.                 temp=duan[10];
  78.             duan[10]=b;
  79.             b=temp;

  81.         };
  82.         if(sec==60){sec=0;min++;};
  83.         if(min==60){min=0;hour++;}
  84.         if(hour==24)hour=0;
  85.   }

  87.   void display()
  88.   {
  89.   
  90.         unsigned int a;
  91.    for(a=0;a<8;a++)
  92.         {
  93.       switch(a)
  94.           {case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[sec%10];break;
  95.            case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[sec/10%10];break;
  96.            case(2): led138c=0;led138b=1;led138a=0;duanxian=duan[10];break;
  97.            case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[min%10];break;
  98.            case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[min/10%10];break;
  99.            case(5):led138c=1;led138b=0;led138a=1;duanxian=duan[10];break;
  100.            case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[hour%10];break;
  101.            case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[hour/10%10];break;
  102.            };
  103.           dely(100);
  104.            duanxian=0x00;
  105.            };
  106.          
  107.            

  109.   }
復(fù)制代碼


HC6800-ES V2.0.pdf

404.98 KB, 下載次數(shù): 6
作者: SDD123    時間: 2018-2-22 17:03
試試 TL0=0X66;
作者: wulin    時間: 2018-2-22 17:51
你的中斷周期設(shè)置1ms，可是中斷服務(wù)任務(wù)內(nèi)容需要近8ms才能完成，時間怎么可能正確？
作者: yzwzfyz    時間: 2018-2-22 18:19
普通晶振，如果程序?qū)懙煤�，日差可以做到一秒之�?nèi)。
樓主用1ms中斷，一般程序可以做到是日差是：
一天有86400000個1ms，每次中斷會有±0.5時基脈沖的誤差。
例：用12M，標(biāo)準(zhǔn)51的時基是1us。
則不可控日誤差是：86400000*1us=86.4秒。
而要達(dá)成日差一秒之內(nèi)，必須改變中斷參數(shù)，初學(xué)者能做到百秒以內(nèi)也可以了。
作者: imlwg    時間: 2018-2-23 19:40
wulin 發(fā)表于 2018-2-22 17:51
你的中斷周期設(shè)置1ms，可是中斷服務(wù)任務(wù)內(nèi)容需要近8ms才能完成，時間怎么可能正確？

謝謝，你說的很對，后來我把顯示放在了主程序while循環(huán)中，秒顯示改善很多，但還不夠精準(zhǔn)，大約一分鐘慢了一秒半的樣子。還請教是哪的問題。

  2. #include<reg52.h>
  3. #include<intrins.h>

  5. #define duanxian P0

  7. sbit led138c=P2^4;
  8. sbit led138b=P2^3;
  9. sbit led138a=P2^2;
  10. unsigned char  duan[11]= {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x80};

  12. void timeinit();
  13. void displayinit();
  14.   void display();
  15.   void dely(unsigned int dat){while(dat--);}


  18. unsigned long int cnt=0;
  19. unsigned int sec=0,min=0,hour=0;
  20. unsigned char temp,b=0x00;

  22. void main()
  23. {       
  24.            timeinit();         
  25.     displayinit();
  26.    
  27.     while(1){        display();};
  28.        

  30.   
  31.   }
  32.   
  33.   void timeinit()
  34.   {
  35.           TMOD |=0X01;
  36.         TH0=0XFC;
  37.         TL0=0X18;
  38.         ET0=1;
  39.         EA=1;
  40.         TR0=1;
  41.   }       
  42.   
  43.   void displayinit()
  44.   {
  45.           unsigned int n=0;
  46.          do
  47.                 {        for(n=0;n<8;n++)
  48.                     {
  49.                     switch(n)
  50.                         {
  51.                                    case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[0];break;
  52.                                    case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[0];break;
  53.                               case(2): led138c=0;led138b=1;led138a=0;duanxian=0x80;break;
  54.                     case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[0];break;
  55.                     case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[0];break;
  56.                     case(5): led138c=1;led138b=0;led138a=1;duanxian=0x80;break;
  57.                     case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[0];break;
  58.                     case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[0];break;
  59.                 };
  60.                dely(100);
  61.                duanxian=0x00;
  62.                    };
  63.             }while(TF0==0);
  64.   }

  66.   void time0() interrupt 1
  67.   {
  68.    
  69.           TH0=0XFC;
  70.         TL0=0X18;
  71.         cnt++;
  72. //        display();
  73.         if(cnt==1000)
  74.         {
  75.                 cnt=0;
  76.                 sec++;
  77.                 temp=duan[10];
  78.             duan[10]=b;
  79.             b=temp;

  81.         };
  82.         if(sec==60){sec=0;min++;};
  83.         if(min==60){min=0;hour++;}
  84.         if(hour==24)hour=0;
  85.   }

  87.   void display()
  88.   {
  89.   
  90.         unsigned int a;
  91.    for(a=0;a<8;a++)
  92.         {
  93.       switch(a)
  94.           {case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[sec%10];break;
  95.            case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[sec/10%10];break;
  96.            case(2): led138c=0;led138b=1;led138a=0;duanxian=duan[10];break;
  97.            case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[min%10];break;
  98.            case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[min/10%10];break;
  99.            case(5):led138c=1;led138b=0;led138a=1;duanxian=duan[10];break;
  100.            case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[hour%10];break;
  101.            case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[hour/10%10];break;
  102.            };
  103.           dely(100);
  104.            duanxian=0x00;
  105.            };
  106.           
  107.           

  109.   }
復(fù)制代碼

作者: imlwg    時間: 2018-2-23 19:50
yzwzfyz 發(fā)表于 2018-2-22 18:19
普通晶振，如果程序?qū)懙煤�，日差可以做到一秒之�?nèi)。
樓主用1ms中斷，一般程序可以做到是日差是：
一天有8 ...

謝謝，這樣的話用中斷做時鐘微調(diào)中斷參數(shù)只有用實踐來檢驗程序的可用性了，感覺心里怪怪的。用ds1302能做精準(zhǔn)嗎?我目前還沒學(xué)到1302.
作者: imlwg    時間: 2018-2-23 20:31
中斷改為10毫秒效果好了很多。
作者: wulin    時間: 2018-2-24 12:02
本帖最后由 wulin 于 2018-2-24 15:35 編輯
imlwg 發(fā)表于 2018-2-23 19:50
謝謝，這樣的話用中斷做時鐘微調(diào)中斷參數(shù)只有用實踐來檢驗程序的可用性了，感覺心里怪怪的。用ds1302能做 ...

定時器用8位自動重裝模式，周期250us，調(diào)整TH0、TL0值粗調(diào)，調(diào)整中斷計數(shù)微調(diào)，精度可以控制在日秒內(nèi)。
#include<reg52.h>
#include<intrins.h>
#define duanxian P0
sbit led138c=P2^4;
sbit led138b=P2^3;
sbit led138a=P2^2;
unsigned char  duan[11]= {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x80};
void timeinit();
void displayinit();
void display();
unsigned int cnt250us=0;
unsigned char sec=0,min=0,hour=12;
unsigned char temp,b=0x00;
bit ms_flag=0;
//void dely(unsigned int dat){while(dat--);}

void main()
{        
        timeinit();         
//        displayinit();//此函數(shù)沒有意義
        while(1)
        {        

                display();
        }
}
void timeinit()                //250微秒@12.000MHz
{
        TMOD |= 0x02;                //設(shè)置定時器模式
        TL0 = 0x06;                //設(shè)置定時初值                +-粗調(diào)
        TH0 = 0x06;                //設(shè)置定時重載值  +-粗調(diào)
        TR0 = 1;                //定時器0開始計時
        ET0=1;
        EA=1;
}
/*
void displayinit()
{
        unsigned int n=0;
        do
        {        
                for(n=0;n<8;n++)
                {
                        switch(n)
                        {
                                case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[0];break;
                                case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[0];break;
                                case(2): led138c=0;led138b=1;led138a=0;duanxian=0x40;break;
                                case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[0];break;
                                case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[0];break;
                                case(5): led138c=1;led138b=0;led138a=1;duanxian=0x40;break;
                                case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[0];break;
                                case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[0];break;
                        }
                        dely(100);
                        duanxian=0x00;
                }
        }while(TF0);
}
*/
void time0() interrupt 1
{
        cnt250us++;
        if(cnt250us%4==0)
                ms_flag=1;
        if(cnt250us>=4000)//+-可以微調(diào)
        {
                cnt250us=0;
                sec++;
                temp=duan[10];
                duan[10]=b;
                b=temp;
        }
        if(sec>=60){sec=0;min++;};
        if(min>=60){min=0;hour++;}
        if(hour>=24)hour=0;
}

void display()
{
        static unsigned char a=0;
//        for(a=0;a<8;a++)
//        {
        if(ms_flag==1)//1ms循環(huán)顯示1位
        {
                ms_flag=0;
                duanxian=0x00;
                switch(a)
                {
                        case(0): led138c=0;led138b=0;led138a=0;duanxian=duan[sec%10];a++;break;
                        case(1): led138c=0;led138b=0;led138a=1;duanxian=duan[sec/10%10];a++;break;
                        case(2): led138c=0;led138b=1;led138a=0;duanxian=duan[10];a++;break;
                        case(3): led138c=0;led138b=1;led138a=1;duanxian=duan[min%10];a++;break;
                        case(4): led138c=1;led138b=0;led138a=0;duanxian=duan[min/10%10];a++;break;
                        case(5): led138c=1;led138b=0;led138a=1;duanxian=duan[10];a++;break;
                        case(6): led138c=1;led138b=1;led138a=0;duanxian=duan[hour%10];a++;break;
                        case(7): led138c=1;led138b=1;led138a=1;duanxian=duan[hour/10%10];a=0;break;
                }
        //        dely(100);
        //        duanxian=0x00;
        }
}
作者: imlwg    時間: 2018-2-25 07:33
wulin 發(fā)表于 2018-2-24 12:02
定時器用8位自動重裝模式，周期250us，調(diào)整TH0、TL0值粗調(diào)，調(diào)整中斷計數(shù)微調(diào)，精度可以控制在日秒內(nèi)。
...

謝謝，我上機(jī)試試。
作者: imlwg    時間: 2018-2-25 07:43
wulin 發(fā)表于 2018-2-24 12:02
定時器用8位自動重裝模式，周期250us，調(diào)整TH0、TL0值粗調(diào)，調(diào)整中斷計數(shù)微調(diào)，精度可以控制在日秒內(nèi)。
...

謝謝，我上機(jī)試試



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1