WriteVert


Purpose   Writes text in a vertical column.

Decln.    WriteVert(X,Y,F,B:byte;Str:string);

Remarks   X, Y are the coordinates of the top character.
          F, B are the foreground and background display colors.
          Str is the display string.

Example

BEGIN
    WRITEVERT(20,5,WHITE,BLUE,'Y AXIS');
END;