[Novás]

Buen día a todo el mundo, veréis mi pregunta es la siguiente:

Tengo un código que uso para encriptar cadenas, pero este código está en Delphi y no controlo mucho como adaptarlo a php. ¿Alguién sería tan amable de traducirmelo a php? Muchas grácias

Código Delphi [-]
function EnDeCrypt(const Value : String) : String;
var
  CharIndex : integer;
begin
  Result := Value;
  for CharIndex := 1 to Length(Value) do
    Result[CharIndex] := chr(not(ord(Value[CharIndex])));
end;