[Ghost]

Не мучайтесь. Если есть Turbo Pascal, вот небольшая прога для определения кода любой клавиши. Просто набираешь ее, запускаешь и смотришь код:

uses crt;
var ch: char;
begin
  repeat
    clrscr;
    writeln ('press any key..');
    ch := readkey;
    write ('key code: ');
    if ch = #0 then writeln ('#0 ', ord(readkey)) else writeln (ord(ch));
    writeln ('press ESC for exit..');
  until readkey = #27;
end.