Так, понятно, 3 дня похерено зря >.<
Я уже дошёл до того, что поставил дельфи и ковыряю местные исходники )
За ответ большое спасибо.
Добавлено спустя 22 минуты 28 секунд:
viewtopic.php?f=6&t=135
брал отсюда.
Вот сурс
Код:
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils, Blowfish;
var
a: Integer;
b: L2Blowfish;
key : String;
code: String;
begin
key:='_;5.]94-31==-%xT!^[$'+#0;
b.Init(key, Length (key));
code := #$54 + #$DA + #$4B + #$36 + #$1F + #$1E + #$DE + #$62;
writeln (code);
b.bfDecode(code[1], 8);
writeln (code);
writeln ('Hello World');
read (a);
end.
что тут может быть не так?)
В дельфи я ноль, паскаль видел в последний раз больше 2 лет назад, поэтому за глупые ошибки ногами не пинать)