小白請教大佬，51單片機，STC89C52芯片。做了一個基于環境光照調整LED燈組的，在實作紅外手動控制的時候出現了問題：紅外能控制單片機，但是控制后不知道怎么退出外部中斷0，并且在控制時LED燈組雖有回應，但還會有一點非常微弱的光，并且這個光又會受自動調節的影響。求大佬指點
uj5u.com熱心網友回復：
等大佬。。。。。。。uj5u.com熱心網友回復：
叫別人瞎猜？無圖無代碼！uj5u.com熱心網友回復：
對不起，我代碼直接粘上來？我單獨當一個評論里。因為我寫的代碼不規范，還在想的是實作功能
uj5u.com熱心網友回復：
#include "reg52.h" //此檔案中定義了單片機的一些特殊功能暫存器#include"XPT2046.h" typedef unsigned int u16; //對資料型別進行宣告定義typedef unsigned char u8;sbit LSA=P2^2;sbit LSB=P2^3;sbit LSC=P2^4;sbit LED1=P2^0;sbit LED3=P2^5;sbit LED4=P2^6;sbit LED5=P2^7;sbit IRIN=P3^2;u16 leed;u8 disp[4];u8 IrValue[6];u8 Time;u8 DisplayData[8];u8 code smgduan[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};/******************************************************************************** 函 數 名 : delay* 函式功能 : 延時函式，i=1時，大約延時10us*******************************************************************************/void delay(u16 i){ while(i--); }/******************************************************************************** 函式名 : IrInit()* 函式功能 : 初始化紅外線接收* 輸入 : 無* 輸出 : 無*******************************************************************************/void IrInit(){ IT0=1;//下降沿觸發 EX0=1;//打開中斷0允許 EA=1; //打開總中斷 IRIN=1;//初始化埠}/******************************************************************************** 函式名 :datapros()* 函式功能 :資料處理函式* 輸入 : 無* 輸出 : 無*******************************************************************************/u16 datapros(){ u16 temp; static u8 i; if(i==50) { i=0; temp = Read_AD_Data(0xA4); // AIN2 光敏電阻 } i++; leed = temp; disp[0]=smgduan[temp/1000];//千位 disp[1]=smgduan[temp%1000/100];//百位 disp[2]=smgduan[temp%1000%100/10];//個位 disp[3]=smgduan[temp%1000%100%10]; return leed; }/******************************************************************************** 函式名 :DigDisplay()* 函式功能 :數碼管顯示函式* 輸入 : 無* 輸出 : 無*******************************************************************************/void DigDisplay(){ u8 i; for(i=0;i<4;i++) { switch(i) //位選，選擇點亮的數碼管， { case(0): LSA=0;LSB=0;LSC=0; break;//顯示第0位 case(1): LSA=1;LSB=0;LSC=0; break;//顯示第1位 case(2): LSA=0;LSB=1;LSC=0; break;//顯示第2位 case(3): LSA=1;LSB=1;LSC=0; break;//顯示第3位 } P0=disp[3-i];//發送資料 delay(100); //間隔一段時間掃描 P0=0x00;//消隱 } }/******************************************************************************** 函 數 名 : LedPlay* 函式功能 : LED顯示檔位* 輸 入 : 無* 輸 出 : 無*******************************************************************************/void LedPlay(){ u16 sult = leed/100; switch(sult) { case 1 :LED4 = 0; LED5 = 0; LED3 = 0; break; case 2 :LED4 = 0; LED5 = 0; LED3 = 1; break; case 3 :LED4 = 0; LED5 = 0; LED3 = 1; break; case 5 :LED4 = 1; LED5 = 0; LED3 = 1; break; default: LED4 = 1; LED5 = 1; LED3 = 1; }}/******************************************************************************** 函式名 : SponseIr()* 函式功能 ：根據操作做出動作* 輸入 : IrValue* 輸出 : 無*******************************************************************************/void SponseIr(u16 dat){ switch(dat) { case 0x0c: LED3 = 1;break; case 0x18: LED3 = 1;LED4 = 1;break; case 0x5e: LED3 = 1;LED4 = 1;LED5 = 1;break; }}/******************************************************************************** 函 數 名 : main* 函式功能 : 主函式* 輸 入 : 無* 輸 出 : 無*******************************************************************************/void main(){ IrInit(); //紅外線初始化 while(1) { datapros(); //資料處理函式 DigDisplay();//數碼管顯示函式 LedPlay(); //LED回應函式 SponseIr(IrValue[2]); //紅外線回應 } }/******************************************************************************** 函式名 : ReadIr()* 函式功能 : 讀取紅外數值的中斷函式* 輸入 : 無* 輸出 : 無*******************************************************************************/void ReadIr() interrupt 0{ u8 j,k; u16 err; Time=0; delay(700); //7ms if(IRIN==0) //確認是否真的接收到正確的信號 { err=1000; //1000*10us=10ms,超過說明接收到錯誤的信號 /*當兩個條件都為真是回圈，如果有一個條件為假的時候跳出回圈，免得程式出錯的時 侯，程式死在這里*/ while((IRIN==0)&&(err>0)) //等待前面9ms的低電平過去 { delay(1); err--; } if(IRIN==1) //如果正確等到9ms低電平 { err=500; while((IRIN==1)&&(err>0)) //等待4.5ms的起始高電平過去 { delay(1); err--; } for(k=0;k<4;k++) //共有4組資料 { for(j=0;j<8;j++) //接收一組資料 { err=60; while((IRIN==0)&&(err>0))//等待信號前面的560us低電平過去 { delay(1); err--; } err=500; while((IRIN==1)&&(err>0)) //計算高電平的時間長度。 { delay(10); //0.1ms Time++; err--; if(Time>30) { return; } } IrValue[k]>>=1; //k表示第幾組資料 if(Time>=8) //如果高電平出現大于565us，那么是1 { IrValue[k]|=0x80; } Time=0; //用完時間要重新賦值 } } } if(IrValue[2]!=~IrValue[3]) //校驗資料 { return; } } }
uj5u.com熱心網友回復：
代碼在我帖子第一個，麻煩大佬了。
uj5u.com熱心網友回復：
程式不要寫在中斷里面放到主函式內，中斷里面只寫接收到信號的一個邏輯值，這個邏輯值用于去執行，執行完成恢復邏輯。uj5u.com熱心網友回復：
好的，謝謝您。我會認真去理解并嘗試。
轉載請註明出處，本文鏈接：https://www.uj5u.com/qita/57906.html
標籤：單片機/工控
下一篇：求大神指導 做一個多級選單