直流负载恒流源_第1页
直流负载恒流源_第2页
直流负载恒流源_第3页
直流负载恒流源_第4页
直流负载恒流源_第5页
已阅读5页,还剩4页未读 继续免费阅读

下载本文档

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

文档简介

1、/=/ - ADC0804 测试电压 -/ / / - -/-/*头文件区*#include#include#include#include /自定义头文件#include /LCD1602头文件#include /ADC0804头文件/=#define uchar unsigned char#define uint unsigned int/sbit DAC0832_SC=P14;sbit DAC0832_WR=P31;sbit k1=P32;sbit k2=P33;sbit k3=P30;void delay(uint z);/-void main()uchar Data;long uin

2、t mm,qq,mn;/uint qq,mm,mv,mn;P1=0;lcd_init(); /LCD初始化qq=0;while(1)if(k1=0&Data0) delay(200); if(k2=0) Data-;P1=Data; DAC0832_WR=0;/delay(100);/ DAC0832_WR=1; if(k3=0) delay(400); if(k3=0) qq=qq+100; else qq=qq-100; tab_vv4=qq%10; tab_vv3=qq%10; tab_vv2=(qq%1000)/100; tab_vv1=(qq%10000)/1000; tab_vv0

3、=qq/10000; read_dat=adc0804(); / 5/256=0.0195voltage=(read_dat*(5*100/256);tab_v0=(voltage*10)/10000; tab_v1=voltage*10%10000/1000; tab_v2=(voltage*10)%1000)/100; tab_v3=(voltage*10)%100)/10; tab_v4=voltage%10; mn=(tab_v0*10000+tab_v1*1000+tab_v2*100+tab_v3*10+tab_v4); mm=(qq-mn)*1000)/qq; tab_vb0=m

4、m/100; tab_vb1=(mm%100)/10; tab_vb2=mm%10; lcd_dis(); /LCD显示 /-fu zhi xian shivoid lcd_dis()uchar i,n;write_com(0x80);/-for(i=0;i3;i+) /显示: write_data(tab_voi);/-write_com(0x83); /显示电压值for(i=0;i5;i+) n=tab_vi; write_data(tab_numn);write_com(0x88);/-for(i=8;i11;i+) /显示: write_data(tab_voi);/-write_co

5、m(0x80+0x40);for(i=0;i3;i+) / write_data(tab_twoi); /-write_com(0x80+0x43); /显示电压值for(i=0;i5;i+) n=tab_vvi; write_data(tab_numn); /-write_com(0x80+0x48);/=for(i=8;i10;i+) /显示: write_data(tab_twoi);/- ooooootiao zheng lv write_com(0x80+0x4a); write_data(tab_num10);/- write_com(0x80+0x4b); /显示电压值for(i

6、=0;i0;i-) for(j=50;j0;j-);/=/- ADC0804.H文件内容 -/=/-文件名:adc0804.h -/=/-定义一下,方便使用-#define uchar unsigned char#define uint unsigned int#define AD_PORT P2 /ADC0804数据端口/-/- 定义端口 - /片选sbit wr=P36; /sbit rd=P37;/-/ -函数声明- void delay(uint);uchar adc0804();/-uchar adc0804() /AD转换函数uchar ad_value;AD_PORT=0xff; /片选信号拉低wr=1; /开始转换wr=0;wr=1;delay(100); / 等待转换完成,时间须足够长rd=0; /读信号有效ad_value=AD_PORT; /读取数据delay(10

温馨提示

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

最新文档

评论

0/150

提交评论