74hc595驱动数码管实例程序.docx_第1页
74hc595驱动数码管实例程序.docx_第2页
74hc595驱动数码管实例程序.docx_第3页
74hc595驱动数码管实例程序.docx_第4页
免费预览已结束,剩余1页可下载查看

下载本文档

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

文档简介

/* 程序内容:利用动态扫描和定时器1在数码管上显示出从765432开始以1/10秒的速度往下递减直至765398并保持显示此数,与此同时利用定时器0以500MS速度进行流水灯从上至下移动,当数码管上数减到停止时,实验板上流水灯也停止然后全部开始闪烁,3秒后(用T0定时)流水灯全部关闭、数码管上显示出“HELLO”。到此保持住。编写人:李英杰硬件支持:12MHz 、74hc595驱动数码管、对应YL-48开发板时间: 2012.8.22备注:参考郭天祥十天学会单片机 */#include#include#define uint unsigned int /宏定义#define uchar unsigned char /宏定义unsigned char code duan=0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xc0,0xc7,0xc7,0x86,0x89; / 共阳数码管位码值unsigned char code wei=0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01;unsigned char disbuf=7,6,5,0,0,0,10,11,12,13,14; /数码管初值sbit si=P22; sbit sclk=P24;sbit slck=P23;/void senda();void send();void out();void init(); void delay (unsigned char h);uint temp,t0,t1,shu,flat,flat1; /flat为流水灯运行标志位、 flat1为数码管标志位uchar m,n,num;main() shu=432; / disbuf3=shu%10/10;/ disbuf4=shu/10%10;/ disbuf5=shu%10; init(); while(1) if(flat1=0)/flat1为1,数码管递减中 for(n=0,m=0;n6,m6;n+,m+) send(); out(); / while(1); else/当数码管递减完后、显示hello for(n=6,m=0;n11,m5;n+,m+) send(); out(); void init() temp=0xfe; P1=temp; TMOD=0x11; /定时器0、1 工作方式都为1 TH0=(65536-50000)/256; /定50ms的初值 TL0=(65536-50000)%256; TH1=(65536-50000)/256; TL1=(65536-50000)%256; EA=1; ET0=1; ET1=1; TR0=1; TR1=1;void time0() interrupt1 /定时器0 子函数 TH0=(65536-50000)/256; TL0=(65536-50000)%256; t0+; if(flat=0) if(t0=10) t0=0; temp=_crol_(temp,1); P1=temp; else P1=0xff; TH0=(65536-50000)/256; /重新定义初值 TL0=(65536-50000)%256; t0+; if(t0%10=0) P1=P1; if(t0=60) TR0=0; P1=0xff; flat1=1; void time1() interrupt 3 /定时器1 子函数 TH1=(65536-50000)/256; TL1=(65536-50000)%256; t1+; if(t1=2) t1=0; disbuf3=shu/100; disbuf4=shu/10%10; disbuf5=shu%10; shu-; if(shu=397) TR1=0; flat=1; / TR0=0; /*void senda(void)uint a ;for(a=0;a8;a+) sclk=0;si=num&0x80;num=num1;sclk=1; */void send(void)/ 数据传输 uchar a,b; / for(m=0;m6;m+) / if(b=0) b+;num=weim;for(a=0;a8;a+) sclk=0;si=num&0x80;num=num1;sclk=1; / senda(); if(b=1) b-; num=duandisbufn; for(a=0;a8;a+) sclk=0;si=num&0x80;num=num1;sclk=1; / senda(); / m+;

温馨提示

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

评论

0/150

提交评论