From: Ralph Campbell <ralph@ucbvax.Berkeley.EDU>
Date: Thu, 10 Mar 1983 08:22:19 +0000 (-0800)
Subject: date and time created 83/03/09 16:22:19 by ralph
X-Git-Tag: BSD-4_1c_2-Snapshot-Development~72
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/46f970792469b936773cce8b042127f3b77bae0b

date and time created 83/03/09 16:22:19 by ralph

SCCS-vsn: old/lib2648/areaclear.c 4.1
---

diff --git a/usr/src/old/lib2648/areaclear.c b/usr/src/old/lib2648/areaclear.c
new file mode 100644
index 0000000000..07603def8e
--- /dev/null
+++ b/usr/src/old/lib2648/areaclear.c
@@ -0,0 +1,30 @@
+/*	areaclear.c	4.1	83/03/09	*/
+
+#include "2648.h"
+
+areaclear(rmin, cmin, rmax, cmax)
+int rmin, cmin, rmax, cmax;
+{
+	int osm;
+	char mes[20];
+	register int i;
+
+#ifdef TRACE
+	if (trace)
+		fprintf(trace, "areaclear(%d, %d, %d, %d)\n", rmin, cmin, rmax, cmax);
+#endif
+	osm = _supsmode;
+	setclear();
+	sync();
+#ifdef notdef
+	/* old kludge because I couldn't get area fill to work */
+	for (i=rmax; i>=rmin; i--) {
+		move(cmin, i);
+		draw(cmax, i);
+	}
+#endif
+	sprintf(mes, "%da1b%d %d %d %de", (_video==NORMAL) ? 1 : 2, cmin, rmin, cmax, rmax);
+	escseq(ESCM);
+	outstr(mes);
+	_supsmode = osm;
+}