找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 42214|回复: 98
打印 上一主题 下一主题
收起左侧

闲时做的一个电流 电压表头,用的stc15单片机

  [复制链接]
跳转到指定楼层
#

做的电压表头,受限于单片机的AD转换精度是10位的,用5V电源,分辨率只有5MV.加了电流取样电路,也可以作为电流检测使用。如果需要高精度。设置了2.5V的431取样电路,可以把电源的变动矫正过来。也可以作为低电压检测用

源程序:
  1. /*   采用STC15W401AS单片机。12M晶振。三位数码管显示电压值。*/
  2.                                              
  3. #include "STC15F408.h"
  4. #include <intrins.h>

  5. #define uchar unsigned char  
  6. #define uint  unsigned int   


  7. #define ADC_POWER  0x80                   //AD电源控制位
  8. #define ADC_FLAG 0x10                           //转换结束标志位。1 结束
  9. #define ADC_START 0x08                           //开始转换位
  10. #define ADC_SPEEDLL 0x00                  //转换速度540个时钟
  11. uchar ADC_POSITION;               //0x00 AD通道位置P1.0, 0x01 AD通道位置P1.1

  12. sbit bai=P1^2;
  13. sbit shi=P1^4;
  14. sbit ge=P1^5;

  15. uchar s1,sec;
  16. uint adval=0;                   //AD转换值
  17. uint  show;            //电压值
  18. uint  show1;                     //基准电压

  19. uchar code table[]={0xF5,0x05,0xD3,0x57,0x27,0x76,0xF6,0x15,0xF7,0x77,0x40};          //P3数码管数字0-9
  20. uchar code table1[]={0xFD,0x0D,0xDB,0x5F,0x2F,0x7E,0xFE,0x1D,0xFF,0x7F,0x40};          //P3数码管数字0-9带小数点

  21. /*****************************************

  22. 系统初始化
  23. *****************************************/
  24. void system_init(void)
  25. {
  26.    
  27.    TMOD=0x01;                        //定时器0工作在方式1,的定时模式
  28.    ET0=1;                            //定时器0中断允许
  29.    EA=1;                             //系统中断允许
  30.    TR0=1;                            //定时器1和定时器0开始定时
  31.    TH0=(65536-30000)/256;                       //定时器0的初值30ms
  32.    TL0=(65536-30000)%256;                                 
  33.    sec=59;
  34.    P3M1=0x00;
  35.    P3M0=0xff;
  36.    P5M1=0x00;
  37.    P5M0=0xff;
  38.    P1M1=0x00;
  39.    P1M0=0x1c;
  40. }
  41. /********************************************************
  42. * 函数名称:delay
  43. * 输    入:z 延时时间
  44. * 输    出:无
  45. * 功能描述: 毫秒级延时
  46. ********************************************************/
  47. void delay(uchar n) //延时n ms
  48. {  
  49.     uchar a,b,c;
  50.     for(c=n;c>0;c--)
  51.         for(b=222;b>0;b--)
  52.             for(a=12;a>0;a--);
  53. }

  54. /********************显示温度值***************************/

  55. void display()
  56. {  
  57.   uchar c,d,e,f;
  58.   uint         su;
  59.   if(show1>850)
  60.      c=d=e=10;
  61.   else
  62.      {
  63.       su=show;
  64.           c=su/100;                    //分离温度的各位数值
  65.           f=su%100;
  66.           d=f/10;   
  67.           e=f%10;
  68.          }
  69.   P3=table1[c];                                                  //显示百位
  70.   P5=table[c];
  71.   bai=1;
  72.   delay(5);
  73.   bai=0;
  74.        
  75.   P3=table[d];                                        //显示十位
  76.   P5=table[d];
  77.   shi=1;
  78.   delay(5);
  79.   shi=0;
  80.        
  81.   P3=table[e];                                        //显示个位
  82.   P5=table[e];
  83.   ge=1;
  84.   delay(5);
  85.   ge=0;
  86.           
  87. }

  88. /*****************************************************
  89. ** 函数名称: void adc_isr() interrupt 5
  90. ** 功能描述: AD中断,获取AD数据
  91. ** 输   入: 无
  92. ** 输   出: show
  93. ** 全局变量: show
  94. ** 调用模块: Delay_ms
  95. ********************************************************/
  96. get_ad()
  97. {                   
  98.         ADC_CONTR=ADC_POWER|ADC_SPEEDLL|ADC_START|ADC_POSITION;     //启动ADC转换
  99.         _nop_();
  100.         _nop_();
  101.         _nop_();
  102.         _nop_();
  103.                                                              //默认ADRJ=0; 高8位+低2位
  104.             while(!(ADC_CONTR & ADC_FLAG));                      //等待ADC转换结束

  105.         ADC_CONTR &= ~ADC_FLAG;                              //必须软件清0
  106.             adval=ADC_RES;                                       //00000000 00000011  高8位
  107.             adval=ADC_RES<<2|ADC_RESL;                           //00000011 11111111 右对齐 高8位+低2位         // a|b;                                    
  108.                 adval=adval/1.024;        
  109.         return (adval);
  110. }

  111. /******************取20次AD转换值 求平均值*****************/
  112. AD_work()
  113. {
  114.         uint advalf=0;                    //定义处理后的数值AD_val为浮点数
  115.         uchar i;
  116.         for(i=0;i<50;i++)
  117.            {
  118.                 advalf=advalf+get_ad();   //转换20次求平均值(提高精度)
  119.                 delay(2);

  120. ………余下程序请下载附件………

复制代码


完整代码下载:
电压表头.rar (27.61 KB, 下载次数: 561)

评分

参与人数 1黑币 +100 收起 理由
admin + 100

查看全部评分

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

使用道具 举报

98#
ID:70035 发表于 2025-11-25 13:20 | 只看该作者
电路图纸一并就更好了
回复

使用道具 举报

97#
ID:59884 发表于 2025-11-20 13:36 | 只看该作者
谢谢楼主分享!
回复

使用道具 举报

96#
ID:1107340 发表于 2025-9-18 20:42 | 只看该作者

感谢楼主分享,确实能有个电路图就好了!
回复

使用道具 举报

95#
ID:195666 发表于 2024-12-27 11:28 | 只看该作者

楼主附个电路就好了
回复

使用道具 举报

94#
ID:673647 发表于 2024-11-19 08:00 | 只看该作者
谢谢分享!学习一下!
回复

使用道具 举报

93#
ID:43600 发表于 2024-11-19 01:39 | 只看该作者
程序很陽春,僅僅完成基礎功能,還需努力才有實用價值。
回复

使用道具 举报

92#
ID:588624 发表于 2024-11-10 00:46 | 只看该作者
学习了,留着不时之需,感谢!
回复

使用道具 举报

91#
ID:272119 发表于 2021-6-9 08:24 | 只看该作者
uchar ADC_POSITION;       ---- 请问这是默认0x00? 看一直没有赋值直接ad启动转换时调用.
回复

使用道具 举报

90#
ID:835949 发表于 2021-6-8 23:12 | 只看该作者
PCB和图纸谁有画好的能分享吗?
回复

使用道具 举报

89#
ID:933476 发表于 2021-6-5 17:59 | 只看该作者
虽然有点疑问,但很受用
回复

使用道具 举报

88#
ID:353063 发表于 2021-6-2 09:20 | 只看该作者
刚学单片机,想收藏学习一下,可惜币不够
回复

使用道具 举报

87#
ID:104472 发表于 2021-5-30 22:50 | 只看该作者
精彩,给伙伴点赞。
回复

使用道具 举报

86#
ID:856401 发表于 2021-1-9 21:00 | 只看该作者
很好的东西,留下一个脚印。
回复

使用道具 举报

85#
ID:86450 发表于 2021-1-8 06:58 | 只看该作者
占个位置,回头再看
回复

使用道具 举报

84#
ID:26628 发表于 2021-1-7 15:13 | 只看该作者
mark 留用
回复

使用道具 举报

83#
ID:381390 发表于 2020-12-30 17:46 | 只看该作者

学习一下 谢谢
回复

使用道具 举报

82#
ID:45026 发表于 2020-8-4 15:19 | 只看该作者
很不错的东西,值得学习,。。。。。。。哈哈
回复

使用道具 举报

81#
ID:672895 发表于 2020-4-15 17:14 | 只看该作者
留一个记号,备用
回复

使用道具 举报

80#
ID:642957 发表于 2020-4-11 22:55 | 只看该作者
不错的电路,适合初学者
回复

使用道具 举报

79#
ID:691573 发表于 2020-3-31 09:10 | 只看该作者
谢谢楼主分享,空了也整个玩玩。电压表电流表用的很多
回复

使用道具 举报

78#
ID:675521 发表于 2020-3-29 18:38 | 只看该作者

留一个记号,备用。
回复

使用道具 举报

77#
ID:100749 发表于 2020-3-21 12:46 来自触屏版 | 只看该作者
也想做一个,正在找资料
回复

使用道具 举报

76#
ID:372579 发表于 2020-3-14 10:13 | 只看该作者
留着一哈偶备用
回复

使用道具 举报

75#
ID:232619 发表于 2020-3-13 09:30 | 只看该作者
牛,楼主威武!!!
回复

使用道具 举报

74#
ID:100749 发表于 2020-3-7 15:55 来自触屏版 | 只看该作者
回头有也做一个
回复

使用道具 举报

73#
ID:702057 发表于 2020-3-4 07:54 来自触屏版 | 只看该作者
高啊!非常喜欢,有空一定试试!
回复

使用道具 举报

72#
ID:697723 发表于 2020-3-1 21:26 来自触屏版 | 只看该作者
楼主确定用得是stc15w401as?是15w408as吧,程序不止k吧
回复

使用道具 举报

71#
ID:327070 发表于 2020-2-2 16:08 | 只看该作者
学习一下谢谢
回复

使用道具 举报

70#
ID:259035 发表于 2020-2-1 15:54 | 只看该作者

谢谢楼主分享!!!感谢楼主精彩分享
回复

使用道具 举报

69#
ID:686739 发表于 2020-2-1 07:34 来自触屏版 | 只看该作者
学习了,谢谢楼主
回复

使用道具 举报

68#
ID:381390 发表于 2020-1-8 18:58 | 只看该作者
谢谢楼主分享!!!
回复

使用道具 举报

67#
ID:381390 发表于 2020-1-8 18:58 | 只看该作者
谢谢楼主分享!!!
回复

使用道具 举报

66#
ID:675619 发表于 2019-12-27 19:14 | 只看该作者
收藏了,留着学习
回复

使用道具 举报

65#
ID:671776 发表于 2019-12-27 11:04 | 只看该作者
谢谢,我也留个记号备用
回复

使用道具 举报

64#
ID:602894 发表于 2019-12-27 06:38 来自触屏版 | 只看该作者
交流电流能显示吗
回复

使用道具 举报

63#
ID:663561 发表于 2019-12-18 20:59 | 只看该作者
有个电路图就好啦
回复

使用道具 举报

62#
ID:667494 发表于 2019-12-18 16:19 | 只看该作者
占个位置,回头再看
回复

使用道具 举报

61#
ID:248392 发表于 2019-12-18 09:12 | 只看该作者
学习中,不错资料
回复

使用道具 举报

60#
ID:617981 发表于 2019-11-5 13:01 | 只看该作者

谢谢楼主分享!!!
回复

使用道具 举报

59#
ID:632444 发表于 2019-11-3 11:26 | 只看该作者
学习下,最近在琢磨电压无线回传,好玩
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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