Função Delphi para Java

boa noite amigos,

gostaria de saber se alguém sabe me informar como faço pra transformar a função escrita abaixo em Delphi para Java

desde já agradeço a colaboração de todos



função escrita em Delphi

function Uncriptografe(S, K: string): string;
var
I, JK, JS: Byte;
begin
Result := '';
for I := 1 to Length(S) do
begin
JK := StrToInt('$' + K[I mod Length(K) + 1]);
JS := StrToInt('$' + S[I]);
Result := Result + Format('%.1x', [JK xor JS]);
end;
end;