Установка ВП.


Выполняется с помощью процедуры 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, timer154;

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; {OCW2, сброс бита IR3, разрешение прерываний от этого входа и входов с высшим приоритетом}

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; {IM3=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 – NMINoneMaskedInterrupt, немаскируемые прерывания.

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