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