Как читать-писать в I-O порты

A := Port[20];   {чтение байта из порта 20}
Port[20] := A;   {запись байта в порт 20}
B := PortW[20];  {чтение слова из порта 20-21}
PortW[20] := B;  {запись слова в порт 20-21}

Другое по теме:

• Порты
• Получить имена свободных com портов
• Печать Dos-файла в порт напрямую