[Back to SCREEN SWAG index] [Back to Main SWAG index] [Original]

    {
    >How do you Write a clear screen Procedure in standard pascal for
    >the vax system?  I talking about a nice clear screen prgm that does't
    >scroll everything off the screen.  Something that works in a flash..
    }

    Const
      clear_screen = CHR(27) + CHR(91) + CHR(50) +CHR(74);

    begin
      Write(clear_screen);
      readln;
    end.

[Back to SCREEN SWAG index] [Back to Main SWAG index] [Original]