程序博客网 > js时间滑动选择插件

用51模拟I2C从机程序-改动实测OK

来源：互联网 发布：js时间滑动选择插件 编辑：程序博客网 时间：2024/06/06 02:09
版权人：周琪    2012年5月设计。下面呈现的一个实例代码。不解释，能看懂的朋友。可以QQ给我留言，愿交流
 
/********************************************************************/
//宏观声明
#include<STC12C5A.H>
#include <intrins.h>
#define nop() _nop_()
#define uchar unsigned char
#define uint unsigned int
/*
P3 Bit Registers (Mnemonics & Ports)
------------------------------------------------*/
sbit P3_0 = 0xB0;
sbit P3_1 = 0xB1;
sbit P3_2 = 0xB2;
sbit P3_3 = 0xB3;
sbit P3_4 = 0xB4;
sbit P3_5 = 0xB5;
sbit P3_6 = 0xB6;
sbit P3_7 = 0xB7;
/********************************************************************/
//EEPROM 声明文件
#define CMD_IDLE 0
#define CMD_READ 1
#define CMD_PROGRAM 2
#define CMD_ERASE 3
#define ENABLE_IAP 0x83
/********************************************************************/
//红外学习声明
uchar data IRcode[4],IRcode2[4];
uchar CodeTemp;
uchar i,j,k,p,studyi,num;
uchar IRS_STATE=0;
uchar idata key_ircode[30][4];
sbit IRsignal=P3^2;
sbit LED1=P1^6; 
sbit LED2=P1^7;
/********************************************************************
sbit Skey=P2^7;
sbit key1=P2^0;
sbit key2=P2^1;
sbit key3=P2^2;
sbit key4=P2^3;
sbit key5=P2^4;
/********************************************************************/ 
//I2C声明文件
sbit SDA=P3^3;
sbit SCL=P3^7; 
/********************************************************************/ 
uchar data keynum;
/********************************************************************/
//-----------------------------------------------------
//static bit OP;        //红外发射管的亮灭
//static unsigned int count;       //延时计数器
//static unsigned int endcount; //终止延时计数
static unsigned char Flag;      //红外发送标志
char iraddr1;  //十六位地址的第一个字节
char iraddr2;  //十六位地址的第二个字节
sbit IR_SEND=P1^3;
uchar cnt;
uint value;
//------------------------------------------------------------
#define FOSC    11059200
#define T38KHz (FOSC / 4 / 37900)
/********************************************************************/
void Delay0_9ms(void)//0.9毫秒延迟
{
unsigned char i, j;
 _nop_();
 _nop_();
 _nop_();
 i = 10;
 j = 170;
 do
 {
  while (--j);
 } while (--i);
}
void Delay1ms(void)//1毫秒延迟
{
/*********************************************************************/
unsigned char i, j;
 _nop_();
 i = 11;
 j = 190;
 do
 {
  while (--j);
 } while (--i);
}
/********************************************************************/
void Delay4ms(void)//4毫秒延迟
{
unsigned char i, j;
 _nop_();
 _nop_();
 _nop_();
 i = 44;
 j = 3;
 do
 {
  while (--j);
 } while (--i);
}
/********************************************************************
void Delay500us()//0.5毫秒延迟  //@11.0592MHz
{
 unsigned char i, j;
 i = 6;
 j = 93;
 do
 {
  while (--j);
 } while (--i);
}
********************************************************************/
void Delay(void)//  普通延迟
{
uchar i,j,k;
  for(i=200;i>0;i--)
  for(j=200;j>0;j--)
  for(k=3;k>0;k--);
}
/*****************************************************************/
void putchar(unsigned char data1)//字符发送函数 
{
SBUF = data1; //将待发送的字符送入发送缓冲器
while(TI == 0); //等待发送完成
TI = 0; //发送中断标志请0
}
/*****************************************************************/
void putstring(unsigned char *dat)//字符串发送函数
{
for(i=0;i<4;i++) //判断字符串是否发送完毕
{
putchar(*dat); //发送单个字符
dat++; //字符地址加1，指向先下一个字符
}
}
/****************************************************************/
void initUart(void)//串口初始化
{
    TMOD=0x20;     //用定时器设置串口波特率
 TH1=0xfd;
 TL1=0xfd;
 TR1=1;
 REN=1;          //串口初始化
 SM0=0;
 SM1=1;
 EA=1;           //开启总中断
 ES=1;
}
/****************************************************************/
void IRinit()//红外学习声明初始化
{
    IT0=1;
 EX0=0;
 EA=1;
 CodeTemp=0;
}
void IICinitSteve()//I2C从总线初始化
{
 IT1=0;
 EX1=1;
 EA=1;
}
/****************************************************************/
void PCAinit()//PCA定时器0初始化
{
 CCON = 0;                       //Initial PCA control register
                                    //PCA timer stop running
                                    //Clear CF flag
                                   //Clear all module interrupt flag
    CL = 0;                         //Reset PCA base timer
    CH = 0;
    CMOD = 0x02;                    //Set PCA timer clock source as Fosc/2
                                    //Disable PCA timer overflow interrupt
    value = T38KHz;
    CCAP0L = value;                 //P1.3 output 100KHz square wave
 CCAP0H = value >> 8;            //Initial PCA module-0
    value += T38KHz;            //Initial PCA module-0
    CCAPM0 = 0x4d;                  //PCA module-0 work in 16-bit timer mode and enable PCA interrupt, toggle the output pin CEX0(P1.3)
    CR = 0;                         //PCA timer start run
    EA = 1;
    cnt = 0; 
}
/****************************************************************/
void T0init()
{
  Flag = 0;
  P3_4 = 1;
  EA = 1; //允许CPU中断 
  TMOD |= 0x01; //设定时器0和1为16位模式1 
  ET0 = 1; //定时器0中断允许
}
/****************************************************************/
void IapIdle()//EEPROM初始化
{
 IAP_CONTR=0;
 IAP_CMD=0;
 IAP_TRIG=0;
 IAP_ADDRH=0X80;
 IAP_ADDRL=0;
}
/****************************************************************/
uchar IapReadByte(uint addr)//EEPROM读取命令
{
 uchar dat;
 IAP_CONTR=ENABLE_IAP;
 IAP_CMD=CMD_READ;
 IAP_ADDRL=addr;
 IAP_ADDRH=addr>>8;
 IAP_TRIG=0x5a;
 IAP_TRIG=0xa5;
 nop();
 dat=IAP_DATA;
 IapIdle();
 return dat;
}
/****************************************************************/
void IapProgramByte(uint addr,uchar dat)//EEPROM 写入命令
{
 IAP_CONTR=ENABLE_IAP;
 IAP_CMD=CMD_PROGRAM;
 IAP_ADDRL=addr;
 IAP_ADDRH=addr>>8;
 IAP_DATA=dat;
 IAP_TRIG=0x5a;
 IAP_TRIG=0xa5;
 nop();
 IapIdle();
}
/****************************************************************/
void IapEraseSector(uint addr)//EEPROM清除命令
{
 IAP_CONTR=ENABLE_IAP;
 IAP_CMD=CMD_ERASE;
 IAP_ADDRL=addr;
 IAP_ADDRH=addr>>8;
 IAP_TRIG=0x5a;
 IAP_TRIG=0xa5;
 nop();
 IapIdle();
}
/****************************************************************
void keycan()
{
 if(key1==0)
 {
  Delay();
  if(key1==0)
  {
   while(key1==0);
   keynum=0;
  }
 }
 else if(key2==0)
 {
  Delay();
  if(key2==0)
  {
   while(key2==0);
   keynum=1;
  }
 } 
 else if(key3==0)
 {
  Delay();
  if(key3==0)
  {
   while(key3==0);
   keynum=2;
  }
 } 
 else if(key4==0)
 {
  Delay();
  if(key4==0)
  {
   while(key4==0);
   keynum=3;
  }
 } 
 else if(key5==0)
 {
  Delay();
  if(key5==0)
  {
   while(key5==0);
   keynum=4;
  }
 }
 
}
/****************************************************************/
void int0(void) interrupt 0 using 2//红外学习命令
{  
 EA=0; 
 for(k=0;k<10;k++)
 {
  Delay0_9ms();
  if(IRsignal==1)
  {
  k=10;break;
  }
  else if(k==9)
  {
   while(IRsignal==0);
   Delay4ms();
   Delay1ms();
//   Delay500us();
   for(i=0;i<4;i++)
   {
    for(j=1;j<=8;j++)
    {
     while(IRsignal==0);
     Delay0_9ms();
     
     if(IRsignal==1)
     {
      Delay1ms();
      CodeTemp=CodeTemp|0x80;
      if(j<8) CodeTemp=CodeTemp>>1;
     }
     else
     if(j<8)CodeTemp=CodeTemp>>1;
    }
    IRcode[i]=CodeTemp;
    CodeTemp=0; 
   }
   
   Delay();
    studyi++;
  }
 }
 if(studyi==1)
 {
  for(i=0;i<4;i++)
  {
  IRcode2[i]=IRcode[i]; 
  }
 }
 if(studyi==2)
 {
  for(i=0;i<4;i++)
  {
  if(IRcode2[i]!=IRcode[i])
  {
   studyi=0;
   break;
  }
  if(i==3)
  {
  for(i=0;i<4;i++)
  {
  key_ircode[keynum][i]=IRcode[i];
  }
  EX0=0;
  LED2=1;
  } 
  }
  studyi=0;
 }
 EA=1;
}
void SendIRdata(uchar IR[])
{
  int i;       
  char irdata;
  //---发红外码
  CR = 1;
  //发送9ms的起始码
  TH0 = 0xDF; 
  TL0 = 0x98; //设定时值0为38K 也就是每隔26us中断一次  
  TR0 = 1;//开始计数
  Flag=1;
  P3_4=0;  
  do{}while(Flag!=0);
  CR=0;
  IR_SEND=1;
  //发送4.5ms的结果码
  TH0 = 0xEF; 
  TL0 = 0xcb; //设定时值0为38K 也就是每隔26us中断一次  
  TR0 = 1;//开始计数
  Flag=1;
  P3_4=1;
  do{}while(Flag!=0);
  //发送十六位地址的前八位
  irdata=IR[0];
  for(i=0;i<8;i++)
  {
     //先发送0.56ms的38KHZ红外波（即编码中0.56ms的低电平）
     CR=1;
    TH0 = 0xfd; 
    TL0 = 0xf6; //设定时值0为38K 也就是每隔26us中断一次  
    TR0 = 1;
     Flag=1;
  P3_4=0;
     do{}while(Flag!=0);
  CR=0;
  IR_SEND=1;
    //停止发送红外信号（即编码中的高电平）
     if(irdata-(irdata/2)*2)  //判断二进制数个位为1还是0
     {
       TH0 = 0xf9; 
       TL0 = 0xee; //设定时值0为38K 也就是每隔26us中断一次  
       TR0 = 1;  //1为宽的高电平
     }
    else
     {
      TH0 = 0xfd; 
     TL0 = 0xfa; //设定时值0为38K 也就是每隔26us中断一次  
     TR0 = 1;   //0为窄的高电平
     }
    Flag=1;
 P3_4=1;
    do{}while(Flag!=0);
    irdata=irdata>>1;
  }
  //发送十六位地址的后八位
  irdata=IR[1];
  for(i=0;i<8;i++)
  {
    //先发送0.56ms的38KHZ红外波（即编码中0.56ms的低电平）
     CR=1;
    TH0 = 0xfd; 
    TL0 = 0xf6; //设定时值0为38K 也就是每隔26us中断一次  
    TR0 = 1;
     Flag=1;
  P3_4=0;
     do{}while(Flag!=0);
  CR=0;
  IR_SEND=1;
    //停止发送红外信号（即编码中的高电平）
     if(irdata-(irdata/2)*2)  //判断二进制数个位为1还是0
     {
       TH0 = 0xf9; 
       TL0 = 0xee; //设定时值0为38K 也就是每隔26us中断一次  
       TR0 = 1;  //1为宽的高电平
     }
    else
     {
      TH0 = 0xfd; 
     TL0 = 0xfa; //设定时值0为38K 也就是每隔26us中断一次  
     TR0 = 1;   //0为窄的高电平
     }
    Flag=1;
 P3_4=1;
    do{}while(Flag!=0);
    irdata=irdata>>1;
  }
  //发送八位数据
  irdata=IR[2];
  for(i=0;i<8;i++)
  {
     //先发送0.56ms的38KHZ红外波（即编码中0.56ms的低电平）
     CR=1;
    TH0 = 0xfd; 
    TL0 = 0xf6; //设定时值0为38K 也就是每隔26us中断一次  
    TR0 = 1;
     Flag=1;
  P3_4=0;
     do{}while(Flag!=0);
  CR=0;
  IR_SEND=1;
    //停止发送红外信号（即编码中的高电平）
     if(irdata-(irdata/2)*2)  //判断二进制数个位为1还是0
     {
       TH0 = 0xf9; 
       TL0 = 0xee; //设定时值0为38K 也就是每隔26us中断一次  
       TR0 = 1;  //1为宽的高电平
     }
    else
     {
      TH0 = 0xfd; 
     TL0 = 0xfa; //设定时值0为38K 也就是每隔26us中断一次  
     TR0 = 1;   //0为窄的高电平
     }
    Flag=1;
 P3_4=1;
    do{}while(Flag!=0);
    irdata=irdata>>1;
  }
  //发送八位数据的反码
  irdata=IR[3];
  for(i=0;i<8;i++)
  {
    //先发送0.56ms的38KHZ红外波（即编码中0.56ms的低电平）
     CR=1;
    TH0 = 0xfd; 
    TL0 = 0xf6; //设定时值0为38K 也就是每隔26us中断一次  
    TR0 = 1;
     Flag=1;
  P3_4=0;
     do{}while(Flag!=0);
  CR=0;
  IR_SEND=1;
    //停止发送红外信号（即编码中的高电平）
     if(irdata-(irdata/2)*2)  //判断二进制数个位为1还是0
     {
       TH0 = 0xf9; 
       TL0 = 0xee; //设定时值0为38K 也就是每隔26us中断一次  
       TR0 = 1;  //1为宽的高电平
     }
    else
     {
      TH0 = 0xfd; 
     TL0 = 0xfa; //设定时值0为38K 也就是每隔26us中断一次  
     TR0 = 1;   //0为窄的高电平
     }
    Flag=1;
 P3_4=1;
    do{}while(Flag!=0);
    irdata=irdata>>1;
  }
    CR=1;
    TH0 = 0xfd; 
    TL0 = 0xf6; //设定时值0为38K 也就是每隔26us中断一次  
    TR0 = 1;
  Flag=1;
   P3_4=0;
 do{}while(Flag!=0);
 CR=0;
 IR_SEND=1;
  P3_4=1;
  Flag=0;
}
/****************************************************************/
 bit iic_start_decide()////IIC 开始判断
{
 while(SCL==0);////开始不满足条件
 while((SCL==1)&&(SDA==1));///开始条件
 if((SCL==1)&&(SDA==0))////开始
 {
  while(SCL==1);///等待到时钟开始低跳变
  return 1;
 }
 else
 return 0;
}
/****************************************************************/
bit iic_stop_decide()////IIC 结束判断
{
 while(SCL==0);////结束不满足条件
 if((SCL==1)&&(0==SDA))////结束
 {
  while(SDA==0);///等待到数据开始高跳变
  return 1;
 }
 else
 {
 return 0;}
}
/****************************************************************/
uchar iic_receive()
{
 uchar i;
 uchar rdata='0';
 SDA=1;
 for(i=0;i<8;i++)
 {
  rdata<<=1;
  while(SCL==0);///当时钟为低时，数据无效，等待
  if(SDA==1)
  rdata++;
  while(SCL==1);///防止在一个高电平时读8次
 }
 return (rdata);
}
/****************************************************************/
bit iic_ack_decide()
{
bit ack_flag;///局部变量
SDA=0;////8位发送完毕，释放数据线SDA，准备接收应答位
while(SCL==0);///等待SCL变高电平
//ack_flag=0;
while(SCL==1);///等待SCL变高电平
SDA=1;
ack_flag=1;
return(ack_flag);
}
void keynum_receive()
{
     iic_start_decide();
  iic_receive();
  iic_ack_decide();
  iic_receive();
  iic_ack_decide();
  keynum=iic_receive();
  iic_ack_decide();
  iic_stop_decide();
}
/****************************************************************/
void main()//主程序
{
/*******************************************************************/
//初始化动作    
 studyi=0;     //红外学习状态
   initUart();   //串口初始化
 IRinit();   //红外学习初始化
 IICinitSteve();
 PCAinit();
 T0init();              
 keynum=0xff;   //按键初始化
/********************************************************************/
 for(p=0;p<30;p++)
 {
 for(i=0;i<4;i++)
 {
  key_ircode[p][i]=IapReadByte(0x0000+(p*4)+i);
 }
 } 
/*******************************************************************/ 
  while(1)
  { 
//   keycan();
 while(keynum==0xff);
   if(IRS_STATE==0)//遥控状态
 {
 /********************************************************************
  if(Skey==0)//触发学习键
  {
   Delay();
   if(Skey==0);
   {
   while(Skey==0);
   LED1=0;
   IRS_STATE=1;
   } 
  }
 /********************************************************************/ 
  if(keynum==16)//触发学习键
  {
   LED1=0;
   IRS_STATE=1; 
  }
  else if(keynum!=0xff)
  {
  putstring(key_ircode[keynum]);
  SendIRdata(key_ircode[keynum]); 
  }
 }
 else if(IRS_STATE==1)//学习状态
 {
/********************************************************************/ 
  if((keynum!=0xff)&&(keynum!=16))
  {
    EX0=1;
    LED2=0;
    while(LED2==0); 
  }
/********************************************************************/     
  if(keynum==16)//触发学习键
  {
   LED1=1;
   LED2=1;
   EX0=0;
   IapEraseSector(0x0000);
   for(p=0;p<30;p++)
    {
    for(i=0;i<4;i++)
     {
       IapProgramByte((0x0000+(p*4)+i), key_ircode[p][i]);
     }
    }
   IRS_STATE=0;
   } 
 }
 keynum=0xff;
  }
}
/****************************************************************/
void ser() interrupt 4 //串口中断
{
 RI=0;
 num=1;
}
void PCA_isr() interrupt 7 using 1
{
    CCF0 = 0;                       //Clear interrupt flag
    CCAP0L = value;
 CCAP0H = value >> 8;            //Update compare value
    value += T38KHz;                     //Clear interrupt flag
}
void timeint(void) interrupt 1 
{ 
  Flag=0;
  TR0=0;
}
void II2C_INT1(void) interrupt 2
{
 EX1=0;
 keynum_receive();
 EX1=1;
}
0 0
js时间滑动选择插件 js时间滑动选择插件
原创粉丝点击
热门IT博客
淘宝网聚划算首页淘宝网聚划算首页
广东干部网络培训课题广东干部网络培训课题
2017华为网络大赛赛题
oracle查询2列重复数据
ntfs for mac免费
java词法分析器
淘宝店铺排名靠前规则
网络安装linux系统
文字转word软件
nesstool是什么软件
ksp 原版阻力算法
mac高清壁纸
嵌入式开发编程
淘宝网站的发展现状
哈佛大学网络公开课
淘宝帐号为什么被冻结
java大量数据处理调优
淘宝子账号分流权重
诺基亚软件下载专区
sql 修改列类型
热门问题 老师的惩罚 人脸识别 我在镇武司摸鱼那些年 重生之率土为王 我在大康的咸鱼生活 盘龙之生命进化 天生仙种 凡人之先天五行 春回大明朝 姑娘不必设防，我是瞎子 练完瑜伽恶心怎么办 做完瑜伽想吐怎么办 大腿痛怎么办缓解疼痛 练瑜伽臀部拉伤怎么办 想瘦三十斤怎么办 马蹄果生吃了怎么办 左肩膀老是疼怎么办 早晨醒来口苦怎么办 早晨起床口苦怎么办 筋膜放松淤青怎么办 颈椎引起血压高怎么办 颈椎引起偏头疼怎么办 颈椎疼导致头疼怎么办 摄像头左右反了怎么办 监控摄像头图像倒立怎么办 华硕摄像头倒着怎么办 电脑显示倒了怎么办 乌鸦喝不到水怎么办 笔记本摄像头照相倒立怎么办 倒三角的身材怎么办 倒立引起耳鸣该怎么办 贴墙站小腿很酸怎么办 脚趾甲压伤了怎么办 膝盖撑不起来怎么办 腿膝盖摔伤肿痛怎么办 腿走路膝盖肿痛怎么办 腿无力膝盖肿痛怎么办 膝盖弯不下去怎么办 小腿供血不足怎么办 aj买小了怎么办 轻微脊椎侧弯怎么办 脖子后面脊椎疼怎么办 盆底肌肉紧张怎么办 颈椎突出两节怎么办 睡觉颈椎落枕了怎么办 腰部脊椎侧歪怎么办 脊椎骨是弯的怎么办 宝宝腰椎骨突出怎么办 腰椎往里面凹怎么办 小手指只有两节怎么办 练瑜伽脊椎疼怎么办

程序博客网，程序员的互联网技术博客家园。csdn论坛精品 msdn技术资料都在这里