1 /*- 2 * Copyright (c) 1983 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * %sccs.include.proprietary.c% 6 */ 7 8 #ifndef lint 9 static char sccsid[] = "@(#)erase.c 5.2 (Berkeley) 04/22/91"; 10 #endif /* not lint */ 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 } 30