Commit | Line | Data |
---|---|---|
9379b88e | 1 | /*- |
01cd45a8 KB |
2 | * Copyright (c) 1983, 1993 |
3 | * The Regents of the University of California. All rights reserved. | |
9379b88e KB |
4 | * |
5 | * %sccs.include.proprietary.c% | |
6 | */ | |
7 | ||
975100d1 | 8 | #ifndef lint |
01cd45a8 | 9 | static char sccsid[] = "@(#)erase.c 8.1 (Berkeley) %G%"; |
9379b88e | 10 | #endif /* not lint */ |
975100d1 RC |
11 | |
12 | #include "aed.h" | |
13 | ||
14 | /*--------------------------------------------------------- | |
15 | * This routine erases the screen. | |
16 | * | |
17 | * Results: None. | |
18 | * Side Effects: The screen is cleared. | |
19 | *--------------------------------------------------------- | |
20 | */ | |
21 | erase() | |
22 | { | |
23 | setcolor("FF"); | |
24 | putc('\14', stdout); | |
25 | putc('\33', stdout); | |
26 | putc('Q', stdout); | |
27 | outxy20(curx, cury); | |
28 | (void) fflush(stdout); | |
29 | } |