#define __SRC
	#include "main.h"
#undef	__SRC

#include "zlg500.h"

#define MF1_S50		0
#define MF1_S70		1
#define MF0_ULIGHT	2
#define MF1_LIGHT	3

sbit zlg500_RST=P1^4;

uchar code Nkey_a[6]    = {0xA0, 0xA1, 0xA2, 0xA3, 0xA4, 0xA5};
uchar code Nkey_b[6]    = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
uchar idata cfg1[16] = {0x00,0x58,0x3f,0x3f,0x19,0x13,0x00,0x00,0x00,0x73,0x08,0xad,0xff,0x00,0x41,0x00};
uchar idata cfg2[16] = {0x00,0x06,0x03,0x63,0x63,0x00,0x00,0x00,0x00,0x08,0x07,0x06,0x0a,0x02,0x00,0x00};

main()
{	
	uchar cardtype = MF1_S50;
	uchar idata card_snr[8];
	uchar idata databuf[16];
	long idata value=1;
	uchar i,j;
	
	zlg500_RST=1;
	for(i=255;i>0;i--)
		for(j=255;j>0;j--);
	zlg500_RST=0;
	for(i=255;i>0;i--)
		for(j=255;j>0;j--);	
	spi_init();	
	EA=1;	

	i=mifs_config();

	i=mifs_get_info(databuf);
	i=mifs_clr_control_bit();	
	i=mifs_set_control_bit();
	i=mifs_read_E2(0x10,16,databuf);
	databuf[0]=0x01;
//	i=mifs_write_E2(0x10,16,cfg1);
//	i=mifs_write_E2(0x20,16,cfg2);
	mifs_load_key(KEYA,5,Nkey_b);
//	i=mifs_write_reg(0x11,0x59);
//	i=mifs_write_reg(0x12,1);
	
	while(1)
	{	
		while(mifs_request(IDLE,databuf)!=MI_OK);
		if(mifs_cascanticoll(ANTICOLL1,0,card_snr)!=MI_OK)	continue;	
		if(mifs_cascselect(ANTICOLL1,card_snr,&i)!=MI_OK)	continue;
		if(i&0x04)
		{
			if(mifs_cascanticoll(ANTICOLL2,0,card_snr+4)!=MI_OK)	continue;	
			if(mifs_cascselect(ANTICOLL2,card_snr+4,&i)!=MI_OK)	continue;
		}

		if(cardtype == MF1_S50)
		{
			if(mifs_authentication(KEYA,5)!=0)			continue;
			databuf[0]=0x10;
			databuf[4]=~0x10;
			databuf[8]=0x10;
			for(i=1;i<4;i++)
			{
				databuf[i]=0x00;
				databuf[4+i]=0xff;
				databuf[8+i]=0x00;
			}
			databuf[12]=0x14;
			databuf[13]=~0x14;
			databuf[14]=0x14;
			databuf[15]=~0x14;
			if(mifs_write(0x14,databuf)!=0)	continue;
			databuf[0]=0;
			if(mifs_read(0x14,databuf)!=0)	continue;
			value=1;
			if(mifs_value(PICC_DECREMENT,0x14,&value,0x15)!=0) 	continue;
			if(mifs_read(0x15,databuf)!=0)	continue;
			if(mifs_value(PICC_INCREMENT,0x14,&value,0x16)!=0)	continue;
			if(mifs_read(0x16,databuf)!=0)	continue;
		}
		else if(cardtype == MF1_S70)
		{
			if(mifs_authentication2(KEYA,39,5)!=0)	continue;
			if(mifs_read(240,databuf)!=0)	continue;
		}
		else if(cardtype == MF0_ULIGHT)
		{
			databuf[0]=0x11;
			databuf[1]=0x22;
			databuf[2]=0x33;
			databuf[3]=0x44;
			if(mifs_ULwrite(15,databuf)!=0)	continue;
			databuf[0]=0x00;
			databuf[1]=0x00;
			databuf[2]=0x00;
			databuf[3]=0x00;
			if(mifs_read(15,databuf)!=0)	continue;
		}
		else if(cardtype == MF1_LIGHT)
		{
			if(mifs_authKey(KEYA,2,Nkey_b)!=0)	continue;
			databuf[0]=0x10;
			databuf[1]=0x00;
			databuf[2]=0xef;
			databuf[3]=0xff;
			if(mifs_write(4,databuf)!=0)	continue;
			databuf[0]=0xff;
			databuf[1]=0xff;
			databuf[2]=0xff;
			databuf[3]=0xff;
			if(mifs_write(5,databuf)!=0)	continue;
			if(mifs_read(4,databuf)!=0)		continue;
			if(databuf[0]!=~databuf[2] || databuf[1]!=~databuf[3])
				continue;
			value=1;
			if(mifs_valuedebit(0xc0,4,&value)!=0)	continue;
			if(mifs_read(4,databuf)!=0)		continue;
		}

		mifs_halt();
//		mifs_reset(1);
		
	//	i=mifs_write_E2(0x30,16,databuf);
	//	if(i!=0)	continue;
		mifs_clr_control_bit();
		mifs_buzzer(250,20);
		while(mifs_set_control_bit()!=0);
	}
}