home *** CD-ROM | disk | FTP | other *** search
- /*
- * lemmark.c - mark control
- *
- * copyright (c) by Alan W. Paeth, 1987. All rights reserved.
- */
-
- #include "lem.h"
-
- markadd(x, y)
- {
- markdraw(x, y, markobj ? MARKONOBJCOL : MARKONREGCOL);
- markx = x;
- marky = y;
- markon = 1;
- }
-
- markdelete()
- {
- markhide();
- markon = 0;
- }
-
- markhide()
- {
- if (markon) markdraw(markx, marky, MARKOFFCOL);
- }
-
- markupdate(x, y)
- {
- markdelete();
- markobj = objnearany(x, y);
- markadd(x, y);
- }
-
- markdraw(x, y, col)
- {
- drawvec(x-MARKSIZE, y, x+MARKSIZE, y, col, 1, EMPHNONE);
- drawvec(x, y-MARKSIZE, x, y+MARKSIZE, col, 1, EMPHNONE);
- }
-