找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1045|回复: 0
收起左侧

STC90C52RC单片机频率计3位小数电路图源程序

[复制链接]
ID:997051 发表于 2022-1-16 06:28 | 显示全部楼层 |阅读模式
STC90C52RC 频率计3位小数电路图
依据<发一个3位小数的单片机频率计程序备忘.RAR>而绘.
STC90C52RC 频率计3位小数.PNG

单片机源程序如下:
  1. //利用外中断记录脉冲数,利用T0记录秒数,f=总脉冲数/总秒数
  2. //每10秒更新一次,1000秒后可以精确到3位小数,用于检测32768Hz晶振
  3. #define MAIN_Fosc                11059200L        //定义主时钟
  4. #include<reg52.h>
  5. //#include        "STC90.H"
  6. #include        "INTRINS.H"
  7. #include  "Delayms.h"
  8. #include  "lcd1602.h"
  9. #define uchar unsigned char
  10. #define uint unsigned int

  11. sbit COUNT_IN=P3^2;

  12. unsigned long count=0,pul;
  13. unsigned long  f=0,t10s=0;
  14. unsigned int ms50=0;
  15. //bit flag;

  16. void init()
  17. {
  18.    IT0=1;        //INT0负跳变触发        
  19.    TMOD &= 0xF0;    //清定时器0
  20.    TMOD |= 0x01;    //定时器0:16位定时器
  21.    TH0=0x4c;          //11.0592Mhz50ms
  22.    TL0=0x00;
  23.    ET0=1;//开定时中断
  24.    EX0=1;//开外部INTO中断
  25.    TR0=1;//启动定时
  26. //   EA=1; //CPU开中断总允许
  27. }
  28. void EXINT0() interrupt 0
  29. {
  30.   count++;         //脉冲数累加
  31. }

  32. void time0() interrupt 1
  33. {
  34.   TH0=0x4c;
  35.   TL0=0x00;         //50ms11.0592Mhz
  36.   ms50=ms50+1;          //累计50毫秒数
  37.   if (ms50>=200) //设定10秒刷新时间,200*50ms=10s
  38.    {
  39.     t10s++;      //10秒累加
  40.     ms50=0;
  41.     pul=count;
  42. //    flag=1;         //10秒时间到标志
  43.    }
  44. }

  45. void display_1602_plj(void)
  46. {
  47. DisplayOneChar(0,0,'P');//标题
  48. DisplayOneChar(1,0,'i');
  49. DisplayOneChar(2,0,'n');
  50. DisplayOneChar(3,0,'L');
  51. DisplayOneChar(4,0,'v');
  52. DisplayOneChar(5,0,'J');
  53. DisplayOneChar(6,0,'i');
  54. //DisplayOneChar(7,0,' ');
  55. DisplayOneChar(8,0,'t');   //累计秒数
  56. DisplayOneChar(9,0,':');
  57. if(t10s>=1000)
  58. {DisplayOneChar(11,0,t10s%10000/1000+48);}
  59. if(t10s>=100)
  60. {DisplayOneChar(11,0,t10s%1000/100+48);}
  61. if(t10s>=10)
  62. {DisplayOneChar(12,0,t10s%100/10+48);}
  63. if(t10s>=1)
  64. {DisplayOneChar(13,0,t10s%10+48);}
  65. DisplayOneChar(14,0,'0');
  66. DisplayOneChar(15,0,'S');

  67. if(f>=100000000)            //频率
  68. {DisplayOneChar(0,1,f%1000000000/100000000+48);}
  69. if(f>=10000000)
  70. {DisplayOneChar(1,1,f%100000000/10000000+48);}
  71. if(f>=1000000)
  72. {DisplayOneChar(2,1,f%10000000/1000000+48);}
  73. if(f>=100000)
  74. {DisplayOneChar(3,1,f%1000000/100000+48);}
  75. if(f>=10000)
  76. {DisplayOneChar(4,1,f%100000/10000+48);}
  77. DisplayOneChar(5,1,f%10000/1000+48);
  78. DisplayOneChar(6,1,'.');
  79. DisplayOneChar(7,1,f%1000/100+48);
  80. DisplayOneChar(8,1,f%100/10+48);
  81. DisplayOneChar(9,1,f%10+48);
  82. DisplayOneChar(10,1,'H');
  83. DisplayOneChar(11,1,'z');
  84. }

  85. void main()
  86. {
  87.   Delayms(255);                           //上电延时               
  88.   Delayms(255);                           //上电延时               
  89.   Delayms(255);                           //上电延时               
  90.   Delayms(255);                           //上电延时               
  91.   init();
  92.   Delayms(50);                           //上电延时               
  93.   InitLcd();                     //液晶初始化
  94.   display_1602_plj();
  95.   EA=1; //CPU开中断总允许
  96. while(1)
  97.   {
  98.       if (t10s>=1)  //10秒取样时间到
  99.       {
  100.        f=pul*100/t10s;          //频率=脉冲个数/时间,3位小数
  101.        display_1602_plj();
  102.       }
  103.   }
  104. }
复制代码

Keil代码hex文件下载:
89c52 lcd1602频率计3位小数.rar (49.94 KB, 下载次数: 12)

评分

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

查看全部评分

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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