几个单片机应用实例Word文档格式.docx
《几个单片机应用实例Word文档格式.docx》由会员分享，可在线阅读，更多相关《几个单片机应用实例Word文档格式.docx（49页珍藏版）》请在冰豆网上搜索。
declareaco（11）byteconstant（0fdh,60h,0dah,0f2h,66h,0b6h,0beh,
0e0h,0feh,0f6h,00h）;
declareweek（11）byteconstant（0edh,028h,0dch,7ch,39h,75h,0f5h,
2ch,0fdh,7dh,00h）;
declaredaliterally'
p15'
clkliterally'
p16'
aleliterally'
p17'
mkliterally'
p11'
skliterally'
p12'
;
clear:
procedure;
sclk=0;
io=0;
rst=0;
endclear;
send1302:
procedure（comm）;
declare（i,comm）byte;
doi=0to7;
comm=scr（comm,1）;
io=cy;
calltime
（1）;
sclk=1;
end;
endsend1302;
wbyt1:
procedure（com,dat）;
/*字节写过程*/
declare（com,dat）byte;
callclear;
rst=1;
callsend1302（com）;
callsend1302（dat）;
endwbyt1;
wbyt8:
/*时钟多字节突发模式写过程*/
declarejbyte;
a（7）=A（6）;
a（6）=a（0）;
callsend1302（command）;
doj=1to8;
callsend1302（a（j））;
endwbyt8;
RBYT1:
PROCEDURE;
DECLAREIBYTE;
CALLCLEAR;
RST=1;
callsend1302（0c1h）;
IO=1;
DOI=0TO7;
SCLK=1;
SCLK=0;
CY=IO;
N=SCR（N,1）;
END;
A（8）=N;
ENDRBYT1;
send595:
declarekbyte;
dok=0to7;
data=scr（data,1）;
da=cy;
clk=1;
clk=0;
endsend595;
send595_1:
da1=cy;
clk1=1;
clk1=0;
endsend595_1;
rb1:
procedure（abc,j）;
DECLARE（I,j,abc）BYTE;
callsend1302（abc）;
ab（j）=N;
ab（j）=dec（ab（j））;
endrb1;
rbyt6:
callrb1（0f1h,0）;
callrb1（0f3h,1）;
callrb1（0f5h,2）;
callrb1（0f7h,3）;
callrb1（0f9h,4）;
callrb1（0fbh,5）;
callrb1（0fdh,6）;
endrbyt6;
wbyt6:
callwbyt1（8eh,0）;
/*writeenable*/
callwbyt1（0f0h,ab（0））;
callwbyt1（0f2h,ab
（1））;
callwbyt1（0f4h,ab
（2））;
callwbyt1（0f6h,ab（3））;
callwbyt1（0f8h,ab（4））;
callwbyt1（0fah,ab（5））;
callwbyt1（0fch,ab（6））;
callwbyt1（8eh,80h）;
/*writedisable*/
endwbyt6;
rbyt8:
/*时钟多字节突发模式读过程*/
declare（i,j）byte;
io=1;
cy=io;
n=scr（n,1）;
a（j）=n;
a（0）=a（6）;
a（6）=A（7）;
a（0）=a（0）and0fh;
ifa（0）>
6thena（0）=0;
CALLRBYT1;
if（a
（1）=0anda
（2）=0anda（3）=0）then
donum=0to35;
calltime（250）;
temp1=1;
iftemp1=1then
temp1=0;
ab（4）=ab（4）+1;
ifab（4）>
99hthen
ab（4）=0;
ab（5）=ab（5）+1;
ifab（5）>
99hthenab（5）=0;
callwbyt6;
endrbyt8;
display:
/*jieya,yima,fasong*/
declare（i,n,m）byte;
n=a（0）and0fh;
/*sendweek*/
data=week（n）;
callsend595;
n=a（4）;
/*senddate*/
n=nand0fh;
data=aco（n）;
n=shr（n,4）;
doi=1to3;
/*sendsecond,minute,hour*/
n=a（i）;
doi=5to6;
/*sendmonth,year*/
n=a（8）;
/*send19or20*/
dom=0to5;
n=ab（m）;
callsend595_1;
ale=0;
ale=1;
enddisplay;
beginset:
a（0）=06h;
a
（1）=58h;
a
（2）=59h;
a（3）=23h;
a（4）=30h;
a（5）=06h;
a（6）=97h;
a（7）=00;
a（8）=19h;
/*setdate/time（1997,7,1,8:
00:
00,week3）*/
/*writeenable*/
callwbyt1（80h,00h）;
/*startcolock*/
callwbyt1（0beh,0abh）;
/*两个二极管与8K电阻串联充电*/
command=0beh;
/*writecolock/date*/
callwbyt8;
callwbyt1（0c0h,a（8））;
/*setwriteprotectbit*/
endbeginset;
key:
declare（i,time1,k1,tem）byte;
calltime（100）;
k1=7;
time1=30;
ifmk=0then
dowhiletime1>
0;
week:
ifk1=0then
doi=0to5;
/*callhz（a（0））;
*/
doi=0to3;
/*callhz0;
tem=a（k1）;
ifk1=7thentem=a（8）;
a（k1）=0aah;
ifk1=7thena（8）=0aah;
calldisplay;
calltime（254）;
calltime（254）;
a（k1）=tem;
ifk1=7thena（8）=tem;
time1=time1-1;
/*MODKEYPROCESS*/
TIME1=30;
IFMK=0THEN
DO;
k1=k1-1;
DOWHILEK1=0FFH;
K1=7;
IFSK=0THEN
CALLTIME（100）;
/*SETKEYPROCESS*/
tem=tem+1;
tem=dec（tem）;
DOCASEK1;
DOWHILEtem=7;
/*week*/
tem=0;
DOWHILEtem=60H;
/*scond*/
/*minute*/
DOWHILEtem=24H;
/*hour*/
DOWHILEtem=32H;
/*date*/
tem=1;
DOWHILEtem=13H;
/*month*/
DOwhiletem=100h;
/*YEAR*/
tem=00;
DOWHILETEM>
=21H;
tem=19H;
A（K1）=tem;
endkey;
main$program:
mk=1;
sk=1;
num=0;
p32=1;
ifsk=0thencallbeginset;
da=0;
loop:
dowhilemk=1;
command=0bfh;
callrbyt8;
dowhilemk=0;
callkey;
callwbyt1（0C0H,A（8））;
gotoloop;
endstart;
例3:
一个6位LED、4个按键的显示板
按键和显示是单片机系统的基本输入输出部件，下面介绍一个由74LS164驱动的6位数码管和4个按键组成的通用仪表面板。
其线路板图如下图所示：
注：
此板中多了三个LED发光管，这三个发光管是分别接在IC4,IC5,IC6的13脚（Q7，数据
串出脚）上的
例四：
智能电机转速计数器
本电路由ＡＴ８９Ｃ５１单片机、ＣＤ４５１１、ＬＣＤ数码管、磁敏霍尔元件等组成。
电路工作原理。
用磁敏元件作为传感器。
在无外磁场时，磁敏传感器的ＯＵＴ端输出＋４．３５Ｖ（１电平），当电机转动一圈时，带动小磁铁Ｎ从磁敏传感器上掠过一次，传感器在外加磁场的作用下，输出一次＋０．０５Ｖ（０电平）脉冲信号，在程序中设ＩＮＴ０为边沿触发，ＯＵＴ端这一变化通过ＩＮＴ０送至ＡＴ８９Ｃ５１，产生一次中断，使累加器Ａ自动加１。
计数一次。
电机每转动一圈，产生一次中断，累加器加１。
当软件计数器Ｔ０定时１ｓ时，将计数值送ＬＥＤ显示，ＬＥＤ显示的数值即当前电机每秒钟转速。
由于采用软件定时，定时误差值比常规硬件定时器小得多。
ＣＤ４５１１是ＢＣＤ—七段ＬＥＤ锁存／译码／驱动器。
当ＬＥ为低电平时，将加在Ａ、Ｂ、Ｃ、Ｄ端的数据译成段驱动信号，经限流电阻送到数码管的段控制线上。
当ＬＥ为高电平时，驱动信号被锁存在ＣＤ４５１１的输出端，实现静态显示。
因ＣＤ４５１１输出为高电平有效，故选用共阴极数码管。
Ｄ１为工作指示灯，供调试用。
本电路的调试分软件和硬件两部分。
建议先检查传感器是否工作，这可从Ｄ１的显示看出。
ＬＥＤ显示就要借助软件了。
本文附有调试程序ｔｓ．Ａｓｍ。
单步执行该程序，如果数码管显示的不是７８９，那么硬件一定有问题，请仔细检查。
当确信硬件无误后，便可录入ｍａｉｎ．Ａｓｍ程序，仿真调试通过后，将程序写入ＡＴ８９Ｃ５１中，电路设计就完成了。
本系统能在０～９９９转／ｓ范围内对电机转动进行正确计数，满足了生产的需要。
将电路稍加改动，还可以扩展为脉冲频率计等。
例五：
自制学生坐姿矫正仪
《电子报》曾介绍过用普通电子电路制作的学生视力保护小装置，受其启发笔者用单片机加少许元件构成了一个简单实用的学生坐姿矫正仪。
硬件电路见附图。
采用ＡＴ８９Ｃ２０５１单片机控制。
Ｐ３．７口输出大约３８ｋＨｚ的脉冲信号，驱动红外发光管ＬＥＤ１。
接收管ＰＴＲ１是一体化的红外接收头。
安装时让红外发光管和接收头构成反射式传感器。
当学生的坐姿不正确，即头离书本太近时，ＬＥＤ１发出的３８ｋＨｚ红外光被学生的头部或脸部反射回来，照到ＰＴＲ１上。
由于接收头的中心频率是３８ｋＨｚ，所以接收头ＰＴＲ１输出低电平，将单片机的Ｐ１．３脚拉低。
经内部程序判断后在单片机的Ｐ３．４口输出１００ｍｓ的高电平，驱动蜂鸣器发声，提醒学生改正坐姿。
单片机的定时器Ｔ０工作于方式２来产生大约３８ｋＨｚ的方波信号。
程序用ＦＲＡＮＫＬＩＮＣ１５编写。
程序清单如下：
＃ｉｎｃｌｕｄｅ＜ｒｅｇ５１．Ｈ＞
＃ｄｅｆｉｎｅｕｃｈａｒｕｎｓｉｇｎｅｄｃｈａｒ
＃ｄｅｆｉｎｅｕｉｎｔｕｎｓｉｇｎｅｄｉｎｔ
ｓｂｉｔｐ３＿７＝ｐ３＾７；
ｓｂｉｔｐ３＿４＝ｐ３＾４；
ｓｂｉｔｐ１＿３＝ｐ１＾３；
／*５０ｍｓ延时子程序*／
ｖｏｉｄｄｅｌａｙ（ｕｉｎｔｍｓ）
{
ｕｃｈａｒｔ；
ｗｈｉｌｅ（ｍｓ－）{ｆｏｒ（ｔ＝０；
ｔ＜１２５；
ｔ＋＋＝
{；
}；
＝
／*Ｔ０中断程序*／
ｔｉｍｅｒ０（）ｉｎｔｅｒｒｕｐｔ１ｕｓｉｎｇ１{
ＴＨ０＝０×
００；
ＴＬ０＝０×
Ｅ６；
Ｐ３＿７＝！
Ｐ３＿７；
}
／*主程序*／
ｍａｉｎ（）
{
ＴＭＯＤ＝Ｏ×
０２；
ＥＡ＝１；
ＥＴ０＝１；
ＴＲ０＝１；
ｗｈｉｌｅ（１）；
ｗｈｉｌｅ（ｐ１＿３＝１）
ｐ３＿４＝１；
ｄｅｌａｙ（２）；
例六：
用８９Ｃ２０５１控制摩托车报警系统
——摩托车防盗报警系统维修后感
笔者花了二百元左右买回一只摩托车防盗报警系统装在车上，非常方便。
该系统有防盗设定、寻车求救、启动暖车、解除防盗等四项功能。
但用了不到一个月，报警喇叭就会无故“嘀嘀”响个不停，所有功能完全消失，联系厂家无果，只能自己修。
经分析，系统由四部分组成，结构如图１所示。
经查，除信号处理电路外，其他电路功能正常。
信号处理电路用的是台湾义隆的ＥＭ７８Ｐ１５６ＡＰ单片机，其原理图如图２。
在用遥控器控制时，ＰＴ２２７２的ＶＴ脚输出暂存高电平，相应的数据输出端Ｄ１～Ｄ４输出锁存高电平。
单片机判断ＶＴ信号，再根据Ｄ１～Ｄ４的状态输出相应的信号。
１．若Ｄ１为高电平，报警一次，Ｌ、Ｒ闪一次，三秒钟后进入防盗状态。
此时，若反馈电路（振动信号，锁头正电）有信号，则报警一次，若五秒钟内仍有反馈信号，则连续报警，直至用遥控器解除。
２．若Ｄ２为高电平，报警二次，Ｌ、Ｒ闪二次，熄火继电器动作一次，防盗解除。
３．若Ｄ３为高电平，锁头正电继电器吸合，同时启动继电器吸合两秒钟。
若此时仍然按住遥控器，则启动继电器保持吸合，直到放开遥控器。
４．若Ｄ４为高电平，则报警十六次，同时Ｌ、Ｒ闪十六次。
弄清了以上工作方式，笔者便着手用８９Ｃ２０５１单片机替代ＥＭ７８Ｐ１５６ＡＰ，程序流程见图３，接线如图４。
说明：
系统时钟：
１１．０５９２ＭＨｚ；
输入为高电平有效；
输出为低电平有效。
程序清单略。
系统调试：
焊一块８９Ｃ２０５１电路板；
将继电器的驱动管ＰＮＰ换成ＮＰＮ，略改电路；
拆下ＥＭ７８Ｐ１５６ＡＰ，用排线引出需要的Ｉ／Ｏ口线并与８９２０５１电路板连接；
将电路接到１２Ｖ稳压电源上，按动遥控器，检查继电器吸合情况，一切正常后再接到摩托车上。
读者亦可购买配件（无线遥控发射接收组件、振动传感器、报警器、其他元器件）自己组装系统。
微电脑视频运动检测报警器
《电子报》１９９９年第４６期登载了笔者撰写的《ＴＳＤ－２视频运动检测器》一文，得到了读者的广泛关注和对产品的一致肯定。
现在，我们应用单片机控制技术，做了较大的改进，使其更具可靠性、实用性和普及性。
一、视频运动检测报警器的功能
视频运动检测属于安全监控系统中的报警设备，功效与红外微波双鉴探测器没有多大区别。
红外、微波等传统探测器受环境因素影响很大、抗干扰能力差、误报率很高，造成值班人员不必要的紧张。
视频运动检测报警器使用时是串联在摄像头到视频监视器的视频信号线上的，它根据视频取样报警，即在监视器屏幕上根据图像内容开辟若干个长方形的隐形警戒区（如画面上的门窗、保险柜等重要部位），当监视器现场有异常情况发生时（如灯光、火情、烟雾、物体的移动等），可使警戒区窗口内图像的亮度、对比度及图像内容（即信号幅度）产生变化，当变化超过设定的安全值时，即可发出报警信号。
改型后的微电脑视频运动检测报警器有如下功能：
１．每路摄像头的视频信号可以通过运动检测报警器在监视器屏幕上设置四个视频报警警戒窗口。
这四个警戒窗口可由单片机控制，在屏幕范围内任意移动。
２．当四个警戒窗口中的任何一个窗口被触发报警后，该警戒区窗口将在屏幕上发生闪动，提示已被触发。
３．具有报警继电器输出，报警时间由单片机控制可调。
４．具有报警自动录像接口，可控制录像机自动录像。
５．可扩展ＲＳ－４８５数据接口，实现多机联动、远程设置、远程监控等功能。
二、视频运动检测报警器的工作原理
微电脑视频运动检测报警器采用模块化设计，每个模块负责处理并实现一个或多个功能，提高了系统的可靠性和应用灵活性。
图１为单路台式微电脑视频运动检测报警器电原理图。
系统主要由单片机８９Ｃ５１、视频处理模块、警戒窗口发生模块、运动检测模块四部分组成。
摄像机的全电视信号由视频处理模块ＴＳ１８２７{1}脚，经前置放大电路分成三路，其中一路与{3}脚的复合窗口脉冲混合，放大后直接送到监视器，因此监视器屏幕上显示的图像将会出现四个长方形警戒窗口。
第二路信号经同步分离电路分离出行、场同步信号，由{8}、{9}脚输出。
第三路经同步头钳位放大电路放大后由{3}脚输出。
调节{11}、{12}脚电位器可调节放大电路增益，用于改变报警检测的触发灵敏度。
警戒窗口脉冲发生模块，用于产生警戒窗口。
行、场同步信号由ＴＳ１８２８{1}、{2}脚输入，行、场同步信号由单片机控制经适当延时，产生延迟脉冲混合成复合窗
升级会员 