Re: Clear Screen

[Sune.Falck@swipnet.se (Sune Falck)]

In article <Nr3Y4.1974$GL4.5283952@nnrp5.proxad.net>, "MARIE Eric" <e.marie@worldonline.fr> wrote:
>what's Clearscreen for win 98, please.
>and for Unix  HP UX with VT 100 Emulation.
>
>
The simple and "portable" way to clear the screen is to
write enough New_Line:s to scroll the the visible text
out of the screen.

Example:

with Ada.Text_IO;
procedure Clear_Screen is
begin
   Ada.Text_IO.New_Line (25);
   Ada.Text_IO.Put_Line ("The screen was cleared");
end Clear_Screen;

This works for Windows 98 in a console window and
for all different terminal emulations in the unix world.

Sune Falck