用pic做的一个学习型无线遥控开关的代码.txt

用PIC做的一个学习型无线遥控开关的代码 这是网上找来的

#i nclude <pic12f6x.h>
#i nclude <pic.h>
#define uchar unsigned char 
#define uint  unsigned int

#define nop()    asm("nop")
#define clrwdt() asm("clrwdt")
#define sleep()    asm("sleep")


#define PORTBIT(add,bit) ((unsigned)(&add)*8+(bit))

static  bit  Out1  @PORTBIT(GPIO,0); 
static  bit  Out2  @PORTBIT(GPIO,1);  
static  bit  Out3  @PORTBIT(GPIO,2); 
static  bit  Rem   @PORTBIT(GPIO,3);
static  bit  Key1  @PORTBIT(GPIO,4);
static  bit  Key2  @PORTBIT(GPIO,5);


uchar RemData[4];

void SysInt(void);
void KeyProcess(void);
void Delayms(uchar ms);
void RemProcess(void);
void Study(uchar StudyCh);
void ClrRemData(uchar ClrCh);
void WriteEEPROM(uchar Addr,uchar Byte);
uchar ReadEEPROM(uchar Addr);

void main(void)
{
 SysInt();
 while(1)
 {
  clrwdt();
  sleep();
  KeyProcess();
  RemProcess();
 }
}

void SysInt(void)
{
 TRISIO=0x38;//00111000
 GPPU=0;
 WPU=0;
 CMCON=0x07;
 INTCON=0;//11001000
 IOCB=0;//00111000
 PIE1=0;
 Out1=0;
 Out2=0;
 Out3=0;
}

void Delayms(uchar ms)
{
 uchar i,j;
 for(i=0;i<ms;i++)
 for(j=0;j<120;j++)
 ;
}

void KeyProcess(void)
{
 uint InStudyTime=0;
 uchar KeyValue;
 if((Key1==1)&&(Key2==1))
 return;
 Delayms(10);
 if((Key1==1)&&(Key2==1))
 return;
 if((Key1==0)&&(Key2==0))
 KeyValue=3;
 else if((Key1==1)&&(Key2==0))
 KeyValue=2;
 else if((Key1==0)&&(Key2==1))
 KeyValue=1;
 do{
    InStudyTime++;
    if(InStudyTime>=1000)
    break;
   }while((Key1==0)||(Key2==0));
 if(InStudyTime<1000) //if key on time <3s is control lamp
 { 
  switch(KeyValue)
  {
   case 1: Out1=!Out1;break;
   case 2: Out2=!Out2;break;
   case 3: Out3=!Out3;break;
   default: break;
  }
  while((Key1==0)||(Key2==0));//wait key open
 }
 else 
 {  
  switch(KeyValue)
  {
   case 1: Out1=!Out1;break;
   case 2: Out2=!Out2;break;
   case 3: Out3=!Out3;break;
   default: break;
  }
  Delayms(100);
  switch(KeyValue)
  {
   case 1: Out1=!Out1;break;
   case 2: Out2=!Out2;break;
   case 3: Out3=!Out3;break;
   default: break;
  }
  InStudyTime=0;
  do{
     InStudyTime++;
     if(InStudyTime>=1000)
     break;
    }while((Key1==0)||(Key2==0));
  if(InStudyTime<1000)
  Study(KeyValue);
  else 
  ClrRemData(KeyValue);
   }
}

uchar ReadEEPROM(uchar Addr)
{
 RP0=1;
 EEADR=Addr;
 RD=1;
 return EEDATA;
}

void WriteEEPROM(uchar Addr,uchar Byte)
{
 RP0=1;
 EEADR=Addr;
 EEDATA=Byte;
 WREN=1;
 EECON2=0x55;
 EECON2=0xAA;
 WR=1;
 while(!EEIF);EEIF=0;
 WREN=0;
}

void Study(uchar StudyCh)
{
 uint i;
 RemData[0]=0;
 RemData[1]=0;
 RemData[2]=0;
 for(i=0;i<1000;i++)
 {
  RemProcess();
  if(RemData[2]!=0)
  {
   switch(StudyCh)
   {
    case 1: if(ReadEEPROM(StudyCh)>=33) WriteEEPROM(StudyCh,3);  break;
    case 2: if(ReadEEPROM(StudyCh)>=63) WriteEEPROM(StudyCh,33); break;
    case 3: if(ReadEEPROM(StudyCh)>=93) WriteEEPROM(StudyCh,63); break;
    default: break;
   }
   WriteEEPROM(ReadEEPROM(StudyCh)+1,RemData[0]);
   WriteEEPROM(ReadEEPROM(StudyCh)+2,RemData[1]);
   WriteEEPROM(ReadEEPROM(StudyCh)+3,RemData[2]);
   WriteEEPROM(StudyCh,ReadEEPROM(StudyCh)+3);
  }
 }
}