紅外遙控調速風扇

1、紅外遙控調速風扇1組員： 李國平 張少華 宋尚師2紅外遙控調速風扇 原理：根據 紅外遙控控制電風扇，利用數碼管顯示風扇轉速檔位。從而達到紅外遙控智能風扇的效果。 3調試程序： #includevoid delay(int i)int j;while(i-)for(j=0;j82;j+);4調試程序：main()while(1)P3=0 xff;P2=0 xff;P1=0 xff;delay(3000);P1=0 x00;P2=0 x00;P3=0 x00;delay(3000); 5原理圖6PCB7程序#include typedef unsigned char u8; typedef uns

2、igned int u16;#define success 1#define fail 0sbit IrPort = P33;sbit dong =P37;u8 IrData4=0,0,0,0;/u8 table =0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90;u8 table =0 x09,0 x6f,0 x1a,0 x4a,0 x6c,0 xc8,0 xda,0 xda,0 xda,0 xda;/*延時子函數*/ void DelayNms(u16 n)/12MHz晶振，約延時n*1ms unsigned int i

3、;while(n-) for(i=0;i82;i+);/*延時883us函數*/ void Delay883us(void) unsigned char i;for(i=0;i250;i+);for(i=0;i42;i+);/*延時2400us函數*/ void Delay2400us(void) unsigned int i;8程序for(i=0;i415;i+);/*紅外接收子函數*/ u8 Ir_Receive(void) /reentrantu8 i,j;IrPort = 1;if(IrPort = 0)for(i=0;i2;i+) /此處為10時校驗的最嚴謹，數值較小時兼容性更強De

4、lay883us();if(IrPort = 1)return fail;while(IrPort = 0);Delay2400us();if(IrPort = 0)return fail;Delay2400us();for(i=0;i4;i+)for(j=0;j1)|0 x80;9程序elseIrDatai = (IrDatai1);return success;else return fail;/*中斷子函數以及數碼管顯示*/ void Int1(void) interrupt 2Ir_Receive();P1=tableIrData2;P2=0 x00;/*風扇轉速控制子函數*/ voi

5、d zhs(void)double i;switch(IrData2)case 0 : dong = 1; break;case 1 : dong = 1;for(i=0;i=200;i+); dong = 0;for(i=0;i=100;i+); break;case 2 : dong =1 ;for(i=0;i=100;i+);10程序 dong =0 ;for(i=0;i=100;i+); break;case 3 : dong =1 ;for(i=0;i=10;i+); dong =0 ;for(i=0;i=100;i+); break;case 4 : dong =1 ;for(i=0;i=1;i+); dong =0 ;for(i=0;i=100;i+); break; case 5 : dong =1 ;for(i=0;i=1;i+); dong =0 ;for(i=0;i=1000;i+); break;default : break; /*主函數以及中斷初始