Прерывания для RS-485

[90h]

Доброго времени суток!
Помогите решить задачу. Есть интерфейсная 2-х портовая плата RS-485. На ней джамперами выставлены адреса и прерывания для портов 1 - 200h/Irq7, 2 - 208h/Irq5. Нужно смастерить обработчик прерываний для этих портов.
Пересмотрел много полезных ссылок, ну не выходит каменный цветок, хоть убейся.
Делал по аналогии с нижеприведенным кодом.

Uses crt,dos;
Var stv : procedure;

{$F+}
Procedure int_1c; interrupt;
Begin
Sound(Random(500)+100); Delay(5); NoSound;
InLine($9C);
stv;
{Port[$20]:=$20;}
{^^^^^^^^^^ если сделать не "заплатку", то система виснет после первого нажатия}
End;
{$F-}

BEGIN
getintvect(9,@stv);
setintvect(9,@int_1c);
readln;
setintvect(9,@stv);
halt;
END.

Заранее спасибо.

[raxp]

...через готовые fossil-драйвера не пробовали работать?

http://programmersforum.ru/showpost....49&postcount=6

[90h]

Сообщение от raxp

...через готовые fossil-драйвера не пробовали работать?

http://programmersforum.ru/showpost....49&postcount=6

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

[raxp]

...но ведь для самоконтроля никто не мешает и попробовать сторонним, по сути ваша программа и останется. А если сильно надо, то исходники fossil есть и для Паскаля.