单片机红外遥控+步进电机+1602液晶显示c语言源程序

这是我做的红外遥控控制的1602显示转速和转向的步进电机c语言原程序,已经调试成功！有些模块是以前做其他实验时做的，现在是直接调用的,包括1602液晶显示技术,TC9012红外解码,然后就是四相步进电机的控制程序了,我是把这些东西结合起来。对这个东西有兴趣的或者要做毕业设计的可以看看啊,不懂的请上单片机论坛http://www.51hei.com/bbs/ 公开讨论，我会给大家做出详细的解答。

#include AT89X51.h>

#includestdio.h>
#includeintrins.h>
#define uchar unsigned char
#define uint unsigned int
static unsigned int count; //计数
unsigned int hour,minute,second,count;

sbit RS = P2^3;//Pin4
sbit RW = P2^2; //Pin5
sbit E = P2^4;//Pin6

#define Data P0 //数据端口
static int step_index; //步进索引数，值为0－7
bit k=0; //红外解码判断标志位，为0则为有效信号，为1则为无效
uchar n=0; //用来控制外部中断
static bit turn; //步进电机转动方向
static bit stop_flag; //步进电机停止标志
static int speedlevel; //步进电机转速参数，数值越大速度越慢，最小值为1，速度最快
static int spcount; //步进电机转速参数计数
void delay(unsigned int endcount); //延时函数，延时为endcount*0.5毫秒
void gorun(); //步进电机控制步进函数
uchar data date[4]; //date数组为存放地址原码，反码，数据原码，反码
char data Test1[]=" ";
#define IR_RE P3_2
void DelayUs(unsigned char us)//delay us
{
unsigned char uscnt;
uscnt=us>>1;/* Crystal frequency in 12MHz*/
while(--uscnt);
}
/*****************************************************/
void DelayMs(unsigned char ms)//delay Ms
{
while(--ms)
{
DelayUs(250);
DelayUs(250);
DelayUs(250);
DelayUs(250);
}
}
void WriteCommand(unsigned char c)
{
DelayMs(5);//short delay before operation
E=0;
RS=0;
RW=0;
_nop_();
E=1;
Data=c;
E=0;
}
/******************************************************/
void WriteData(unsigned char c)
{
DelayMs(5); //short delay before operation
E=0;
RS=1;
RW=0;
_nop_();
E=1;
Data=c;
E=0;
RS=0;
}
/***********http://www.51hei.com单片机原创作品******************/
void ShowChar(unsigned char pos,unsigned char c)
{
unsigned char p;
if (pos>=0x10)
p=pos+0xb0; //是第二行则命令代码高4位为0xc
else
p=pos+0x80; //是第二行则命令代码高4位为0x8
WriteCommand (p);//write command
WriteData (c); //write data
}
/********************************************************/
void ShowString (unsigned char line,char *ptr)
{
unsigned char l,i;
l=line4;
for (i=0;i16;i++)
ShowChar (l++,*(ptr+i));//循环显示16个字符
}
/*******************************************************/
void InitLcd()
{
DelayMs(15);
WriteCommand(0x38); //display mode
WriteCommand(0x38); //display mode
WriteCommand(0x38); //display mode
WriteCommand(0x06); //显示光标移动位置
WriteCommand(0x0c); //显示开及光标设置
WriteCommand(0x01); //显示清屏

}

/*--------------------------延时1ms程子程序-----------------------*/
delay1000()
{
uint i,j;
for(i=0;i1;i++)
for(j=0;j124;j++)
;
}

/*---------------------------延时882us子程序-----------------------*/

delay882()
{
uint i,j;
for(i=0;i1;i++)
for(j=0;j109;j++)
;
}

/*--------------------------延时2400ms程子程序-----------------------*/

delay2400()
{
uint i,j;
for(i=0;i3;i++)
for(j=0;j99;j++)
;
}
void IR_decode()
{
uchar i,j;
while(IR_RE==0);
delay2400();
if(IR_RE==1) //延时2.4ms后如果是高电平则是新码
{
delay2400(); //延时4.8ms避开4.5ms的高电平
for(i=0;i4;i++)
{
for(j=0;j8;j++)
{
while(IR_RE==0); //等待地址码第1位高电平到来
delay882(); //延时882ms判断此时引脚电平
///CY=IR_RE;
if(IR_RE==0)
{
date[i]>>=1;
date[i]=date[i]0x7f;
}
else if(IR_RE==1)
{
delay1000();
date[i]>>=1;
date[i]=date[i]|0x80;
}
} //1位数据接收结束
} //32位二进制码接收结束

}
if (date[2]==0x16)
TR0 = 0;
else if(date[2]==0x14)
{TR0 = 1;
}
else if(date[2]==0x10)
{if (speedlevel>1)
speedlevel--;
else
speedlevel=1;
}
else if(date[2]==0x1A)
{if(speedlevel5)
speedlevel++;
else
speedlevel=5;
}
else if(date[2]==0x11)
turn=~turn;

}
void int0() interrupt 0 using 1
{
uint i;
for(i=0;i4;i++)
{
delay1000();
if(IR_RE==1){k=~k;} //刚开始为4.5ms的引导码，如果4ms内出现高电平则退出解码程序
}