Source position: graphh.inc line 747
procedure SetViewPort(
X1: SmallInt;
Y1: SmallInt;
X2: SmallInt;
Y2: SmallInt;
Clip: Boolean
);