這是我做的紅外遙控控制的1602顯示轉(zhuǎn)速和轉(zhuǎn)向的步進電機c語言原程序,已經(jīng)調(diào)試成功！有些模塊是以前做其他實驗時做的，現(xiàn)在是直接調(diào)用的,包括1602液晶顯示技術(shù),TC9012紅外解碼,然后就是四相步進電機的控制程序了,我是把這些東西結(jié)合起來。對這個東西有興趣的或者要做畢業(yè)設計的可以看看啊,不懂的請上單片機論壇http://www.51hei.com/bbs/ 公開討論，我會給大家做出詳細的解答。

#include AT89X51.h>

#includestdio.h>
#includeintrins.h>
#define uchar unsigned char
#define uint unsigned int
static unsigned int count; //計數(shù)
unsigned int hour,minute,second,count;

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

#define Data P0 //數(shù)據(jù)端口
static int step_index; //步進索引數(shù)，值為0－7
bit k=0; //紅外解碼判斷標志位，為0則為有效信號，為1則為無效
uchar n=0; //用來控制外部中斷
static bit turn; //步進電機轉(zhuǎn)動方向
static bit stop_flag; //步進電機停止標志
static int speedlevel; //步進電機轉(zhuǎn)速參數(shù)，數(shù)值越大速度越慢，最小值為1，速度最快
static int spcount; //步進電機轉(zhuǎn)速參數(shù)計數(shù)
void delay(unsigned int endcount); //延時函數(shù)，延時為endcount*0.5毫秒
void gorun(); //步進電機控制步進函數(shù)
uchar data date[4]; //date數(shù)組為存放地址原碼，反碼，數(shù)據(jù)原碼，反碼
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單片機原創(chuàng)作品******************/
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));//循環(huán)顯示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位數(shù)據(jù)接收結(jié)束
} //32位二進制碼接收結(jié)束

}
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;