资源描述：
《基于51单片机的红外遥控计算器程序(附电路图,注释详细)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、/*************************基于51单片机的红外遥控计算器程序****************//****本程序用基于TC9012遥控器可直接操作，电路图，遥控器编码图在最后****/#include#include#include#defineuintunsignedint#defineucharunsignedchar#definelintunsignedlongintsbitIR=P3^2;//红外接口标志bitirpro_ok,irok;ucharirtime,X,mir,fir;//红外用全局变量u
2、charIRcord[4],irdata[33];ucharDATA1[8]={0,0,0,0,0,0,0,0};//第一个数ucharDATA2[8]={0,0,0,0,0,0,0,0};//第二个数ucharRESUIT[8]={0,0,0,0,0,0,0,0};//结果ucharpx1=0,px2=0,px3=0,flag=0,flag1=0,flag2=0,flag3=0,f1=0,f2=0,f3=0,f4=0;//各全局变量uchartemp,key,fang1,fang2;lintx1=0,x2=0,y=0;//输入的数及其结果voiddelay(msx);//ms延时函数vo
3、idInit();//系统初始化voidINTInit();//中断初始化voidIrcordpro();//红外码值处理函数voidkeyscan();//键值检测voiddelay(uint);//延时voidDataOper();//数据运算voidDataHandle();//数据接收voidDisplayHandle();//显示处理voiddisplay(uchar,uchar);//数码管显示函数voidmain(){INTInit();P0=0x00;while(1){keyscan();DataHandle();DisplayHandle();}}voidINTInit(
4、){TMOD=0x02;//定时器0工作方式2，TH0是重装值，TL0是初值TH0=0x00;//reloadvalueTL0=0x00;//initialvalueET0=1;//开中断TR0=1;IT0=1;//Configureinterrupt0forfallingedgeon/INT0(P3.2)EX0=1;//EnableEX0InterruptEA=1;}voidInit()//初始化，所有数据归零{uchari;px1=0;px2=0;px3=0;flag=0;flag1=0;flag2=0;flag3=0;f1=0;f2=0;f3=0;f4=0;x1=0;x2=0;y=0
5、;for(i=0;i<8;i++){DATA1[i]=0;DATA2[i]=0;RESUIT[i]=0;}}voiddelay(msx)//msx为延时毫秒数{uinti,j;for(i=0;i<=msx;i++)for(j=0;j<=110;j++);}voiddisplay(ucharn,ucharm)//n是第几只数码管，m是显示的数字是多少{P0=P0&0x80;P0=P0
6、(n<<4);P0=P0
7、m;}voidtim0_isr(void)interrupt1using1//定时器0中断服务函数{irtime++;}voidex0_isr(void)interrupt0using
8、0//外部中断0服务函数{if(fir){if(irtime<49&&irtime>=31)mir=0;//4.5ms+4.5msirdata[mir]=irtime;irtime=0;mir++;if(mir==33){irok=1;mir=0;fir=0;}}else{irtime=0;fir=1;}}voidIrcordpro(void)//红外码值处理函数{unsignedchari,j,k;unsignedcharcord,value;k=1;for(i=0;i<4;i++)//处理4个字节{for(j=1;j<=8;j++)//处理1个字节8位{cord=irdata[k];i
9、f(cord>7)value=value
10、0x80;elsevalue=value;if(j<8)value=value>>1;k++;}IRcord[i]=value;value=0;}if((IRcord[0]=~IRcord[1])&&(IRcord[2]=~IRcord[3])){X=IRcord[2];fang2=1;}}voidkeyscan()//矩阵键值扫描子函数{if(irok){Ircordpro()
