VertLine


Purpose   Draws a vertical line on the screen.

Decln.    VertLine(X,Y1,Y2,F,B,LineType:integer);

Remarks   X is the X coordinate of the line.
          Y1, Y2 are the upper and lower Y coordinates of the line.
          F, B are the foreground and background display colors.
          LineType is a code to indicate the linestyle - 1 for a single
          line and 2 for a double line.

Example

BEGIN
    VERTLINE(40,1,25,WHITE,BLACK,2);
END;

A double white line is drawn down the center of the screen.