STC12C2052AD单片机0-9.9V电压表_第1页
STC12C2052AD单片机0-9.9V电压表_第2页
STC12C2052AD单片机0-9.9V电压表_第3页
STC12C2052AD单片机0-9.9V电压表_第4页
STC12C2052AD单片机0-9.9V电压表_第5页
已阅读5页,还剩2页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、由STC12C2052AD单片机制作的0-9.9V电压表这款由电子乐屋原创的电路简单制作容易的STC12C2052AD单片机的0-9.9V电压表,电路简单,元件少,容易制作,PCB板为单面板,下面是制作好的实物。#include /单片机头文件#include /51基本运算(包括_nop_空函数)#define uchar unsigned char#define uint unsigned intsbit temp=P17;sbit LED3=P30; /Csbit LED0=P14; /小数点后一位sbit LED1=P13; /个位sbit LED2=P10; /十位sbit A=P1

2、1;sbit B_B=P15;sbit C=P32;sbit D=P34;sbit E=P35;sbit F=P12;sbit G=P31;sbit H=P33; /小数点char d5;uint R,M,N,h;/若定义成uchar型就只能显示2.5V以下的数值void dm(mz);void delayus(uint x) /(x+1)*6微while(x-);/*函数名:毫秒级CPU延时函数调 用:delay (?);参 数:1-65535(参数不可为0)返回值:无结 果:占用CPU方式延时与参数数值相同的毫秒时间备 注:应用于1T单片机时i600,应用于12T单片机时i0;t-) /如

3、果t大于0,t减1(外层循环) for(i=600;i0;i-); /i等于124,如果i大于0,i减1/*函数名:ADC初始化及8位A/D转换函数返回值:8位的ADC数据结 果:读出指定ADC接口的A/D转换值,并返回数值备 注:适用于STC12C2052AD系列单片机(必须使用STC12C2052AD.h头文件)*/uchar Read (uchar CHA)uchar AD_FIN=0; /存储A/D转换标志;若在函数外定义此变量则不能得到连续变化的模拟量的显示/*以下为ADC初始化程序*/ CHA &= 0x07; /选择ADC的8个接口中的一个(0000 0111 清0高5位) AD

4、C_CONTR = 0x60; /ADC转换的速度(0XX0 0000 其中XX控制速度,请根据数据手册设置) _nop_(); ADC_CONTR |= CHA; /选择A/D当前通道 _nop_(); ADC_CONTR |= 0x80; /启动A/D电源 delay(1); /使输入电压达到稳定(1ms即可?/*以下为ADC执行程序*/ ADC_CONTR |= 0x08; /启动A/D转换(0000 1000 令ADCS = 1) _nop_(); _nop_(); _nop_(); _nop_(); while (AD_FIN =0) /等待A/D转换结束 AD_FIN = (ADC

5、_CONTR & 0x10); /0001 0000测试A/D转换结束否 ADC_CONTR &= 0xE7; /1111 0111 清ADC_FLAG位, 关闭A/D转换,return (ADC_DATA); /返回A/D转换结果(8位)/*显示函数转换函数:M=模拟量采样值,N=基准电压源采样值(本例为2.5V),R=模拟量输入值(待显示值)N=256*2.5/Vcc;变形后得Vcc=256*2.5/N; 代入M=256*R/Vcc;得到M=R*N/2.5;变形后得R=M*2.5/N1.105为输入端分压比。*/void transfer(void)M=Read(6);/P1.6口模拟量转

6、换N=Read(7);/P1.7口2.5V基准电压源采样(转换)R=(M*2.5)/N)*198;/输入模拟量换算并放大500倍;/*以下为3位显示转换*/h=R;d3=R/1000;R=R%1000;d2=R/100;R=R%100;d1=R/10;d0=R%10;/*显示函数(未优化)*/void xian_shi (void)if(h999)d3=10;d2=10;d1=10;d0=10;if(d3=0)d3=11;dm(d3);LED3=1;delayus(5);LED3=0;delayus(30);dm(d2);LED2=1;delayus(5);LED2=0;delayus(30)

7、;dm(12);LED2=1;delayus(1);LED2=0;delayus(400);dm(d1);LED1=1;delayus(5);LED1=0;delayus(30);dm(d0);LED0=1;delayus(5);LED0=0;delayus(30);void dm(mz)switch(mz)case 0:A=0;B_B=0;C=0;D=0;E=0;F=0;G=1;H=1;break;case 1:A=1;B_B=0;C=0;D=1;E=1;F=1;G=1;H=1;break;case 2:A=0;B_B=0;C=1;D=0;E=0;F=1;G=0;H=1;break;case

8、 3:A=0;B_B=0;C=0;D=0;E=1;F=1;G=0;H=1;break;case 4:A=1;B_B=0;C=0;D=1;E=1;F=0;G=0;H=1;break;case 5:A=0;B_B=1;C=0;D=0;E=1;F=0;G=0;H=1;break;case 6:A=0;B_B=1;C=0;D=0;E=0;F=0;G=0;H=1;break;case 7:A=0;B_B=0;C=0;D=1;E=1;F=1;G=1;H=1;break;case 8:A=0;B_B=0;C=0;D=0;E=0;F=0;G=0;H=1;break;case 9:A=0;B_B=0;C=0;D=0;E=1;F=0;G=0;H=1;break;case 10:A=0;B_B=1;C=1;D=0;E=0;F=0;G=1;H=1;break; /Ccase 11:A=1;B_B=1;C=1;D=1;E=1;F=1;G=1;H=1;break; /不显示case 12:A=1;B_B=1;C=1;D=1;E=1;F=1;G=1;H=0;break; /小数点/*函数名:主函数调 用:无参 数:无返回值:无结 果:程序开始处,无限循环备 注:*/void main (vo

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论