MS51/AT89C52单片机上的8位DES汇编加密源码

;算法应用于MS51，如AT89C52等单片机, 汇编语言 
;正式应用于多款产品的数据加密 
;原创作者：赵曰侠    Email: xxjohn@163.com 
;完成时间:2003年12月 
 
PUBLIC TXTCODE,KEYCODE,OutValue 
PUBLIC DES_FUN 
;-------------------------------------------------------------------- 
;6D8C0C9200000000 
;0030003F003Cffff 
;8Bytes 明文送TXTCODE 
;8Bytes 密钥送KEYCODE 
;LCALL DES_FUN 
;8Bytes 结果在 OutValue 
;-------------------------------------------------------------------- 
;TXTCODE DATA 030H; ;8Bytes 
;KEYCODE DATA 038H; ;8Bytes 
;InValue DATA 040H; 
;OutValue DATA 048H; 
;MidValue DATA 050H;  
 
TXTCODE DATA 080H; ;8Bytes 
KEYCODE DATA 088H; ;8Bytes 
InValue DATA 090H; 
OutValue DATA 098H; 
MidValue DATA 0A0H;  
 
DES_CODE  SEGMENT CODE  
   RSEG DES_CODE  
MATRIX_T: 

   DB  58, 50, 42, 34, 26, 18, 10, 2 
   DB  60, 52, 44, 36, 28, 20, 12, 4 
   DB  62, 54, 46, 38, 30, 22, 14, 6 
   DB  64, 56, 48, 40, 32, 24, 16, 8 
   DB  57, 49, 41, 33, 25, 17, 9,  1 
   DB  59, 51, 43, 35, 27, 19, 11, 3 
   DB  61, 53, 45, 37, 29, 21, 13, 5 
   DB  63, 55, 47, 39, 31, 23, 15, 7 
MATRIX_P: 
   DB  40,  8, 48, 16, 56, 24, 64, 32 
   DB  39,  7, 47, 15, 55, 23, 63, 31 
   DB  38,  6, 46, 14, 54, 22, 62, 30 
   DB  37,  5, 45, 13, 53, 21, 61, 29 
   DB  36,  4, 44, 12, 52, 20, 60, 28 
   DB  35,  3, 43, 11, 51, 19, 59, 27 
   DB  34,  2, 42, 10, 50, 18, 58, 26 
   DB  33,  1, 41,  9, 49, 17, 57, 25 
MATRIX_AMP: 
   DB  32,  1,  2,  3,  4,  5 
   DB   4,  5,  6,  7,  8,  9 
   DB   8,  9, 10, 11, 12, 13 
   DB  12, 13, 14, 15, 16, 17 
   DB  16, 17, 18, 19, 20, 21 
   DB  20, 21, 22, 23, 24, 25 
   DB  24, 25, 26, 27, 28, 29 
   DB  28, 29, 30, 31, 32,  1 
MATRIX_KEY: 
    DB 14, 17, 11, 24,  1,  5   
    DB  3, 28, 15,  6, 21, 10  
    DB 23, 19, 12,  4, 26,  8