




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、STC89C51单片机产生正弦波、方波、三角波LED显示频率源程序#include <stdio.h>#include<reg52.h>#define uchar unsigned char#define uint unsigned intsbit LATCH1=P26;/定义锁存使能端口 段锁存sbit LATCH2=P27;/ 位锁存unsigned char TempData8; /存储显示值的全局变量unsigned char code DuanMa10=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f;/ 显示
2、段码值09unsigned char code DuanMa210=0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef;/ 显示段码值09unsigned char code DuanMa13=0x77,0x7c,0x39;unsigned char code WeiMa=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f;/分别对应相应的数码管点亮,即位码#define DataPort P0sbit keyA=P33;sbit keyB=P34;sbit keyC=P35;sbit wc=P10;sbit scl=
3、P11;sbit sda=P12;sbit scl1=P13;sbit sda1=P14;sbit p5=P15;sbit p6=P16;sbit p7=P17;uint sign,ad;uchar temp10, temp13;/定义显示区域临时存储数组uchar voltage; /定义浮点变量uchar l=0,m=100,n=0;uchar code sin200 = 52,53,55,56,58,59,61,62,64,65,67,68,70,71,73,74,75,77,78,79,81,82,83,84,85,86,88, 89,90,90,91,92,93,94,95,95,9
4、6,96,97,97,98,98,98,99,99,99,99,100,100,100,100,100,99, 99,99,99,98,98,98,97,97,96,96,95,95,94,93,92,91,90,89,88,87,86,85,84,83,82,81,79,78, 77,75,74,73,71,70,68,67,65,64,62,61,59,58,56,55,53,52,50,48,47,45,44,42,41,39,38,36, 34,33,32,30,29,27,26,24,23,22,20,19,18,17,16,15,14,13,12,11,10,9,8,7,6,5,5
5、,4,4,3,2,2, 2,1,1,1,1,0,0,0,0,0,0,0,1,1,1,1,2,2,2,3,4,4,5,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19, 20,22,23,24,26,27,29,30,32,33,35,36,38,39,41,42,44,45,47,48,50;void DelayUs2x(unsigned char t) while(-t);void DelayMs(unsigned char t) while(t-) /大致延时1mS DelayUs2x(245); DelayUs2x(245); void delay() ;
6、void delay1(uchar x) uchar a,b;for(a=x;a>0;a-) for(b=110;b>0;b-);void Delay2(unsigned int t) while(-t);void Display() uchar i; for(i=0;i<4;i+) DataPort=WeiMai; /取位码 LATCH2=1; /位锁存 LATCH2=0; if(i=0) DataPort=DuanMa1sign-1; else if(i=1) DataPort=DuanMa2temp1i; else DataPort=DuanMatemp1i; /取显示
7、数据,段码 LATCH1=1; /段锁存 LATCH1=0; Delay2(500); / 扫描间隙延时,时间太长会闪烁,太短会造成重影 /pcf8591void init1()sda1=1;delay();scl1=1;delay();void start1() /开始信号sda1=1;delay();scl1=1;delay();sda1=0;delay();void stop1() /停止sda1=0;delay();scl1=1;delay();sda1=1;delay();void respons1() /应答uchar i;scl1=1;delay();while(sda1=1)&
8、amp;&(i<250)i+;scl1=0;delay();void write_byte1(uchar date)uchar i,temp;temp=date;for(i=0;i<8;i+)temp=temp<<1;scl1=0; delay();sda1=CY;delay();scl1=1;delay();scl1=0;delay();sda1=1;delay();uchar read_byte1()uchar i,k;scl1=0;delay();sda1=1;delay();for(i=0;i<8;i+)scl1=1;delay();k=(k<
9、;<1)|sda1;scl1=0;delay();return k;void write_add1(uchar date) /写入DAstart1();write_byte1(0x90);respons1();write_byte1(0x40);respons1();write_byte1(date);respons1(); / delay1(100);stop1();uchar read_add1( uchar address ) /读AD值uchar date;start1();write_byte1(0x90);respons1();write_byte1(0x40|address
10、);respons1();start1();write_byte1(0x91);respons1();date=read_byte1();stop1();return date;/键盘void keyscan()if(keyA=0)delay1(10);if(keyA=0)sign=1;while(!keyA); if(keyB=0)delay1(10);if(keyB=0)sign=2;while(!keyB);if(keyC=0)delay1(10);if(keyC=0)sign=3;while(!keyC);/eepromvoid start() /开始信号sda=1;delay();s
11、cl=1;delay();sda=0;delay();void stop() /停止sda=0;delay();scl=1;delay();sda=1;delay();void respons() /应答uchar i;scl=1;delay();while(sda=1)&&(i<250)i+;scl=0;delay();void init()sda=1;delay();scl=1;delay();void write_byte(uchar date)uchar i,temp;temp=date;for(i=0;i<8;i+)temp=temp<<1;s
12、cl=0; delay();sda=CY;delay();scl=1;delay();scl=0;delay();sda=1;delay();uchar read_byte()uchar i,k;scl=0;delay();sda=1;delay();for(i=0;i<8;i+)scl=1;delay();k=(k<<1)|sda;scl=0;delay();return k;void write_add(uchar date,uchar address )uchar i,*pdate;pdate=date;for(i=0;i<2;i+)start();write_b
13、yte(0xae);respons();write_byte(address+i);respons();write_byte(*(pdate+i);respons();stop();void read_add(uchar date ,uchar address )uchar i,*pdate; pdate=date;for(i=0;i<2;i+)start();write_byte(0xae);respons();write_byte(address+i);respons();start();write_byte(0xaf);respons();*(pdate+i)=read_byte(
14、);stop();void sj() if(l<100)write_add1(l);l+;if(l>=100&m>0)write_add1(m);m-;if(l>=100&m<=0)l=0;m=100;p5=0;p6=1;p7=1;void zx()if(l<200)write_add1(sinl);l+;if(l>=200) l=0;p6=0;p7=1;p5=1;void fb()if(l<100)write_add1(255);l+;if(l>=100&n<100)write_add1(0);n+;if(l
15、>=100&n>=100)l=0;n=0;p7=0;p5=1;p6=1;void main() uchar i,num,tab2;/定义显示区域临时存储数组 wc=0; num=0;tab0=0;tab1=0;TMOD=0x21;/设置定时器1为工作方式2定时器0为工作方式1TH1=0xfd;TL1=0xfd;TR1=1;REN=1;SM0=0;SM1=1;EA=1;ES=1;init();init1();for(i=0;i<5;i+)num=read_add1(0);read_add(tab,1);sign=tab0; ad=(uint)num*100;TH0=(65536-ad)/256; TL0=(65536-ad)%256; ET0=1; /定时器中断打开TR0=1; while(1) keyscan(); for(i=0;i<5;i+) num=read_add1(0); voltage=500/num; ad=(uint)num*100;tab0=sign;tab1=ad;write_add(tab,1);num=read_add1(0); voltage=500/num; temp
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- GB/T 23595.1-2025LED用稀土荧光粉试验方法第1部分:光谱的测定
- 包装回收合同范例
- 北京合伙合同范本培训
- 中介代办合同范例
- 个人汽车置换合同范本
- 办公住宿出租合同范本
- 出租铺面合同范本
- 三方合伙范本合同范本
- 履约反担保合同范本
- 单位职工租房合同范例
- JCT414-2017 硅藻土的标准
- 肌肉注射评分标准
- 钢结构主要技术标准和要求
- 新版药品管理法培训完整版本课件
- 北师大版高中英语选择性必修四全册课文及翻译(中英文Word)
- 腊八粥 第一课时自学导学单
- 心灵手巧织美好-精美挂件我会编 (教案)-二年级下册劳动浙教版
- IPO项目律师尽职调查查验计划表模版
- 中美关系新时代52张课件
- 医院信息系统HIS知识培训教学课件-HIS的主要内容
- 经济法通论债权法总论
评论
0/150
提交评论