Установка ВП

Выполняется с помощью процедуры Borland Pascal из модуля DOS.* (* - т.к. могут быть различные режимы памяти; для Windows – WinDOS.*). Для установки ВП в модулях имеется следующая процедура:

Procedure SetIntVec(IntNo:byte; IntProcAddr: pointer);

Как только установили новый ВП, старый будет утерян, используем следующую процедуру, чтобы сохранить его: Procedure GetIntVec(IntNo:byte; var OldIntProcAddr: pointer);

Процедура обслуживания прерываний: Сохранение регистров ЦП, которые будут модифицированы оперативной программой.

Procedure IntDC; interrupt;

IRET.

IRET восстанавливает СК, Flags.

6.16 Техническая реализация обмена данными с прерыванием программы.

Рис. 6.10 Схема реализации обмена данными с прерыванием программы.

За время T должна завершить работу оперативная программа. Программа, обслуживающая ЗП может закончиться раньше, но не позже. Сигнал ЗП устанавливается фронтом.

Пример. Обмен с прерыванием от таймера, ввод в ОЗУ 100 точек.

Канал 32, диапазон ±5 В; режим подключения сигналов с общей землей.

Program Demo _ interrupt;

Uses Dos, timer 154;

Const BA =$300; {базовый адрес}

Nmas =100; {длина массива}

count: word = 0;{программный счетчик}

var U: array [0.. Nmas ] of integer; T: word; OldIntVec: pointer; T: word; i: integer;

Procedure IntADC; interrupt;

Begin asm sti end; { IF =1}

Inc (count);

Port [ BA +4]:=$ FF; {запуск АЦП на измерение}

Asm nop end;

While (port [ BA +2] and 8) <> 0 do;

U [ count ]:= PortW [ BA ];

Port [$20]:=$20; { OCW 2, сброс бита IR 3, разрешение прерываний от этого входа и входов с высшим приоритетом}

If count = Nmas then port [$21]:= port [$21] or 8;

End;

Begin

Port [ BA +$ F ]:=0; {ФРП=0}

Port [$21]:= Port [$21] or 8; {запрет прерывания ПКП}

Port [ BA +2]:=$ FF; {режим}

Wait ({задержка ≈4мкс});

GetIntVec ($ B, OldIntVec);

SetIntVec ($ B, IntADC);

Writeln (‘Укажите интервал дискретизации сигнала’); readln (T);

Set _ Time (T);

Port [ BA +$ F ]:=1; {ФРП=1}

Port [$21]:= Port [$21] and NOT 8; { IM 3=0}

{Фоновая программа}

Port [ BA +$ F ]:=0; {}

SetIntVec ($ B, OldIntVec);

{ Вывод данных и обработка данных }

End.

6.17 Категории прерываний ЭВМ семейства IBM PC.

Все прерывания делятся на 3 категории:

1. Внешние или аппаратные прерывания.

2. Прерывания по особой ситуации или внутренние прерывания.

3. Программные прерывания.

1. Внешние или аппаратные прерывания генерируются ВУ в ответ на некоторые события, требующие внимания ЦП.

2. Внутренние прерывания возникают, когда ЦП наталкивается на абсолютно бессмысленные команды.

Пример: по особой ситуации.

IntNo =0 – деление на 0.

IntNo =1 – в регистре флагов IF =1.

IntNo =2 – NMI – NoneMaskedInterrupt, немаскируемые прерывания.

3. Программные прерывания – не возникают неожиданно - возникают, если какая-то программа вызывает это прерывание, служит для вызова других программ, которые находятся в: ПЗУ – BIOS, ОЗУ – DOS.