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

fanichicl

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


2 i8 J: _$ C) S% w1 A避障传感器模块电路图

51单片机源程序：
/******************************************
传感器触发测试
单片机：STC89C52
波特率：9600
3 W: n; \& y0 i1 ~" e*****************************************/
#include <reg52.h>
2 D1 E, i1 C5 c7 z9 K. }unsigned char date;
#define uchar unsigned char
#define uint unsigned int
sbit key1=P0^1;

: t; r/ x& p+ z, h0 U) f' V
; o- T- e* X8 ?2 x- l; c

/* 函数申明 -----------------------------------------------*/
9 l: X, X. E* \$ \, evoid delay(uint z);
void Initial_com(void);


& s4 v6 D% @9 I3 D' }//***********************************************************
" b% {5 ~( i1 }5 H
3 ?8 J: u) \8 w+ N
/*
********************************************************************************
** 函数名称 ： delay(uint z)
& @4 j) ^# n* f- O; F/ H** 函数功能 ： 延时函数
, L7 h% m! L/ J) I9 j0 e- E# X1 X********************************************************************************
*/
! t: ]( q! d3 A$ tvoid delay(uint z)
& l$ X' D5 }5 v% |2 P3 ]' F{                                                                                                                                                                                          
    uint i,j;
    for(i=z;i>0;i--)
: C! r: j( I+ U  ^        for(j=110;j>0;j--);
: t9 F8 A6 p) K: M7 v4 ?6 W4 l! T; A- J5 |}

3 u: \& s. h5 r+ _


: ?& D: N3 I* b$ _+ j//******************************

# q! g1 H8 z7 I5 I
//*****串口初始化函数***********
5 G3 R* Y. i# R8 {* Z6 K! W" b

//******************************
' r- \6 p* p% E- p$ p) ^" ?! L  G, U0 Rvoid Initial_com(void)
4 q* ]( a+ M. D$ s: x{
EA=1;        //开总中断
ES=1;        //允许串口中断
ET1=1;        //允许定时器T1的中断
TMOD=0x20;   //定时器T1，在方式2中断产生波特率
3 h8 D1 m- I' }" F& p+ h0 P3 ^0 v PCON=0x00;   //SMOD=0
* c( F3 S) Y0 _' s0 Y SCON=0x50;   // 方式1 由定时器控制
7 b' F- k; X- S+ R; k, I, ?; Y TH1=0xfd;    //波特率设置为9600
& K  M# Z0 f1 ] TL1=0xfd;
+ q# }4 W3 w$ \0 u TR1=1;       //开定时器T1运行控制位
3 E6 [! z7 g+ T
! {( h: ^4 }) m0 t8 z* \9 n/ k% W
. {9 b! _$ v2 h. V}





% Z+ I! d8 M9 [! K$ I0 O3 D

& ]* _+ D: [1 r/ o" S
3 E7 p6 Z4 M2 {0 q  y//*************************
//**********主函数*********
//*************************
  H5 h# a; g' F% P0 e7 amain()
# p, t" O$ a5 F2 D' Z+ K8 F( F' W1 b{
         Initial_com();
         while(1)
         {
        
* P0 u% G) X; X3 x9 y4 e! `1 N4 [                  if(key1==0)
- @  I% p- b9 J                {
                        delay();          //消抖动
$ z) h( a7 ]0 g6 {3 t4 j6 L                        if(key1==0)          //确认触发
                        {
                                 SBUF=0X01;
                                 delay(200);
- }/ k- h2 Y9 H, p1 v0 q) Q9 _                                
4 A. s( i5 V$ k3 q0 A" f) ^% u/ i$ i$ W                        
                        }
/ S: W0 d4 ~  \: ~4 h7 F4 A+ t6 y           
                }
( \: ]1 U0 l* t6 b                 
' c, S% W2 z' x# e                  if(RI)
6 ^+ g& z' s) ^$ R" g, j+ C0 b                  {
                        date=SBUF;    //单片机接受
! S# x" p! g5 a& E, e  ~" ~                        SBUF=date;    //单片机发送
; d6 _+ [/ G5 i                        RI=0;
- k/ n# z+ ^7 b2 x4 o4 f, k% U4 B                  

5 q) F1 _" t* A3 n
…………余下代码请下载附件…………

( i* N8 i+ B# k7 a$ Q1 @. S) v下载：
9 V  y/ C) c; P

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

* `- D1 x2 X9 m: _- }$ M

cat12620

谢谢分享

laijinhe

111
! W; j5 X6 W9 ?2 _! p

Chuan5_5

正好需要

王昌帅

我想看完整版

穆兰汐

谢谢分享！