单片机+PNP三极管红外线发射与接受程序Proteus仿真实现遥控车

ID:730449 · 发表于 2021-4-23 19:42

单片机与红外收发装置及数码管,独立按键实现的遥控车仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

单片机红外线发射源程序如下:

/***************************************************************
作品：红外线发射
单片机：STC89C52RC
晶振：12M
编译环境：Keil uVision4 V9.00
***************************************************************/
//
// 发射引脚（接PNP三极管b极）
// PNP三极管e极接2Ω电阻，c极接红外发射管
#include <REG51.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define SBM 0x80 //识别码
#define m9 (65536-9000) //约9mS
#define m4_5 (65536-4500) //约4.5mS
#define m1_6 (65536-1630) //约1.65mS
#define m_65 (65536-580) //约0.65mS
#define m_56 (65536-560) //约0.56mS
#define m40 (65536-40000) //约40mS
#define m56 (65536-56000) //56mS
#define m2_25 (65536-2250) //约2.25mS
sbit IR = P3^6; //定义发射引脚（接PNP三极管基极）
//按键
sbit key1=P1^1;
sbit key2=P1^2;
sbit key3=P1^3;
sbit key4=P1^4;
sbit key5=P1^5;
sbit key6=P1^6;
sbit key7=P1^7;
void keyscan(void);
void ZZ(uchar x);
void Z0(uchar temp);
void TT0(bit BT,uint x);
void YS(uchar time);
/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：主函数
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void main(void)
{
TMOD = 0x01; //T0 16位工作方式
IR=1; //发射端口常态为高电平
while(1)
{
keyscan();
}
}
/***************************************************************
函数功能：散转程序
入口参数：v
//
// 13 14 15 16
// 9 10 11 12
// 5 6 7 8
// 1 2 3 4
***************************************************************/
void keyscan(void)
{
//发送0x01
if(key1==0)
{
YS(5);
if(key1==0)
{
ZZ(0x01);
while(!key1);//等待按键释放
}
}
//发送0x02
if(key2==0)
{
YS(5);
if(key2==0)
{
ZZ(0x02);
while(!key2);//等待按键释放
}
}
//发送0x03
if(key3==0)
{
YS(5);
if(key3==0)
{
ZZ(0x03);
while(!key3);//等待按键释放
}
}
//发送0x04
if(key4==0)
{
YS(5);
if(key4==0)
{
ZZ(0x04);
while(!key4);//等待按键释放
}
}
//发送0x05
if(key5==0)
{
YS(5);
if(key5==0)
{
ZZ(0x05);
while(!key5);//等待按键释放
}
}
//发送0x06
if(key6==0)
{
YS(5);
if(key6==0)
{
ZZ(0x06);
while(!key6);//等待按键释放
}
}
//发送0x07
if(key7==0)
{
YS(5);
if(key7==0)
{
ZZ(0x07);
while(!key7);//等待按键释放
}
}
}
/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：发送主程序
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void ZZ(uchar x)
{
TT0(1,m9); //高电平9mS
TT0(0,m4_5); //低电平4.5mS
/*┈ 发送4帧数据 ┈*/
Z0(SBM);
Z0(~SBM);
Z0(x);
Z0(~x);
/*┈┈ 结束码 ┈┈*/
TT0(1,m_65);
TT0(0,m40);
}
/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：单帧发送程序
入口参数：1帧数据
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void Z0(uchar temp)
{
uchar v;
for (v=0;v<8;v++) //循环8次移位
{
TT0(1,m_65); //高电平0.65mS
if(temp&0x01) TT0(0,m1_6); //发送最低位
else TT0(0,m_56);
temp >>= 1; //右移一位
}
}
/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：38KHz脉冲发射 + 延时程序
入口参数：（是否发射脉冲,延时约 x (uS)）
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void TT0(bit BT,uint x)
{
TH0 = x>>8; //输入T0初始值
TL0 = x;
TF0=0; //清0
TR0=1; //启动定时器0
if(BT == 0) while(!TF0); //BT=0时不发射38KHz脉冲只延时；BT=1发射38KHz脉冲且延时；
else while(1) //38KHz脉冲，占空比5:26
{
IR = 0;
if(TF0)break;
if(TF0)break;
IR = 1;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
}
TR0=0; //关闭定时器0
TF0=0; //标志位溢出则清0
IR =1; //脉冲停止后，发射端口常态为高电平
}
/***************************************************************
函数功能：按键消抖延时程序
入口参数：1ms×time （晶振=12MHz）
***************************************************************/
void YS(uchar time)
{
uchar i,j;
for(i=0; i<time; i++)
for(j=0; j<247; j++)_nop_();
}

复制代码

#include <REGX52.H>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define duanma P0
#define weima P2
//按键
sbit key1=P1^1;
sbit key2=P1^2;
sbit key3=P1^3;
sbit key4=P1^4;
sbit key5=P1^5;
sbit key6=P1^6;
sbit key7=P1^7;
//红外接收头
sbit IR=P3^2;
//电机接口
sbit motor1=P3^4;
sbit motor2=P3^5;
sbit motor3=P3^6;
sbit motor4=P3^7;
uchar code table[]={0xc0,0xf9,0xA4,0xB0,0x99,0x92,0x82,0xf8,0x80,0x90,0xBF};//数码管显示0~9和 -
uchar N[4]; //识别码，操作码存放
uchar num,count;//状态，加减选择
uint speed=100;//速度
//延时函数
void delay(uint mux)
{
uint i,j;
for(i=mux;i>0;i--)
for(j=100;j>0;j--);
}
//数码管显示内容函数
void display()
{
delay(1);
weima=0x01;
duanma=table[num];//显示状态
delay(1);
weima=0x02;
duanma=table[10];//显示-
delay(1);
weima=0x04;
duanma=table[10];//显示-
delay(1);
weima=0x08;
duanma=table[speed/100];//显示档位
delay(1);
}
//前进
void go()
{
uint i;
for(i=speed;i>0;i=i-5)
{
if(i>10)
{
motor1=0;
motor2=1;
motor3=1;
motor4=0;
}
if(i<11)
{
motor1=0;
motor2=0;
motor3=0;
motor4=0;
}
}
}
//后退
void back()
{
uint i;
for(i=speed;i>0;i=i-5)
{
if(i>10)
{
motor1=1;
motor2=0;
motor3=0;
motor4=1;
}
if(i<11)
{
motor1=0;
motor2=0;
motor3=0;
motor4=0;
}
}
}
//停止
void stop()
{
motor1=0;
motor2=0;
motor3=0;
motor4=0;
}
//左转
void turn_left()
{
uint i;
for(i=speed;i>0;i=i-5)
{
if(i>10)
{
motor1=1;
motor2=0;
motor3=1;
motor4=0;
}
if(i<11)
{
motor1=0;
motor2=0;
motor3=0;
motor4=0;
}
}
}
//右转
void turn_right()
{
uint i;
for(i=speed;i>0;i=i-5)
{
if(i>10)
{
motor1=0;
motor2=1;
motor3=0;
motor4=1;
}
if(i<11)
{
motor1=0;
motor2=0;
motor3=0;
motor4=0;
}
}
}
//按键控制
void keyscan()
{
//加速
if(key1==0)
{
delay(10);
if(key1==0)
{
count=1;
while(!key1);//等待按键释放
}
}
//左转
if(key2==0)
{
delay(10);
if(key2==0)
{
num=3;
while(!key2);//等待按键释放
}
}
//前进
if(key3==0)
{
delay(10);
if(key3==0)
{
num=1;
while(!key3);//等待按键释放
}
}
//停止
if(key4==0)
{
delay(10);
if(key4==0)
{
num=0;
while(!key4);//等待按键释放
}
}
//后退
if(key5==0)
{
delay(10);
if(key5==0)
{
num=2;
while(!key5);//等待按键释放
}
}
//减速
if(key6==0)
{
delay(10);
if(key6==0)
{
count=2;
while(!key6);//等待按键释放
}
}
//右转
if(key7==0)
{
delay(10);
if(key7==0)
{
num=4;
while(!key7);//等待按键释放
}
}
}
//主函数
void main(void)
{
IT0 = 1;
EX0 = 1;
EA = 1;
while(1)
{
display();
keyscan();
switch(num)
{
case 0: stop(); break;//暂停
case 1: go(); break;//前进
case 2: back(); break; //后退
case 3: turn_left(); break;// 左转
case 4: turn_right(); break; // 右转
}
if((count==1)&&(speed<410)){speed=speed+100;count=0;} //加速
if((count==2)&&(speed>110)){speed=speed-100;count=0;}//减速
}
}
/********************** 外部中断函数************************/
void exint0() interrupt 0
{
uint cnt;
uchar i;
EX0 = 0;
cnt = 0;
……………………
…………限于本文篇幅余下代码请从51黑下载附件…………