OnCursor


Purpose   Makes the text cursor appear in the default DOS shape, i.e. an
          underscore.

Decln.    OnCursor;

Remarks   This procedure resets the cursor on monochrome and color systems.

Example

BEGIN
    ONCURSOR;
END;