Source position: line 0
procedure WritePortW(
Port: LongInt;
Value: Word
);procedure WritePortW(
var Buf;
Count: LongInt
);