File:  [Research Unix] / researchv9 / jerq / src / lib / jj / c.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>
#include	<font.h>

main()
{
	char buf[256];

	request(KBD|MOUSE);
	rectf(&display, Drect, F_OR);
	strcpy(buf, "prompt: ");
	rectf(&display, Drect, F_XOR);
	kbdstr(buf);
	string(&defont, buf, &display, add(Drect.origin, Pt(5, 5)), F_XOR);
	sleep(300);
	strcpy(buf, "filename");
	kbordstr(buf, buf, 'b', 'a');
	string(&defont, buf, &display, add(Drect.origin, Pt(5, 25)), F_XOR);
	sleep(300);
}

unix.superglobalmegacorp.com

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