


下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、【实例98】智能 充电器设计程序代码如下:#include <reg51.h>unsigned int T3HOUS=3600;unsigned int T1NUM=0;unsigned int INTONUM=0;sbit SPEAK=P0 A 1;sbit EN/OK=P0 a 2;void main(void) system_init(); /*调用系统初始化函数*/EA=1; EX0=1;/*使能 INT0 中断 */while(1) EN/OK=1;/* 使能 MAX1898*/void int0_interrupt(void) if(INTONUM=0) TR1=1;
2、SPEAK=0; /* 使能定时器 1*/ INTONUM+;void t1_interrupt(void) T1NUM+;T3HOUS-;if(T3HOUS!=0 )&&(INTONUM =1)if(T1NUM=6000)/*3s*/ T1NUM=0;SPEAK=0;else EN/OK=0; /* 禁止 MAX1898*/T3HOUS =0;SPEAK=1;void system_init(void) SPEAK=1; /*禁止蜂鸣器*/EN/OK=0; /* 禁止 MAX1898*/TMOD=0X20;/*设置定时器1*/TCON |=0X01;TH1=0;TL1=0;【
3、实例99】单片机控制门禁系统程序代码如下:unsigned char Buff30;/*解码缓冲区*/unsigned char readbit()/*检测数据位子程序*/unsigned int mk=TIME10;/*装入超时值,TIME10=600,*/TLO=THO=O;/*初始化计时器*/TR0=1;/*开始计时*/while(-mk)/*超时机制,防止死等*/if(bitin!=INPORT)/*有跳变 INP0RT=P0.0*/break;TR0=0;/*停止计时*/if(mk=0)/*超时退岀*/return 0;bitin=INPORT;/*保存状态*/mk=TH0*256+
4、TL0;/*计算这样跳变的脉宽*/if(mk>TIME05)&&( mk<=TIME10)/* 一个周期*/return 1;if(mk>=TIME00)&&( mk<=TIME05)/*半个周期*/return 2;return 0;/*岀错*/readdata()函数实现读取一个完整的数据位的子程序,注意应用这个函数时需要在循环中不断查询,程序代码如下:文档来自于网络搜索unsigned char readdata()/*读一个完整的数据位子程序*/switch(readbit() case 1:/* 一个周期*/return !bi
5、tin;case 2:/*半个周期*/if(readbit()!=2) return 2;/*再读一次半个周期*/return !bitin;default:return 2;CheckData()函数实现接收并解码子程序,程序中调用了readdata()函数,bit CheckData()unsigned char i,j;bitin=INPORT;/*保存位状态*/for(i=0;i<9;i+)/*检测9个数据位1*/if(readdata()!=1)return 0;for(i=0;i<11;i+)/*读取数据*/Buffi=0x00;for(j=0;j<5;j+)Bu
6、ffi<<=1;switch(readdata()case 0:break;case 1:Buffi|=0x08;break;case 2:/*err*/return 0;/*结束位*/if(Buff10&0x08!=0x00)return 0;/*行奇校验位*/for(i=0;i<10;i+)if(Buffi>>4) A(Buffi>>3) A(Buffi>>2) A(Buffi>>1) ABuffi)&0x08)!=0)文档来自于网络搜索return 0;/*列奇校验位*/j=0;for(i=0;i<1
7、1;i+)j=j a (Buffi&0x80); if(j!=O)return 0; for(i=0;i<11;i+) j=j A (Buffi&0 x40); if(j!=0)return 0; for(i=0;i<11;i+) j=j a (Buffi&0x20); if(j!=0)return 0; for(i=0;i<11;i+) j=j a (Buffi&0x10); if(j!=0)return 0;/*完成*/return 1;那么卡号信息存ReadCardNo()函数实现读取卡号的功能。程序中如果检测到卡信息正确,放在Buff缓冲区中,程序代码如下:文档来自于网络搜索bit ReadCardNo()if(CheckData()/*检测卡*/unsigned char i;/*编码输岀*/Buff0=(Buff2 & 0xF0) | (Buff3>>4 & 0x0F);Buff1=(Buff4 & 0xF0) | (Buff5>>4 & 0x0F);Buff2=(Buff6 & 0xF0) | (B
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 《公差配合与技术测量》课件-第9章 第4部分(渐开线圆柱齿轮的精度结构)
- 管理学基础领导和激励4
- 工业互联网平台数据备份与恢复策略在虚拟现实中的应用前景报告
- 2025年废旧塑料资源化利用技术创新与产业竞争力分析研究报告
- 工业互联网网络运维 课件 项目1 工业互联网网络运维概述
- 工业互联网网络运维 课件 任务1.1 了解工业互联网背景
- 内蒙古包头市2024-2025学年高一下学期期末语文试题
- 毕生发展心理学(第2版)课件 第十二章 中年期心理的发展
- XX县发展服务外包产业的思考
- 三级安全生产教育考试题库及答案
- 新冠病毒的治疗方案
- 全国各省市火车站名称
- 2015-2024年十年高考化学真题分类汇编专题44 化学反应速率(原卷版)
- 电子厂安全生产责任制度常用版
- 头发造型用喷雾市场洞察报告
- GB/T 19077-2024粒度分析激光衍射法
- 社会团体财务报表
- 副食品配送售后服务方案
- 《高危新生儿分类分级管理专家共识(2023)》解读
- 大学媒体信息发布三审三校制度(试行)
- 勇气三声部合唱简谱川师音乐学院
评论
0/150
提交评论