下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)
文檔簡介
1、/ 適合 uPD6121, uPD6122, PT2222,SC6121,HS6222,HS6221 解碼程序/ 如果是 TC9012、TC9028 TC9243、SC9012 SC9028 SC9243 HS9012 需要改參數(shù),程序 后面有注釋/#include #include#define uchar unsigned char#define uint unsigned intsbit dula=P2A6;sbit wela=P2A7;sbit di=P2A3;uchar qian,bai,shi,ge,flag1,flag2,k;uchar irreceok,ircode;uchar
2、 shu1,shu2,shu3,shu4,shu5,shu6,shu7,shu8;uint num,irtime,shu;ucharcodetable=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71;uchar table_time32;uchar table_data32;uchar table_code8;void TIM0init()TMOD=0x02;TH0=256-100;TL0=256-100;ET0=1;TR0=1;void EX0init()IT0=1;EX0=1;E
3、A=1;void time0(void) interrupt 1 using 1 / 定時器 0 中斷服務(wù)函數(shù)irtime+;void delay(unsigned int ms)unsigned int i,j;for(i=ms;i0;i-)for(j=30;j0;j-);void ex0(void) interrupt 0 using 0 / 外部中斷 0 服務(wù)函數(shù)if(flag1) / 紅外啟動標志位num+; / 給蜂鳴器用if(num=1) / 給蜂鳴器用shu=irtime; / 給蜂鳴器用if(flag2&irtime16&table_timek110&irtime80&irti
4、me90)flag2=1;if(k=32)irreceok=1;k=0;flag1=0;flag2=0;num=0; / 給蜂鳴器用irtime=0;elseflag1=1;irtime=0; void data_chuli()uchar i,j,k;k=0;for(j=0;j4;j+)ircode=0x00;for(i=0;i0;i-)di=0; delay(200); di=1; delay(200);void main()EX0init();TIM0init(); dula=0; wela=0; flag2=0; while(1) if(irreceok=1)data_chuli();
5、shu1=table_code1/16; shu2=table_code1%16; shu3=table_code2/16; shu4=table_code2%16; shu5=table_code3/16; shu6=table_code3%16;while(shu)/* switch(table_code3)case 0xff:didi(1);break; case 0xfe:didi(2);break; case 0xfd:didi(3);break; case 0xfc:didi(4);break; case 0xfb:didi(5);break; case 0xfa:didi(6);break; case 0xf9:didi(7);break; case 0xf8:didi(8);break; case 0xf7:didi(9);break;case 0xf6:didi(10);break;*/didi(1);shu=0;/*switch(table_code3)case 0xff:didi();break;case 0xfe:didi();break;case 0xfd:didi();break;case 0xfc:didi();break;case 0xfb:didi();break;case 0xfa:didi();break;case 0xf9:
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責。
- 6. 下載文件中如有侵權(quán)或不適當內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 岳陽樓記課件教學
- 七下地理課件教學課件
- 《血站信息系統(tǒng)確認指南》編制說明
- 產(chǎn)品專員簡歷模板
- 實現(xiàn)員工崗位達標的最佳途徑與方式
- 全程錄音及寫畫活動
- 專題3 除法-2023-2024學年四年級上冊數(shù)學計算大通關(guān)(北師大版)
- 山東省德州市2020屆高三地理第二次模擬考試試題含解析
- 小班繪本閱讀愛吃水果的牛教案反思
- 2024年度江西省安全員之B證(項目負責人)考前自測題及答案
- 《諫太宗十思疏》挖空訓練(學生版+答案版)詳細實用經(jīng)典
- GA/T 383-2014法庭科學DNA實驗室檢驗規(guī)范
- 新冠病毒核酸采樣考核評分標準
- 平安工地資料臺帳
- 中古日本文學課件
- 生物信息學全課件
- 五年級上冊美術(shù)課件-第11課 陶泥的世界 ▏人教版 (共21張PPT)
- 2022年山東省網(wǎng)絡(luò)安全知識大賽參考題-中(多選450題)
- 網(wǎng)絡(luò)反詐知識競賽參考題庫100題(含答案)
- 言語辱罵舉報文案
- 英語專業(yè)本科畢業(yè)論文寫作指導課件
評論
0/150
提交評論