p align="justify">// раунд 2: = ForwardTable [Byte (T1 [0])]; W1: = ForwardTable [Byte (T1 [1] shr 8)];: = ForwardTable [Byte (T1 [2 ] shr 16)]; W3: = ForwardTable [Byte (T1 [3] shr 24)]; [0]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [8];: = ForwardTable [Byte (T1 [1])]; W1: = ForwardTable [Byte (T1 [2 ] shr 8)];: = ForwardTable [Byte (T1 [3] shr 16)]; W3: = ForwardTable [Byte (T1 [0] shr 24)]; [1]: = (W0 xor ((W1 shl 8 ) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [9];: = ForwardTable [Byte (T1 [ 2])]; W1: = ForwardTable [Byte (T1 [3] shr 8)];: = ForwardTable [Byte (T1 [0] shr 16)]; W3: = ForwardTable [Byte (T1 [1] shr 24) ]; [2]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8)) ) xor Key [10];: = ForwardTable [Byte (T1 [3])]; W1: = ForwardTable [Byte (T1 [0] shr 8)];: = ForwardTable [Byte (T1 [1] shr 16)] ; W3: = ForwardTable [Byte (T1 [2] shr 24)]; [3]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16 )) ((W3 shl 24) or (W3 shr 8))) xor Key [11];
// раунд 3: = ForwardTable [Byte (T0 [0])]; W1: = ForwardTable [Byte (T0 [1] shr 8)];: = ForwardTable [Byte (T0 [2 ] shr 16)]; W3: = ForwardTable [Byte (T0 [3] shr 24)]; [0]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [12];: = ForwardTable [Byte (T0 [1])]; W1: = ForwardTable [Byte (T0 [2 ] shr 8)];: = ForwardTable [Byte (T0 [3] shr 16)]; W3: = ForwardTable [Byte (T0 [0] shr 24)]; [1]: = (W0 xor ((W1 shl 8 ) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [13];: = ForwardTable [Byte (T0 [ 2])]; W1: = ForwardTable [Byte (T0 [3] shr 8)];: = ForwardTable [Byte (T0 [0] shr 16)]; W3: = ForwardTable [Byte (T0 [1] shr 24) ]; [2]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8)) ) xor Key [14];: = ForwardTable [Byte (T0 [3])]; W1: = ForwardTable [Byte (T0 [0] shr 8)];: = ForwardTable [Byte (T0 [1] shr 16)] ; W3: = ForwardTable [Byte (T0 [2] shr 24)]; [3]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16 )) ((W3 shl 24) or (W3 shr 8))) xor Key [15];
// раунд 4: = ForwardTable [Byte (T1 [0])]; W1: = ForwardTable [Byte (T1 [1] shr 8)];: = ForwardTable [Byte (T1 [2 ] shr 16)]; W3: = ForwardTable [Byte (T1 [3] shr 24)]; [0]: = (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [16];: = ForwardTable [Byte (T1 [1])]; W1: = ForwardTable [Byte (T1 [2 ] shr 8)];: = ForwardTable [Byte (T1 [3] shr 16)]; W3: = ForwardTable [Byte (T1 [0] shr 24)]; [1]: = (W0 xor ((W1 shl 8 ) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16)) ((W3 shl 24) or (W3 shr 8))) xor Key [17];: = ForwardTable [Byte (T1 [ 2])]; W1: = ForwardTable [Byte (T1 [3] shr 8)];: = ForwardTable...
