ClearText


Purpose   Erases all the text on a rectangular area of the screen and sets
          the display attribute.

Decln.    ClearText(X1,Y1,X2,Y2,F,B:byte);

Remarks   X1, Y1 are the coordinates of the top left corner of the area to
          be erased.
          X2, Y2 are the lower right corner coordinates.
          F, B are the foreground and background colors.

Example

BEGIN
    CLEARTEXT(1,1,80,13,WHITE,BLACK);
END;