基于51单片机心形流水灯C语言源程序.pdf

基于51单片机心形流水灯C语言源程序.pdf

ID:58934332

大小:148.29 KB

页数:15页

时间:2020-09-18

基于51单片机心形流水灯C语言源程序.pdf_第1页
基于51单片机心形流水灯C语言源程序.pdf_第2页
基于51单片机心形流水灯C语言源程序.pdf_第3页
基于51单片机心形流水灯C语言源程序.pdf_第4页
基于51单片机心形流水灯C语言源程序.pdf_第5页
资源描述:

《基于51单片机心形流水灯C语言源程序.pdf》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、.#includeunsignedintx,y;voiddelayms(unsignedintz)//延时{unsignedinti,j;for(i=z;i>0;i--)for(j=150;j>0;j--);}voidOn_all()//开启所有灯{P0=0x00;P1=0x00;P2=0x00;P3=0x00;}voidOff_all()//关闭所有灯{P0=0xff;P1=0xff;P2=0xff;P3=0xff;}voidls()//正向流水灯{P0=0x00;delayms(400

2、);P2=0x00;delayms(400);P3=0x00;delayms(400);P1=0x00;delayms(400);P0=0x01;delayms(50);..P0=0x02;delayms(50);P0=0x04;delayms(50);P0=0x08;delayms(50);P0=0x10;delayms(50);P0=0x20;delayms(50);P0=0x40;delayms(50);P0=0x80;delayms(50);P0=0x00;P2=0x01;delayms(50);P

3、2=0x02;delayms(50);P2=0x04;delayms(50);P2=0x08;delayms(50);P2=0x10;delayms(50);P2=0x20;delayms(50);P2=0x40;delayms(50);P2=0x80;delayms(50);P2=0x00;P3=0x80;delayms(50);P3=0x40;delayms(50);P3=0x20;delayms(50);P3=0x10;delayms(50);P3=0x08;delayms(50);P3=0x04;d

4、elayms(50);..P3=0x02;delayms(50);P3=0x01;delayms(50);P3=0x00;P1=0x80;delayms(50);P1=0x40;delayms(50);P1=0x20;delayms(50);P1=0x10;delayms(50);P1=0x08;delayms(50);P1=0x04;delayms(50);P1=0x02;delayms(50);P1=0x01;delayms(50);P1=0x00;Off_all();P0=0xfe;delayms(5

5、0);P0=0xfd;delayms(50);P0=0xfb;delayms(50);P0=0xf7;delayms(50);P0=0xef;delayms(50);P0=0xdf;delayms(50);P0=0xbf;delayms(50);P0=0x7f;delayms(50);P0=0xff;P2=0xfe;delayms(50);..P2=0xfd;delayms(50);P2=0xfb;delayms(50);P2=0xf7;delayms(50);P2=0xef;delayms(50);P2=

6、0xdf;delayms(50);P2=0xbf;delayms(50);P2=0x7f;delayms(50);P2=0xff;P3=0x7f;delayms(50);P3=0xbf;delayms(50);P3=0xdf;delayms(50);P3=0xef;delayms(50);P3=0xf7;delayms(50);P3=0xfb;delayms(50);P3=0xfd;delayms(50);P3=0xfe;delayms(50);P3=0xff;P1=0x7f;delayms(50);P1=

7、0xbf;delayms(50);P1=0xdf;delayms(50);P1=0xef;delayms(50);P1=0xf7;delayms(50);P1=0xfb;delayms(50);..P1=0xfd;delayms(50);P1=0xfe;delayms(50);P1=0xff;P0=0xfe;delayms(50);P0=0xfc;delayms(50);P0=0xf8;delayms(50);P0=0xf0;delayms(50);P0=0xe0;delayms(50);P0=0xc0;d

8、elayms(50);P0=0x80;delayms(50);P0=0x00;delayms(50);P2=0xfe;delayms(50);P2=0xfc;delayms(50);P2=0xf8;delayms(50);P2=0xf0;delayms(50);P2=0xe0;delayms(50);P2=0xc0;delayms(50);P2=0x80;delayms(50);P2=0x00;delayms(5

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。