1 /*
2 * Copyright (c) 1980 Regents of the University of California.
3 * All rights reserved. The Berkeley software License Agreement
4 * specifies the terms and conditions for redistribution.
5 */
6
7 #ifndef lint
8 static char sccsid[] = "@(#)areaclear.c 5.1 (Berkeley) 04/26/85";
9 #endif not lint
10
11 #include "2648.h"
12
areaclear(rmin,cmin,rmax,cmax)13 areaclear(rmin, cmin, rmax, cmax)
14 int rmin, cmin, rmax, cmax;
15 {
16 int osm;
17 char mes[20];
18 register int i;
19
20 #ifdef TRACE
21 if (trace)
22 fprintf(trace, "areaclear(%d, %d, %d, %d)\n", rmin, cmin, rmax, cmax);
23 #endif
24 osm = _supsmode;
25 setclear();
26 sync();
27 #ifdef notdef
28 /* old kludge because I couldn't get area fill to work */
29 for (i=rmax; i>=rmin; i--) {
30 move(cmin, i);
31 draw(cmax, i);
32 }
33 #endif
34 sprintf(mes, "%da1b%d %d %d %de", (_video==NORMAL) ? 1 : 2, cmin, rmin, cmax, rmax);
35 escseq(ESCM);
36 outstr(mes);
37 _supsmode = osm;
38 }
39