File:  [Research Unix] / researchv9 / jtools / src / blitblt / buttons.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:59 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv9-SUN3_old, researchv9-SUN3, HEAD
researchv9-SUN3(old)

#include <jerq.h>

#define	UP	0
#define	DOWN	1

lbuttons(updown)
int updown;
{
	Rectangle r, s, kbdrect();

	while((button123()!=0) != updown){
		checkshape(0);
		wait(MOUSE);
	}

	switch (button123()) {
		case 4:
			return 1;
		case 2:
			return 2;
		case 1:
			return 3;
	}
	return 0;
}

lexit3()	/* return true if button3 is clicked */
{
	extern Cursor skull; Cursor *prev; int lexit;
	prev=cursswitch(&skull);
	lexit=lbuttons(DOWN); lbuttons(UP);
	cursswitch(prev);
	return(lexit == 3);
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.