[DeuX]

Так, понятно, 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 лет назад, поэтому за глупые ошибки ногами не пинать)