[Andrew.Uldin]

есть программа на паскале, нам нужно перенести её в делфи, помогите пожалуйста:

Код:

BEGIN
Port[$3FC]:=2;
Repeat
writeln(Port[$3FE]);
Until false
END.

что она делает, думаю, понятно. на ком порт повешано две кнопки и она читает разряды порта 3fe, четвертый и пятый, нам нужно сделать тоже самое но в делфи.

p.s. вот схемка того что висит на ком порте (висит в аттаче)