做红外线实验的必备软件
红外线简易逻辑分析仪
有分11.0592M晶振 和 22.1184M晶振 的软件
下面是写入单片机的程序
/*'**********************************************************************************
'
' 红外线逻辑分析器 ver 0.1
'
' Power By WJZ(广公男生)
'
' @2004.7
' QQ:185856085
'
' E-Mail:dddlzhu@163.com
'
'***********************************************************************************
*/
#include <at89x52.h>
#define byte unsigned char
/*************************************************
//线路连接定义。如电路有变直接修改就可以了
*************************************************/
#define WAY_0 P1_7
#define LED_RECIEVE P1_0
//XTAL 22.1184M
// serial rate=((xtal/12/t1_over_rate)/32)*2^pcon
byte bdata buffer=0;
sbit way0=buffer^0;
byte i=0;
bit start=0;
void send_char(unsigned char word)
{
TI=0;
SBUF=word;
while(TI==0);
TI=0;
}
void t0_servICe(void) interrupt 1 using 1
{
way0=WAY_0;
i++;
if(i==8)
{
TI=0;
SBUF=buffer;
i=0;
}
buffer=buffer<<1;
}
void main(void)
{
SCON=0x40;
TMOD=0x22;
TH1=0xFf;
TL1=0xFf;
PCON=0x80; //57600bps *2 22.1184M 115200bps
TR1=1; //Serial Port Enable
TH0=0xDb;
TL0=0xFD;
EA=1;
WAY_0=1;
ET0=1;
while(1)
{
if(!WAY_0)
{
TR0=1;
LED_RECIEVE=0;
}
}
}
文件.rar(109 KB)
VB源码.rar(73.3 KB)
上一篇:位控制转移指令分析