1*48517Sbostic /*- 2*48517Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*48517Sbostic * All rights reserved. 4*48517Sbostic * 5*48517Sbostic * %sccs.include.proprietary.c% 619975Sdist */ 719975Sdist 815450Sralph #ifndef lint 9*48517Sbostic static char sccsid[] = "@(#)erase.c 5.2 (Berkeley) 04/22/91"; 10*48517Sbostic #endif /* not lint */ 1115450Sralph 1215450Sralph #include "hp2648.h" 1315450Sralph 1415450Sralph erase() 1515450Sralph { 1615450Sralph buffready(8); 1715450Sralph putchar(ESC); 1815450Sralph putchar(GRAPHIC); 1915450Sralph putchar(DISPLAY); 2015450Sralph putchar('a'); 2115450Sralph putchar(ESC); 2215450Sralph putchar(GRAPHIC); 2315450Sralph putchar(PLOT); 2415450Sralph putchar(BINARY); 2515450Sralph } 26