1*48502Sbostic /*- 2*48502Sbostic * Copyright (c) 1983 The Regents of the University of California. 3*48502Sbostic * All rights reserved. 4*48502Sbostic * 5*48502Sbostic * %sccs.include.proprietary.c% 6*48502Sbostic */ 7*48502Sbostic 815518Sralph #ifndef lint 9*48502Sbostic static char sccsid[] = "@(#)erase.c 5.2 (Berkeley) 04/22/91"; 10*48502Sbostic #endif /* not lint */ 1115518Sralph 1215518Sralph #include "aed.h" 1315518Sralph 1415518Sralph /*--------------------------------------------------------- 1515518Sralph * This routine erases the screen. 1615518Sralph * 1715518Sralph * Results: None. 1815518Sralph * Side Effects: The screen is cleared. 1915518Sralph *--------------------------------------------------------- 2015518Sralph */ 2115518Sralph erase() 2215518Sralph { 2315518Sralph setcolor("FF"); 2415518Sralph putc('\14', stdout); 2515518Sralph putc('\33', stdout); 2615518Sralph putc('Q', stdout); 2715518Sralph outxy20(curx, cury); 2815518Sralph (void) fflush(stdout); 2915518Sralph } 30