标题:
单片机+PNP三极管红外线发射与接受程序Proteus仿真 实现遥控车
[打印本页]
作者:
马永练
时间:
2021-4-23 19:42
标题:
单片机+PNP三极管红外线发射与接受程序Proteus仿真 实现遥控车
单片机与红外收发装置及数码管,独立按键实现的遥控车仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
51hei.png
(15.35 KB, 下载次数: 94)
下载附件
2021-4-24 17:20 上传
51hei.png
(14.93 KB, 下载次数: 73)
下载附件
2021-4-24 17:20 上传
单片机红外线发射源程序如下:
/***************************************************************
作品:红外线发射
单片机: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黑下载附件…………
复制代码
所有资料51hei提供下载,仿真必须要Proteus7.5版本才能打开:
红外遥控车 独立按键.zip
(191.29 KB, 下载次数: 121)
2021-4-23 19:42 上传
点击文件名下载附件
下载积分: 黑币 -5
作者:
xjlfh
时间:
2021-5-14 13:09
请教这个发射线路程序如何移植到STC15F104W上去运行?我只需要简单的1到4按键按下发射对应的键码就可以,网上所有的发射程序我试了都可以在AT89和stc89系列上运行,但在STC15F100系列上郡运行不了,对C不太懂,只会看简单的程序。正在学习中。
作者:
wcf101
时间:
2021-5-20 16:11
完全不用定时器中断能做出来这个吗
作者:
gyn20022002
时间:
2022-9-18 01:12
楼主把这个做出来需要什么零件呢,有没有清单什么的
作者:
15775075193
时间:
2023-5-4 19:10
楼主,为什么我用的时候两个电机同时动的。还有左边遥控器用了没反应的
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1