Форум РадиоКот

Код: Выделить всё

//----------------------------------------------------------------------------------------------------
//пауза Start Gap
//----------------------------------------------------------------------------------------------------
void StartGap_4305(void)
{
 FieldOff();
 _delay_us(55*8);
 FieldOn();
 _delay_us(17*8);
}
 
//----------------------------------------------------------------------------------------------------
//отправить единицу
//----------------------------------------------------------------------------------------------------
void SendOne_4305(void)
{
 FieldOn();
 _delay_us(32*8);
 //FieldOff();
}
//----------------------------------------------------------------------------------------------------
//отправить ноль
//----------------------------------------------------------------------------------------------------
void SendZero_4305(void)
{
 FieldOff();
 _delay_us(15*8);
 FieldOn();        
 _delay_us(17*8); 
 //FieldOff();
}

//----------------------------------------------------------------------------------------------------
//записать блок по адресу 
//----------------------------------------------------------------------------------------------------
void WriteEM4305(unsigned char addr,char b0,char b1,char b2,char b3)
{
 unsigned char n;
 //HIGHT - поле выключено
 unsigned char data[4]={b0,b1,b2,b3};
 StartGap_4305();
 
 SendZero_4305();//logic bit
 //шлём 0101
 SendZero_4305();//CC0
 SendOne_4305();//CC1
 SendZero_4305();//CC2
 SendOne_4305();//P
 //шлём адрес слова (младший бит первый)
 unsigned char p=0;
 for(n=0;n<4;n++)
 {
  if (addr&(1<<n))
  {
   SendOne_4305();
   p^=1;
  }
  else SendZero_4305();
 }
 //дополняющие нули и чётность 
 SendZero_4305();
 SendZero_4305();
 if (p==0) SendZero_4305();
      else SendOne_4305(); 
 //шлём данные
 p=0; 
 for(n=0;n<4;n++)
 {
  unsigned char l_p=0;
  for(unsigned char m=0;m<8;m++)
  {
   unsigned char mask=(1<<m);
   if (data[n]&mask)
   {
    SendOne_4305();
	l_p^=1;
	p^=mask;
   }
   else SendZero_4305();   
  }
  //шлём чётность по строкам  
  if (l_p==0) SendZero_4305();
          else SendOne_4305();
 }
 //шлём чётность по столбцам		  
 for(n=0;n<8;n++)
 {
  unsigned char mask=(1<<n);
  if (p&mask) SendOne_4305();
         else SendZero_4305();   
 }
 //шлём 0
 SendZero_4305(); 
 FieldOn();
 _delay_ms(500);
}

Код: Выделить всё

FieldOn();//включаем электромагнитное поле
_delay_ms(500);
//запись конфигурации (манчестер, RF/64, выдача слова 5)
WriteEM4305(4,0x5F,0x40,0x01,0x00);
FieldOn();//включаем электромагнитное поле
_delay_ms(500);
//запись ID карты в слово 5
WriteEM4305(5,id[1],id[2],id[3],id[4]);
FieldOn();//включаем электромагнитное поле
_delay_ms(500);
FieldOff();//отключаем электромагнитное поле  
_delay_ms(500); 

Код: Выделить всё

//----------------------------------------------------------------------------------------------------
//записать ID карты
//----------------------------------------------------------------------------------------------------
void WriteCardID(unsigned char id[5])
{

 static unsigned char RFID_Send_Buffer[8];//буфер записи RFID
 static unsigned char RFID_Config[4];//буфер конфигурации RFID
 unsigned char n;
 
 //запись карты em4305
 //в слова 5 и 6 карты EM4305 записываем UID (40 бит сначала конвертируем в 64 бита)
 //задаём номер карты 
 RFIDBuffer[0]=id[0];
 RFIDBuffer[1]=id[1];
 RFIDBuffer[2]=id[2];
 RFIDBuffer[3]=id[3];
 RFIDBuffer[4]=id[4]; 
 PrepareSendBuffer(RFIDBuffer,RFID_Send_Buffer);
 //функция WriteEM4305Word требует прямой порядок бит, а после перекодирования порядок обратный - переставляем
 for(n=0;n<8;n++)
 {
  unsigned char v=RFID_Send_Buffer[n];
  RFID_Send_Buffer[n]=0;
  unsigned char m;
  for(m=0;m<8;m++)
  {
   unsigned char m1=(1<<m);
   unsigned char m2=(128>>m);
   if (v&m1) RFID_Send_Buffer[n]|=m2;
  } 
 }
 
 FieldOn();//включаем электромагнитное поле
 _delay_ms(500);
 //шлём логин
 SendEM4305Login(0xFF,0xFF,0xFF,0xFF);
 //запись конфигурации (манчестер, RF/64, выдача слова 6)
 WriteEM4305Word(4,0x5F,0x80,0x01,0x00);
 //запись ID карты в слова 5 и 6
 WriteEM4305Word(5,RFID_Send_Buffer[0],RFID_Send_Buffer[1],RFID_Send_Buffer[2],RFID_Send_Buffer[3]); 
 WriteEM4305Word(6,RFID_Send_Buffer[4],RFID_Send_Buffer[5],RFID_Send_Buffer[6],RFID_Send_Buffer[7]); 
 FieldOff();//отключаем электромагнитное поле  
 _delay_ms(500);
}




//----------------------------------------------------------------------------------------------------
//пауза FirstFieldStop для em4305
//----------------------------------------------------------------------------------------------------
void FirstFieldStop_4305(void)
{
 FieldOff();
 _delay_us(6*8);
 FieldOn();
 _delay_us(12*8); 
 FieldOff();
 _delay_us(40*8); 
 FieldOn();
 _delay_us(17*8);
 FieldOff();
}
 
//----------------------------------------------------------------------------------------------------
//отправить единицу для em4305
//----------------------------------------------------------------------------------------------------
void SendOne_4305(void)
{
 FieldOn();
 _delay_us(30*8);
}
//----------------------------------------------------------------------------------------------------
//отправить ноль для em4305
//----------------------------------------------------------------------------------------------------
void SendZero_4305(void)
{
 FieldOff();
 _delay_us(18*8);
 FieldOn();        
 _delay_us(17*8); 
}
//----------------------------------------------------------------------------------------------------
//передать карте Em4305 блок данных 32 бита
//----------------------------------------------------------------------------------------------------
void SendEM4305DataBlock(char b0,char b1,char b2,char b3)
{
 unsigned char n;
 unsigned char data[4]={b0,b1,b2,b3};
 //шлём данные
 unsigned char p=0; 
 for(n=0;n<4;n++)
 {
  unsigned char l_p=0;
  p^=data[n];
  for(unsigned char m=0;m<8;m++)
  {
   unsigned char mask=(1<<m);
   if (data[n]&mask)
   {
    SendOne_4305();
	l_p^=1;
   }
   else SendZero_4305();   
  }
  //шлём чётность по строкам  
  if (l_p==0) SendZero_4305();
         else SendOne_4305();
 }
 //шлём чётность по столбцам		  
 for(n=0;n<8;n++)
 {
  unsigned char mask=(1<<n);
  if (p&mask) SendOne_4305();
         else SendZero_4305();   
 }
 //шлём 0
 SendZero_4305(); 
 FieldOn();
 _delay_ms(500);
}
//----------------------------------------------------------------------------------------------------
//передать карте Em4305 логин
//----------------------------------------------------------------------------------------------------
void SendEM4305Login(char b0,char b1,char b2,char b3)
{
 FirstFieldStop_4305(); 
 SendZero_4305();//'0'
 //шлём 0011
 SendZero_4305();//CC0
 SendZero_4305();//CC1
 SendOne_4305();//CC2
 SendOne_4305();//P
 //шлём данные
 SendEM4305DataBlock(b0,b1,b2,b3);
}
//----------------------------------------------------------------------------------------------------
//записать слово в Em4305
//----------------------------------------------------------------------------------------------------
void WriteEM4305Word(unsigned char addr,char b0,char b1,char b2,char b3)
{
 //HIGHT - поле выключено
 FirstFieldStop_4305(); 
 SendZero_4305();//'0'
 //шлём 0101
 SendZero_4305();//CC0
 SendOne_4305();//CC1
 SendZero_4305();//CC2
 SendOne_4305();//P
 //шлём адрес слова (младший бит первый)
 unsigned char p=0;
 for(unsigned char n=0;n<4;n++)
 {
  if (addr&(1<<n))
  {
   SendOne_4305();
   p^=1;
  }
  else SendZero_4305();
 }
 //дополняющие нули и чётность 
 SendZero_4305();
 SendZero_4305();
 if (p==0) SendZero_4305();
      else SendOne_4305(); 
 //шлём данные
 SendEM4305DataBlock(b0,b1,b2,b3);
}