1for ii from 1 to 32 step 1 {
2 @ :ct = repeat($ii a)
3 @ :xf = xform("+CAST +B64" googled $ct))
4
5 if (ct != xform("-B64 -CAST" googled $xf)) {
6   echo Wrong decryption for $ii of a's
7   echo Clear text          : $ct
8   echo Decrypted with xform: $xform("-B64 -CAST" googled $xf)
9   echo CAST;
10 }
11}
12for ii from 1 to 32 step 1 {
13 @ :ct = repeat($ii a)
14 @ :xf = xform("+BF +B64" googled $ct))
15
16 if (ct != xform("-B64 -BF" googled $xf)) {
17   echo Wrong decryption for $ii of a's
18   echo Clear text          : $ct
19   echo Decrypted with xform: $xform("-B64 -BF" googled $xf)
20   echo BF;
21 }
22}
23for ii from 1 to 32 step 1 {
24 @ :ct = repeat($ii a)
25 @ :xf = xform("+FISH +B64" googled $ct))
26
27 if (ct != xform("-B64 -FISH" googled $xf)) {
28   echo Wrong decryption for $ii of a's
29   echo Clear text          : $ct
30   echo Decrypted with xform: $xform("-B64 -FISH" googled $xf)
31   echo FISH;
32 }
33}
34for ii from 1 to 32 step 1 {
35 @ :ct = repeat($ii a)
36 @ :xf = xform("+AES +B64" googled $ct))
37
38 if (ct != xform("-B64 -AES" googled $xf)) {
39   echo Wrong decryption for $ii of a's
40   echo Clear text          : $ct
41   echo Decrypted with xform: $xform("-B64 -AES" googled $xf)
42   echo AES;
43 }
44}
45for ii from 1 to 32 step 1 {
46 @ :ct = repeat($ii a)
47 @ :xf = xform("+AESSHA +B64" googled $ct))
48
49 if (ct != xform("-B64 -AESSHA" googled $xf)) {
50   echo Wrong decryption for $ii of a's
51   echo Clear text          : $ct
52   echo Decrypted with xform: $xform("-B64 -AESSHA" googled $xf)
53   echo AESSHA;
54 }
55}
56