AT88SC153和AT88SC1608加密卡.doc

AT88SC153和AT88SC1608加密卡;-------------------------------------------------------------------- ; ATMEL 88SC1608读写子程序 ; P1.0--上电 P1.1--SCL P1.2--SDA P1.3--RES ; P1.4-- P1.5-- P1.6-- P1.7-- ;-------------------------------------------------------------------- COUNT EQU 3AH COUNT1 EQU 3BH ;AUTHENTICATION RI EQU 3DH SI EQU 3EH TI EQU 3FHR_I_ADDRESS EQU 40H S_I_ADDRESS EQU 40H T_I_ADDRESS EQU 40H R_0 EQU R_I_ADDRESS R_1 EQU R_I_ADDRESS+1 R_2 EQU R_I_ADDRESS+2 R_3 EQU R_I_ADDRESS+3 R_4 EQU R_I_ADDRESS+4 R_5 EQU R_I_ADDRESS+5 R_6 EQU R_I_ADDRESS+6 R_7 EQU R_I_ADDRESS+7 KEY EQU 48H TEMP EQU 49H BIT0 EQU 4AH SI_ EQU 4BH LASTCALC EQU 4CH Q1_T EQU 4DH Q2_T EQU 4EH NBRE EQU 4FH R_I_O_ADDRESS EQU 0B0H S_I_O_ADDRESS EQU 0B8H T_I_O_ADDRESS EQU 0C0H CRYPTO_ADDRESS EQU 0D0H ;CI GC_ADDRESS EQU 0D8H ;GRAINE Q0_ADDRESS EQU 0E0H ;HOST Q1_ADDRESS EQU 0E8H Q2_ADDRESS EQU 0F0H 　 ;AUTHENTICATION SUBS=f2 ;---------------------------------------------- ;CALCULSTATE: IN: RI/SI/TI ; OUT: R_I(0-7)/S_i(0-7)/T_i(0-4) ;USED REGISTERS:R1 R0 R2 A TEMP ;---------------------------------------------- CALCULSTATE: MOV R1,#R_I_O_ADDRESS MOV R0,#R_I_ADDRESS MOV R2,#8 CALS001: MOV A,@R1 MOV @R0,A INC R1 INC R0 DJNZ R2,CALS001 ;LOAD R_I_OUT MEMORY DATAMOV A,R_6 MOV R2,#4 CALS002: RR A DJNZ R2,CALS002 ANL A,#1 MOV BIT0,A MOV A,R_6 RL A ;R_6*2 ORL A,BIT0 ANL A,#1FH MOV TEMP,A MOV R_6,R_5 MOV R_5,R_4 MOV R_4,R_3 MOV A,R_2 XRL A,RI MOV R_3,A MOV R_2,R_1 MOV R_1,R_0 ;1998.4.8 加 MOV A,R_4 ADD A,TEMP MOV R_0,A CLR C SUBB A,#32 ;IF R_031 JC CALS003 MOV B,#31 MOV A,R_0 DIV AB MOV B,#31 MUL AB MOV TEMP,A MOV A,R_0 CLR C SUBB A,TEMP MOV R_0,A ;R_0%=31 JNZ CALS003 MOV R_0,#31 CALS003: MOV R1,#R_I_O_ADDRESS MOV R0,#R_I_ADDRESS MOV R2,#8 CALS004: MOV A,@R0 MOV @R1,A INC R1 INC R0 DJNZ R2,CALS004MOV R1,#S_I_O_ADDRESS MOV R0,#R_I_ADDRESS ;=S_I_ADDRESS MOV R2,#8 CALS005: MOV A,@R1 MOV @R0,A INC R1 INC R0 DJNZ R2,CALS005 MOV A,R_6 MOV R2,#6 CALS006: RR A DJNZ R2,CALS006 ANL A,#1 MOV BIT0,A MOV A,R_6 RL A ORL A,BIT0 ANL A,#7FH