To jest kod Javy jak by on wyglądał w Palscalu??
public static String transformKey(String s)
{
int ai[] = new int[16];
int ai1[] = new int[16];
if(s.length() < 16)
return "(key to short)";
int i = 0;
do
{
char c = s.charAt(i);
ai[i] = (byte)(c > '9' ? c > 'Z' ? (c - 97) + 36 : (c - 65) + 10 : c - 48);
} while(++i < 16);
i = 0;
do
ai[i] = f1[ai[i] + i];
while(++i < 16);
System.arraycopy(ai, 0, ai1, 0, 16);
i = 0;
do
ai[i] = (ai[i] + ai1[p1[i]]) % 62;
while(++i < 16);
i = 0;
do
ai[i] = f2[ai[i] + i];
while(++i < 16);
System.arraycopy(ai, 0, ai1, 0, 16);
i = 0;
do
ai[i] = (ai[i] + ai1[p2[i]]) % 62;
while(++i < 16);
i = 0;
do
ai[i] = f3[ai[i] + i];
while(++i < 16);
i = 0;
do
{
int j = ai[i];
ai[i] = j >= 10 ? j >= 36 ? (97 + j) - 36 : (65 + j) - 10 : 48 + j;
} while(++i < 16);
StringBuffer stringbuffer = new StringBuffer();
int k = 0;
do
stringbuffer.append((char)ai[k]);
while(++k < 16);
return stringbuffer.toString();
}