jak w Delphi wysłać liczbę na port....?

jak w Delphi wysłać liczbę na port, a po określonym czasie zmienić tę liczbę na inną?
jakich komend użyć?
jak to zrobić?

procedure port(liczba, nr_portu : byte);
asm
out nr_portu, liczba
end;

A czy przypadkiem nr_portu nie powinien być typu word?
Kompilator się nie przyczepi?

Pytam z ciekawości, bo sam nie sprawdzałem (albo było to tak dawno, że zapomiałem).

oj przyczepi sie, przyczepi bo nr portu musi byc constans.