经典加密算法在VB中的实现（4）- DES[8]

0001       1         11     0     4    11
0010       2          2    11    11    13
0011       3         14     7    13     8
0100       4         15     4    12     1
0101       5          0     9     3     4
0110       6          8     1     7    10
0111       7         13    10    14     7
1000       8          3    14    10     9
1001       9         12     3    15     5
1010      10          9     5     6     0
1011      11          7    12     8    15
1100      12          5     2     0    14
1101      13         10    15     5     2
1110      14          6     8     9     3
1111      15          1     6     2    12

--------
s-boxes8

binary    d1d6 =>    00    01    10    11
\/ d2..d5 \/    dec   0     1     2     3
0000       0         13     1     7     2
0001       1          2    15    11     1
0010       2          8    13     4    14
0011       3          4     8     1     7
0100       4          6    10     9     4
0101       5         15     3    12    10
0110       6         11     7    14     8
0111       7          1     4     2    13
1000       8         10    12     0    15
1001       9          9     5     6    12
1010      10          3     6    10     9
1011      11         14    11    13     0