Резидентные программы в DOS-e

← →
extrasens © (2003-11-18 07:59) [0]

Кто-нибудь знает, как сделать резидентную прогу под ДОСю?
Просто мне надо сделать свой обработчик прерывания.

← →
SkyRanger © (2003-11-18 08:56) [1]

А она, ента прога, под досей будет работать ил под форточкой зависать, если под второй не советую даже браться...

← →
АСМиД (2003-11-18 11:27) [2]

Вообще подобные вещщи писались на Paskal 7 в режиме DOS.
Под виндами подобная штука работать не будет (если только под 3.11)
Если сильно нужно могу выслать пример.

← →
Vlad Oshin © (2003-11-18 11:52) [3]

В Паскале
GetIntVec
SetIntVec
Keep

+F1 :)

← →
pasha_golub © (2003-11-18 12:16) [4]

2Vlad Oshin
И Halt, если не ошибаюсь, со спец. аргументом

← →
User_Name (2003-11-18 16:51) [5]

Что-то примерно так когда-то писал (может поможет)

{Свое прерывание int 21h}
...

procedure int21; Assembler;
asm
pushf
cmp ax,1235h
jnz @1
mov ax,1234h
popf
retf 2
@1:
push ax
push ds
xor ax,ax
mov ds,ax
cmp word ptr ds:[04F0H], 0DEADh
jnz @2 {@2}

xor ax,ax
mov ds,ax
mov word ptr ds:[04F0H], 0DEEDh

call create //Вот здесь вызываем свою продцедуру

pop ds
pop ax
popf
int 0e4h
retf 2

@2:
pop ds
pop ax
popf
int 0e4h
retf 2
end; {End of int 21h}

..
begin {Main program}
regs.AX:=$1235;
Intr($21,regs);
swapvectors;
if regs.AX<>$1234 then
begin

GetIntVec($21, OldInt21);
SetIntVec($E4, OldInt21);
SetIntVec($21, Addr(Int21));
keep(0);
end;
end.

← →
VMcL © (2003-11-19 01:16) [6]

>>[4] pasha_golub © (18.11.03 12:16)

Ответ неправильный! :))
Всё-таки Keep, а не Halt.

в паскалевском хелпе есть исчерпывающий пример, токо не рабочий,
но ошибка легко поправима :)))
так что Keep + Сtrl+F1

Экстрасенс, когда будешь писать, не забудь про директиву
компилятора {$M} :-)

Резидентные программы в DOS-e Найти похожие ветки