Witam. Kombinacja klawiszy CTRL-C wykonuje przerwanie 23h. Mam za zadanie podmienić to przerwanie. Oto kod:
program p;
uses DOS, CRT;
var
rej : registers;
p : POINTER;
procedure przerw ; interrupt;
BEGIN
writeln('Przerwanie!');
readln;
END;
BEGIN
GetIntVec($23, p);
SetIntVec($23, @przerw);
repeat until keypressed;
SetIntVec($23, p);
readln;
END.
Niestety program po użyciu Ctrl-C przerywa normalnie nie wyświetlając żadnego tekstu itd. Gdzie leży błąd ?