版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、数码管电子秒表程序 8位数码管电子秒表,显示精确到0.01秒。使用共阳数码管,51单片机的P0口输出段码,P2口输出位码。晶振11.0592MHz。 控制按钮K1接P1.0口,单片机检测低电平。第一次按下时,启动开始计时;第二次按下时,停止计时、显示当前值;第三次按下时,显示归零,做好重新计时准备。完整源程序:#include #include unsigned char data dis_digit;unsigned char
2、 key_s, key_v;unsigned char code dis_code11=0xc0,0xf9,0xa4,0xb0, / 0, 1, 2, 3 0x99,0x92,0x82,0xf8,0x80,0x90, 0xff;/ 4, 5, 6, 7, 8, 9, off unsigned char dis_buf8; / 显示缓冲区unsigned char sec_bcd8; / 秒计数值, BCD码unsigned char dis_index; / unsign
3、ed char key_times; / K1 按下次数 void clr_time(; void update_disbuf(;bit scan_key(;void proc_key(;void delayms(unsigned char ms;sbit K1 = P10;void main(void P0 = 0xff; P2 = 0xff; TMOD = 0x11; / 定时器0, 1工作模式1, 16位定时方式 TH1 = 0x
4、dc; TL1 = 0; TH0 = 0xFC; TL0 = 0x17; clr_time(; / dis_digit = 0x7f; / 初始显示P20口数码管 dis_index = 0;
5、 / key_times = 0; key_v = 0x01; IE = 0x8a; / 使能timer0, timer1中断 TR0 = 1; TR1 = 0; while(1 if(scan_key( delayms(10; if(scan_key(
6、60;key_v = key_s; proc_key(; void clr_time( sec_bcd0 = 0x0; sec_bcd1 = 0x0; sec_bcd2 = 0x0; sec_bcd3 = 0x0; sec_bcd4 = 0x0; sec_bcd5 = 0x0; sec_bcd6 = 0x0; sec_bcd7 = 0x0;
7、 update_disbuf(; bit scan_key( key_s = 0x00; key_s |= K1; return(key_s key_v; void proc_key( if(key_v & 0x01 = 0 key_times+; if(key_times = 1 TR1 = 1; else if(key_times = 2
8、60; TR1 = 0; else clr_time(; key_times = 0; void timer0( interrupt 1/ 定时器0中断服务程序, 用于数码管的动态扫描/ dis_index - 显示索引, 用于标识当前显示的数码管和缓冲区的偏移量/ dis_digit - 位选通值, 传送到P2口用于选通当前数码管的数值, 如等于0xfe
9、时,/ 选通P2.0口数码管/ dis_buf - 显于缓冲区基地址 TH0 = 0xFC; TL0 = 0x17; P2 = 0xff; / 先关闭所有数码管 P0 = dis_bufdis_index; / 显示代码传送到P0口 P2 = dis_digit; / dis_digit = _cror_(dis_digit,1
10、; / 位选通值右移(P20<-P27, 下次中断时选通下一位数码管 dis_index+; / dis_index &= 0x07; / 8个数码管全部扫描完一遍之后,再回到第一个开始下一次扫描void timer1( interrupt 3/ unsigned char i; TH1 |= 0xdc; for(i = 0; i < 8; i+
11、60; sec_bcdi+; / 低位加1 if(sec_bcdi < 10 / 如果低位满10则向高位进1 break; / 低位未满10 sec_bcdi = 0; / 低位满10清0 update_disbuf(; / 更新显示缓冲区void update_disbuf(/ 更新显示缓冲区 dis_buf0
12、= dis_codesec_bcd0; dis_buf1 = dis_codesec_bcd1; dis_buf2 = dis_codesec_bcd2 & 0x7f; / 加上小数点 dis_buf3 = dis_codesec_bcd3; dis_buf4 = dis_codesec_bcd4; dis_buf5 = dis_codesec_bcd5; dis_buf6 = dis_codesec_bcd6; dis_buf7 = dis_codesec_bcd7;void delayms(unsign
13、ed char ms / 延时子程序 unsigned char i; while(ms- for(i = 0; i < 120; i+; #include sbit ksec=P30; sbit kmin=P31; sbit khour=P32; sbit P33=P33; unsigned char secshi=0,secge=0,mins
14、hi=0,minge=0,hourshi=0,hourge=0; unsigned int num=0,sec=0,min=0,hour=0,x,n; unsigned char code table10=0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90; void delay(unsigned int; void keyscan(; void display(; main( TMOD=0x11; TH0=(65536-50000/256; T
15、L0=(65536-50000%256; TH1=(65536-50000/256; TL1=(65536-50000%256; EA=1;ET0=1;TR0=1; TR1=0; ET1=1; while(1 display(; keyscan(; void delay(unsigned int z unsigned int x,y; for(x=z;x>0;x- for(y=110;y>0;y-; void ti
16、me0( interrupt 1 num+; TH1=(65536-50000/256; TL1=(65536-50000%256; void time1( interrupt 3 n+; TH0=(65536-50000/256; TL0=(65536-50000%256; void display( if(min=0 TR1=1; else TR1=0; if(n>10 n=0; P33=P33; if(
17、num=20 num=0; sec+; if(sec=60 sec=0; min+; if(min=60 min=0; hour+; if(hour=24
18、 hour=0; min=0; sec=0; secge=sec%10; secshi=sec/10; minge=min%1
19、0; minshi=min/10; hourge=hour%10; hourshi=hour/10; P2=1; P0=tablesecge; delay(5; P2=2; P0=tablesecshi; delay(5; P2=4; P0=191; delay(5; P2=8; P0=tableminge; delay(5; P2=16; P0=tableminshi; delay(5; P2=32; P0=191; delay(5; P2=64; P0=tablehourge; delay(5; P2=128; P0=tablehourshi; delay(5; void keyscan( if(ksec=0 delay(10; if(ksec=0 sec+;
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 人工智能在银行反欺诈中的决策模型
- 2026年压延产品技术创新深度报告
- 2026年机务人员地面模拟培训创新解决方案报告
- 2026年神经系统用药创新行业报告
- 2027年巴盛职业学院单招职业技能考试模拟试卷及答案详解(各地真题)
- 2024年黑龙江省鸡西市高职单招职业技能考试题库带答案详解(黄金题型)
- 2026年广西壮族自治区南宁市高职单招职业技能考试题库附参考答案详解(培优A卷)
- 2026年唐山幼儿师范高专高职单招职业技能考试模拟试卷(巩固)附答案详解
- 2026年内蒙古自治区阿拉善盟高职单招职业技能考试模拟试卷【含答案详解】
- 2026年节能门窗产品认证标志使用 规范与要求
- 2026年湖南临澧县公安局招聘警务辅助人员15人笔试题库附完整答案详解【有一套】
- 广东春风银星新材料科技环境影响报告表
- 2026年河北省中考语文试卷(含详细答案解析)
- 京东方校园2026年招聘胜任力测评题库
- 2026-2030全球与中国多功能多面体低聚倍半硅氧烷(POSS)行业前景动态及发展趋势预测报告
- 2026年征兵政治考核面试题库及参考答案
- 2025年GPON 和 XG(S)-PON 技术白皮书
- (正式版)T∕GDSTD 023-2026 广东省自然资源资产配置方案编制指南
- 2026机动车检测站授权签字人试题库(含答案)
- GB/T 25085.5-2026道路车辆汽车电缆第5部分:交流600 V或直流900 V和交流1 000 V或直流1 500 V单芯铜导体电缆的尺寸和要求
- 养鹅场水资源管理方案
评论
0/150
提交评论