红外避障模块(红外对管)51单片机驱动源程序

fanichicl

红外避障模块(红外对管)51单片机驱动源程序
3 \6 P% ]7 Z0 v/ M  q: C
* l: b  V4 ^- r
避障传感器模块电路图

51单片机源程序：
/******************************************
  x6 S- }1 P* R& X) b2 o0 t传感器触发测试
$ Z; W3 k' l' Y% k( D6 I单片机：STC89C52
波特率：9600
# H/ x- L/ y' c% T3 Y" I+ ~*****************************************/
#include <reg52.h>
unsigned char date;
/ H# z4 ^- o- C7 r: ?" o#define uchar unsigned char
#define uint unsigned int
! V$ `1 t& ~' R) |sbit key1=P0^1;

. x- `3 H' [3 v! ~9 U
8 }, A( w; R& H5 |0 r1 m# ^1 i

2 N0 A: d" i$ U4 M+ s( \/* 函数申明 -----------------------------------------------*/
void delay(uint z);
void Initial_com(void);
) E7 G7 S+ W% L. u* v

6 ]4 Y( H8 t' c  p6 b) k//***********************************************************


/*
********************************************************************************
** 函数名称 ： delay(uint z)
! ?2 q0 _7 _' I2 p9 F** 函数功能 ： 延时函数
********************************************************************************
, N. E) h: _5 f4 m% E7 I# T*/
4 {2 Z! h5 I& \6 Ivoid delay(uint z)
$ A7 k, r  z& Q0 Z+ `% f1 ~! q5 R{                                                                                                                                                                                          
7 D1 Z! k% B" u: ]3 R6 {    uint i,j;
    for(i=z;i>0;i--)
        for(j=110;j>0;j--);
}
" D. Y! D. f! k- O  H# ^



+ O$ @. a/ J( |+ n; ]/ E//******************************


( O$ o  D, K9 P//*****串口初始化函数***********
4 t4 C, i/ i1 U6 m" l9 \+ S+ p8 n0 o" z
- d% Q$ S( O! O+ q- _$ Z$ B
//******************************
0 v: b9 m  g, p8 B$ yvoid Initial_com(void)
{
EA=1;        //开总中断
+ l! ]4 D* ]* l  a' [% y3 R ES=1;        //允许串口中断
ET1=1;        //允许定时器T1的中断
TMOD=0x20;   //定时器T1，在方式2中断产生波特率
, `+ @* Y' X3 x PCON=0x00;   //SMOD=0
SCON=0x50;   // 方式1 由定时器控制
TH1=0xfd;    //波特率设置为9600
TL1=0xfd;
TR1=1;       //开定时器T1运行控制位


}


% `& _: `* q; g
& m5 |* k5 c5 V7 ~. S$ ^) m, R# ^$ q

+ B* i! ~# q* j) p
1 y4 j8 C' c% e, m! i6 ^% ~
2 U% ^/ q( S6 T. G1 }. Z
& Y) J+ G* X& f//*************************
//**********主函数*********
0 D  S/ c- Y. i% d2 j//*************************
main()
: a  O- w; e, z0 T$ M, Q, x" |6 G  C$ O{
8 o2 c3 t, o- L. t         Initial_com();
7 e0 E1 {8 Q# Y' c8 k, |         while(1)
         {
        
                  if(key1==0)
& T  G1 Q; J" j                {
' c1 `. a- N& c- T+ i* R                        delay();          //消抖动
% }! \% s  g6 T1 B+ T( f                        if(key1==0)          //确认触发
                        {
; O* y7 k2 G% z& }" C5 y! p/ u                                 SBUF=0X01;
% s* T9 [' C0 c+ V: a* B5 t/ p. g                                 delay(200);
                                
% b; A8 H) y! o: l3 @! u# h                        
                        }
# @4 U0 b- i2 {2 o3 L  c8 C           
2 _6 [  U' R' i# c9 E                }
! E0 t' ?; \3 _6 {, u                 
  e2 ^0 D# F7 O" R: n" x$ o5 }                  if(RI)
3 ?. |5 L& t; k9 }# @- K                  {
                        date=SBUF;    //单片机接受
8 C0 l7 j) A% `5 ?                        SBUF=date;    //单片机发送
$ K+ E0 A2 s/ k1 i                        RI=0;
                  
7 z- j  ^" Z4 n9 k+ Y
: }3 ~$ H% X- U- m5 O* [
; B" N- P* [1 o* d9 N2 b…………余下代码请下载附件…………

下载：

游客，如果您要查看本帖隐藏内容请回复

cat12620

谢谢分享

laijinhe

111
; m; P8 W" w! k9 G7 ^% y

Chuan5_5

正好需要

王昌帅

我想看完整版
( E8 G! ]: O/ Q4 V/ _6 n' A4 q

穆兰汐

谢谢分享！