📄 read125k.c~
字号:
temp1 = temp1^(temp1<<4);
for(i=0;i<5;i++) //卡号输出(由高位到低位)
{
temp = data_temp[i];
for(j=0;j<8;j++)
{
if(temp&0x80) send_wiegand1();
else send_wiegand0();temp <<= 1;
}
}
for(j=0;j<4;j++)
{
if(temp1&0x80) send_wiegand1();
else send_wiegand0();temp1 = temp1<<1;
}
}
void initalize()
{
char i;
PORTB=0x00;
DDRB=0x01;
PORTC=0x00;
DDRC=0x3C;
PORTD=0x00;
DDRD=0x9C;
TCCR0=0x00;//关定时器
TCNT0=0x00;
TCCR1A=0x00;
TCCR1B=0x01;//8分频率
TCNT1H=0x00;
TCNT1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;
MCUCR=0x00;
TIMSK=0X00;
// Communication Parameters: 8 Data, 1 Stop, Even Parity
// USART Baud rate: 19200
UCSRA=0x00;
UCSRB=0xD8;
UCSRC=0xA6;
UBRRH=0x00;
UBRRL=0x19;
ACSR=0x80;
SFIOR=0x00;
WDTCR=0x1F; //看门狗定时时间
WDTCR=0x0F;
ACSR=0x80;
SFIOR=0x04; //禁止上拉
clr(DDRD,PD3); //将外部中断口设置为高阻状态
clr(DDRD,PD2); //将外部中断口设置为高阻状态
clr(DDRD,PD5);
set(DDRD,PD4);
clr(DDRC,0); //将键盘的三个输入口设置为高阻状态
clr(DDRC,1);
clr(DDRB,2);
set(DDRC,2); //设置键盘的行扫描线为输出
set(DDRC,3);set(DDRC,4);
set(DDRC,5);set(DDRB,1);
set(PORTC,2); //输出为高电平
set(PORTC,3);set(PORTC,4);
set(PORTC,5);set(DDRD,PD4);
set( DDRD,PD6);set( PORTD,PD6);
set( DDRD,PD7);set( PORTD,PD7);
set( DDRD,PD2);clr( PORTD,PD2);
set( DDRD,PD3);clr( PORTD,PD3);
clr(DDRB,PB5);
clr(PORTB,PB5);
#asm("cli")
led(2);
main_status=1;
clr(DDRB,PB1);
clr(PORTB,PB1);
set(DDRD,4);
DDRD &= 0XBF;
count=0;
clr(DDRD,6);
clr(PORTD,6);
set(DDRD,7);
set(PORTD,7);
clr(PORTD,4);
beep(2);
for(i=0;i<11;i++)data_buf[i]=0;
#asm("sei")
}
void key_process(void)
{
char i,j;
#asm( "wdr" )
if(key_value<13)
{
if(key_value>0)
{
#asm( "wdr" )
beep(1);
}
else return;
}
else return;
switch(cmd_status)
{
//==================
//按4个#键灯闪一下
//进入到密码输入界面
//==================
case 0:
set( PORTB,PB0 );
if((key_value>0) && (key_value<12))
{
if(out_485==1)
{
cmd_status=120;
key_len=1;
for(i=0;i<8;i++)key_buf[i]=20;
key_buf[0]=(key_value+'0');
}
else if(out_485==2)
{
switch(key_value)
{
case 1: case 2: case 3:
case 4: case 5: case 6:
case 7: case 8: case 9:
case 10:case 11:
if(key_value>=11){key_value-=1;card_ok=0;}
if(key_value==10)key_value=0;
j =0x08;
for(i=0;i<4;i++)
{
if(key_value & j) send_wiegand1();
else send_wiegand0();
j>>=1;
}
break;
}
cmd_status=125;
}
}
key_value=0;
break;
case 120:
#asm( "wdr" )
if(key_value==11){beep_long(1);cmd_status=0;}
else if(key_value==12)
{
Send_buf[0] = 0x0a;
Send_buf[1] = Recv_buf[1];
Send_buf[2] = (id_check+'0');
Send_buf[3] = 'F';
Send_buf[4] = '0';
Send_buf[5] = 'K';
for(i=0; i<key_len; i++)
{
Send_buf[6+i] = key_buf[i];
}
DoBCC(&Send_buf[0],(key_len+6));
Send_buf[key_len+6] = BCC_HI;
Send_buf[key_len+7] = BCC_LOW;
Send_buf[key_len+8] = 0x0D;
#asm("cli")
UCSRB=0x48;
set(PORTD,4);
delay_ms(5);
for(i=0;i<(key_len+9);i++)putchar(Send_buf[i]);
#asm( "wdr" )
delay_ms(10);
#asm( "wdr" )
delay_ms(10);
UCSRB=0xD8;
clr(PORTD,4);
cmd_status=0;
beep_long(1);
}
else if((key_value>0) && (key_value<12))
{
if(key_len<7)
{
if(key_value==10)key_value=0;
key_buf[key_len] = key_value+'0';
key_len +=1;
}
else
{
key_len = 7;
}
}
key_value=0;
break;
case 125:
switch(key_value)
{
case 1: case 2: case 3:
case 4: case 5: case 6:
case 7: case 8: case 9:
case 10:case 11:case 12:
card_ok=0;
if(key_value==10)key_value=0;
if(key_value>=11){key_value-=1;card_ok=0;}
j =0x08;
for(i=0;i<4;i++)
{
if(key_value & j) send_wiegand1();
else send_wiegand0();
j>>=1;
}
break;
}
if(key_value==11)
{
card_ok=0;
cmd_status=0;
}
key_value=0;
break;
}
}
void key_scan(void)
{
char i;
#asm( "wdr" )
switch(key_status)
{
case 0:
key_result=key_history_result=0;
for(i=0;i<4;i++)
{
clr(PORTC,(i+2));
delay_us(1);
if(testf(PINC,1)) {key_history_result=(4-i);set(PORTC,(i+2));key_status++;break;}
if(testf(PINC,0)) {key_history_result=(8-i);set(PORTC,(i+2));key_status++;break;}
if(testf(PINB,2)) {key_history_result=(12-i);set(PORTC,(i+2));key_status++;break;}
set(PORTC,(i+2));
}
sec1=0;
break;
case 1:
delay_ms(1);
for(i=0;i<4;i++)
{
clr(PORTC,(i+2));
delay_us(1);
if(testf(PINC,1)) {key_result=(4-i);set(PORTC,(i+2));break;}
if(testf(PINC,0)) {key_result=(8-i);set(PORTC,(i+2));break;}
if(testf(PINB,2)) {key_result=(12-i);set(PORTC,(i+2));break;}
set(PORTC,(i+2));
}
if(key_result==key_history_result)
{
key_value=key_result;
key_status++;
}
else{key_result=key_history_result=key_value=0;key_status=0;}
break;
case 2:
clr(PORTC,2);
clr(PORTC,3);
clr(PORTC,4);
clr(PORTC,5);
delay_us(1);
if((test(PINC,0)) && (test(PINC,1)) && (test(PINB,2)))
{
set(PORTC,2);set(PORTC,3);set(PORTC,4);
set(PORTC,5);key_status=0;
}
break;
default:
break;
}
}
unsigned char read_head(void)
{
if((PIND & 0X40)==0x00) return 0;
while(1)
{
#asm( "wdr" )
if(run_count>=10) {run_count=0;err_flag=1;return 0;}
switch(head_status)
{
case 0:
if(((PIND & 0X40)==0x40))
{
count=0;
head_status++;
TCNT1=0;
time_count=0;
}
break;
case 1:
time_count=TCNT1;
if(time_count<3436)
{
if(((PIND & 0X40)==0x00))
{
TCNT1=0;
time_count=0;
head_status++;
count++;
if(count==9)
{
count=0;
head_status=0;
return 1;
}
}
}
else {head_status=0;run_count++;}
break;
case 2:
time_count=TCNT1;
if(time_count<3436)
{
if(((PIND & 0X40)==0x40))
{
time_count=0;
TCNT1=0;
head_status=1;
}
}
else {head_status=0;run_count++;}
break;
}
}
}
void read_uid(void)
{
char i,j,count1;
if(read_head())
{
main_status=4;
while(1)
{
#asm( "wdr" )
#asm("cli")
switch( main_status )
{
case 4: //初始电平为低检测高跳变
time_count=TCNT1;
if(time_count<3136) //在一个周期内有跳变
{
if(((PIND & 0X40)==0x40))
{
time_count=0;
TCNT1=0;
main_status++;
}
}
else main_status=7;//低电平空跳
break;
case 5: //检测在一个周期内有无跳变 有效检测
time_count=TCNT1;
if(time_count<3136)
{
if(((PIND & 0X40)==0x00))
{
time_count=0;
TCNT1=0;
data_buf1[count]=1;
count++;
main_status=4;
if(count==55) main_status=10;
}
}
else
{
#asm("sei")
return;
}
break;
case 7: //低电平空跳检测
time_count=TCNT1;
if(time_count<4608)
{
if(((PIND & 0X40)==0x40))
{
main_status++;
time_count=0;
TCNT1=0;
data_buf1[count]=0;
count++;
if(count==55) main_status=10;
}
}
else
{
#asm("sei")
return;
}
break;
case 8:
time_count=TCNT1;
if(time_count<3136)
{
if(((PIND & 0X40)==0x00))
{
time_count=0;
TCNT1=0;
main_status=11;
if(count==55) main_status=10;
}
}
else main_status=9;//没检到则到降沿则为高电平空跳
break;
case 11:
time_count=TCNT1;
if(time_count<3136)
{
if(((PIND & 0X40)==0x40))
{
time_count=0;
TCNT1=0;
data_buf1[count]=0;
count++;
main_status=8;
if(count==55) main_status=10;
}
}
else
{
#asm("sei")
return;
}
break;
case 9: //空跳检测
time_count=TCNT1;
if(time_count<4608)
{
if(((PIND & 0X40)==0x00))
{
time_count=0;
TCNT1=0;
data_buf1[count]=1;
count++;
main_status=4;
if(count==55) main_status=10;
}
}
else
{
#asm("sei")
return;
}
break;
case 10:
main_status=1;
for(i=0;i<11;i++) data_buf[i]=0;
for(i=0;i<55;i++)
{
data_buf[i/5]=((data_buf[i/5]<<1)|data_buf1[i]);
}
for(i=0;i<10;i++)
{
if(parity_table[data_buf[i]]!=0)
{
#asm("sei")
return;
}
}
if(i==10)
{
for(i=0;i<11;i++) data_buf[i] >>= 1;
if(data_buf[10]==(data_buf[0]^data_buf[1]^data_buf[2]^data_buf[3]\
^data_buf[4]^data_buf[5]^data_buf[6]\
^data_buf[7]^data_buf[8]^data_buf[9]))
{
/*for(i=0;i<11;i++)
{
putchar(data_buf[i]);
}
beep(1);
*/
main_status=20;
break;
}
#asm("sei")
return;
}
break;
case 20:
#asm("sei")
for(i=0,j=0; i<5; i++,j+=2)
{
data_buf1[i]=((data_buf[j]<<4) | data_buf[j+1]);
}
for(i=0;i<5;i++)
{
data_buf[i]=data_buf1[i];
}
if(out_485==2)
{
switch(weigen_out)
{
case 1:
wiegand_decoder_26();
break;
case 2:
wiegand_decoder_34();
break;
case 3:
wiegand_decoder_36();
break;
case 4:
wiegand_decoder_44();
break;
}
}
if(testf(PINB,5))beep(1);
else beep(2);
card_ok=1;
return;
}
}
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -