home *** CD-ROM | disk | FTP | other *** search
- {
- >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.