/*********************************************************************/
//?????????????????????????remote.c
//???????????????????????學(xué)習(xí)型遙控器
//?????????????????????使用keil?c51?2004.10.12??????
/*********************************************************************/
//使用AT89C52單片機，12MHZ晶振，
//
//#pragma?src（E:\remote.asm）
#include?“reg51.h“
#include?“intrins.h“?????//_nop_（）;延時函數(shù)用
//
#define?uchar?unsigned?char
#define?uint?unsigned?int
//
sbit??studylamp=P1^6;????????//學(xué)習(xí)狀態(tài)指示燈
sbit??lamp=P1^7;?????????????//發(fā)射指示燈
sbit??studykey=P3^2;?????????//學(xué)習(xí)鍵（中斷口）
sbit??remotein=P3^4;?????????//遙控信號輸入口?
sbit??remoteout=P3^5;?????????//?遙控輸出口
sbit??txkey=P1^0???;???????????//發(fā)射鍵
//
//
uint?ijm=255nks;
uchar?idata??remotedata[206];//存肪沖寬度數(shù)據(jù)用
uint???head;???????????//存起始位用
uint???remdata;
//
//
////
/*********1毫秒延時程序**********/
delay1ms（uint?t）
{
for（i=0;i???for（j=0;j<120;j++）
???;
}
//
//
/***********初始化函數(shù)**********/
clearmen（）
{
studylamp=0;???????????//關(guān)學(xué)習(xí)燈
lamp=0;????????????????//關(guān)發(fā)射指示
remoteout=0;???????????//關(guān)遙控輸出
remotein=1;????????????//
for（i=0;i<206;i++）?????//清內(nèi)存
{remotedata[i]=0x00;}
IE=0x00;
IP=0x01;
TMOD=0x22;?????????????//8位自動重裝模式
PCON=0X00;
TH1=0xf3;??????????????//40KHZ初值
TL1=0xf3;
IT0=1;
EX0=1;????????????????//外中斷允許
EA=1;?????????????????//開總中斷
}
//
//
/**********鍵功能函數(shù)************/
keywork（）
{
?if（txkey==0）
?{
????while（txkey==0）;?????//等待鍵釋放
????ET1=1;TR1=1;?????????//發(fā)起始位?
????for（i=head;i>0;i--）{;}
	remoteout=0;ET1=0;TR1=0;
	n=0;
	while（1）
	{
??????if（remotedata[n]==0x00）{delay1ms（10）;break;}//數(shù)據(jù)為0結(jié)束
	??for（i=remotedata[n];i>0;i--）{_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;}
	??lamp=~lamp;n++;//偶地址不發(fā)脈沖
//
	??ET1=1;TR1=1;??//奇地址發(fā)調(diào)制脈沖
??????for（i=remotedata[n];i>0;i--）{;}
	??remoteout=0;ET1=0;TR1=0;n++;
	}
??}
}
//
//
/***********主函數(shù)***************/
main（）
{
clearmen（）;??????????//初始化?
while（1）
?{
??keywork（）;???????//按鍵掃描
??}
}
//
//
/*********40KHZ發(fā)生器***********/
//定時中斷T1
void?time_intt1（void）?interrupt?3?
{
?remoteout=~remoteout;
}
//
//
/***********學(xué)習(xí)函數(shù)?***********/
//外中斷0
void?intt0（void）?interrupt?0?
{
ET1=0;TR1=0;EX0=0;EA=0;
head=0;studylamp=1;lamp=0;
while（studykey==0）;???????????//等待鍵釋放
while（remotein==1）;???????????//等待遙控碼輸入
head=0;???????????????????????//讀入起始位
while（remotein==0）{_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;head++;}
n=0;remdata=0x0000;?
while（1）
	?{?
???????while（remotein==1）{_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;remdata++;}
	???if（remdata>m）??????????????????//高電平>5毫秒退出
	???{remotedata[n]=0x00;EX0=1;EA=1;goto?end;}
	???remotedata[n]=remdata;n++;?????//存高電平脈寬數(shù)據(jù)
???????remdata=0x0000;??????????????????//脈寬計數(shù)器清零?
	???while（remotein==0）{_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_（）;_nop_

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????15872??2002-01-15?10:48??學(xué)習(xí)型紅外線遙控\元器件清單.xls

?????文件?????131072??2002-01-12?09:12??學(xué)習(xí)型紅外線遙控\原理圖和PCB\PCB2.PcbDoc

?????文件??????31515??2002-01-07?09:43??學(xué)習(xí)型紅外線遙控\原理圖和PCB\PCB_Project1.PrjPCB

?????文件???????4096??2002-01-05?01:50??學(xué)習(xí)型紅外線遙控\原理圖和PCB\receiver.SchLib

?????文件?????149504??2012-02-18?11:55??學(xué)習(xí)型紅外線遙控\原理圖和PCB\SHEET1.SCHDOC

?????文件???????5632??2002-01-05?01:50??學(xué)習(xí)型紅外線遙控\原理圖和PCB\U1.SchLib

?????文件?????329216??2012-02-18?10:44??學(xué)習(xí)型紅外線遙控\原理圖和PCB\學(xué)習(xí)型紅外線遙控器.PcbDoc

?????文件?????142336??2012-02-18?10:43??學(xué)習(xí)型紅外線遙控\原理圖和PCB\學(xué)習(xí)型紅外線遙控器.SchDoc

?????文件???????7551??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote

?????文件???????3447??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.c

?????文件???????1930??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.hex

?????文件?????????60??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.lnp

?????文件???????6354??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.LST

?????文件??????10195??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.M51

?????文件???????8237??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.OBJ

?????文件???????1263??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.Opt

?????文件???????1263??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.opt.bak

?????文件????????394??2005-03-25?11:06??學(xué)習(xí)型紅外線遙控\源程序\remote.plg

?????文件???????1734??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.Uv2

?????文件???????1734??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\remote.Uv2.bak

?????文件??????56644??2012-02-18?10:29??學(xué)習(xí)型紅外線遙控\源程序\remote.uvopt

?????文件??????13364??2012-02-18?10:29??學(xué)習(xí)型紅外線遙控\源程序\remote.uvproj

?????文件???????5115??2002-04-16?14:32??學(xué)習(xí)型紅外線遙控\源程序\STARTUP.A51

?????文件??????11675??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\STARTUP.LST

?????文件????????758??2005-03-25?11:05??學(xué)習(xí)型紅外線遙控\源程序\STARTUP.OBJ

?????文件?????146177??2012-03-02?17:09??學(xué)習(xí)型紅外線遙控\照片?視頻\照片1.jpg

?????文件????9983614??2013-04-19?09:01??學(xué)習(xí)型紅外線遙控\照片?視頻\自學(xué)習(xí)紅外.avi

?????目錄??????????0??2018-07-08?03:28??學(xué)習(xí)型紅外線遙控\原理圖和PCB

?????目錄??????????0??2018-07-07?09:34??學(xué)習(xí)型紅外線遙控\源程序

?????目錄??????????0??2018-07-07?09:34??學(xué)習(xí)型紅外線遙控\照片?視頻

............此處省略4個文件信息