/***********************************************************
實驗名稱：紅外發射原理
程序說明：通過紅外發射接收閃爍LED，同普通LED顯示程序相同。
??		??由于主板集成了紅外38K調制，所以只需發送需要發送的碼即可
實驗平臺：YZ200?V2.0開發箱
作者：徐銳鋒
日期：2010-10-13
廣州研展電子科技有限公司?www.52yanfa.com?（我愛研發網）??版權所有?
***********************************************************/

#include?//包含頭文件，一般情況不需要改動，頭文件包含特殊功能寄存器的定義

sbit?IRSend=P3^3;??//定義紅外發射
sbit?IRRev?=P3^2;??//接收接口

sbit?LED?=?P0^0;???//演示LED

void?Init_Timer0（void）;//定時器初始化
/*------------------------------------------------
????????????????????主函數
------------------------------------------------*/
void?main?（void）
{
Init_Timer0（）;

while?（1）?????????//主循環
??{
???LED?=?IRRev;???//接收值反應到LED
??}
}

/*------------------------------------------------
????????????????????定時器初始化子程序
------------------------------------------------*/
void?Init_Timer0（void）
{
?TMOD?|=?0x01;	??//使用模式1，16位定時器，使用“|“符號可以在使用多個定時器時不受影響		?????
?//TH0=0x00;	??????//給定初值
?//TL0=0x00;
?EA=1;????????????//總中斷打開
?ET0=1;???????????//定時器中斷打開
?TR0=1;???????????//定時器開關打開
}
/*------------------------------------------------
?????????????????定時器中斷子程序
------------------------------------------------*/
void?Timer0_isr（void）?interrupt?1?
{
?TH0=0;		??//重新賦值?65.536ms
?TL0=0;
?
?IRSend=!IRSend;//發射管電平取反，表明以周期?65.536x2?ms時間閃爍

}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2012-02-20?19:29??100.紅外發射原理\
?????文件??????245967??2010-12-20?11:56??100.紅外發射原理\MVI_4157.3gp
?????目錄???????????0??2012-02-20?19:29??100.紅外發射原理\obj\
?????文件????????1992??2010-12-13?23:38??100.紅外發射原理\obj\紅外發射原理
?????文件?????????183??2010-12-13?23:38??100.紅外發射原理\obj\紅外發射原理.hex
?????文件????????3322??2010-12-13?23:38??100.紅外發射原理\obj\紅外發射原理.lst
?????文件????????3837??2010-12-13?23:38??100.紅外發射原理\obj\紅外發射原理.m51
?????文件????????2126??2010-12-13?23:38??100.紅外發射原理\obj\紅外發射原理.obj
?????文件?????????272??2011-04-20?10:32??100.紅外發射原理\obj\紅外發射原理.plg
?????文件???????12800??2011-04-02?19:01??100.紅外發射原理\Thumbs.db
?????文件????????1583??2010-12-13?23:38??100.紅外發射原理\紅外發射原理.c
?????文件????????1035??2010-12-20?11:50??100.紅外發射原理\紅外發射原理.Opt
?????文件?????????179??2010-06-15?11:30??100.紅外發射原理\紅外發射原理.plg
?????文件????????2022??2010-06-15?15:28??100.紅外發射原理\紅外發射原理.Uv2
?????文件????????1037??2010-12-13?23:38??100.紅外發射原理\紅外發射原理_Opt.Bak
?????目錄???????????0??2012-02-20?19:29??101.紅外收發測試\
?????目錄???????????0??2012-02-20?19:29??101.紅外收發測試\obj\
?????文件????????3341??2010-06-15?16:44??101.紅外收發測試\obj\紅外收發測試
?????文件?????????470??2010-06-15?16:44??101.紅外收發測試\obj\紅外收發測試.hex
?????文件????????5339??2010-06-15?16:44??101.紅外收發測試\obj\紅外收發測試.lst
?????文件????????6149??2010-06-15?16:44??101.紅外收發測試\obj\紅外收發測試.m51
?????文件????????3800??2010-06-15?16:44??101.紅外收發測試\obj\紅外收發測試.obj
?????文件?????????272??2011-04-20?10:33??101.紅外收發測試\obj\紅外收發測試.plg
?????文件????????2683??2010-06-15?16:48??101.紅外收發測試\紅外收發測試.c
?????文件????????1028??2010-12-20?11:50??101.紅外收發測試\紅外收發測試.Opt
?????文件?????????179??2010-06-15?15:28??101.紅外收發測試\紅外收發測試.plg
?????文件????????2022??2010-06-15?16:49??101.紅外收發測試\紅外收發測試.Uv2
?????文件????????1030??2010-12-13?23:24??101.紅外收發測試\紅外收發測試_Opt.Bak