xref: /csrg-svn/usr.bin/window/tth29.c (revision 62463)
118757Sedward /*
2*62463Sbostic  * Copyright (c) 1983, 1993
3*62463Sbostic  *	The Regents of the University of California.  All rights reserved.
433514Sbostic  *
542954Sbostic  * This code is derived from software contributed to Berkeley by
642954Sbostic  * Edward Wang at The University of California, Berkeley.
742954Sbostic  *
842835Sbostic  * %sccs.include.redist.c%
918757Sedward  */
1018757Sedward 
1133514Sbostic #ifndef lint
12*62463Sbostic static char sccsid[] = "@(#)tth29.c	8.1 (Berkeley) 06/06/93";
1333514Sbostic #endif /* not lint */
1433514Sbostic 
1517411Sedward #include "ww.h"
1617411Sedward #include "tt.h"
1738799Sedward #include "char.h"
1817411Sedward 
1917411Sedward /*
2029712Sedward  * H29 Driver
2129712Sedward  *
2229712Sedward  * WWM_USR mode is alternate character set.
2329712Sedward  *
2417411Sedward kC|h29|heath-29|z29|zenith-29:\
2517411Sedward 	:am:bc=\ED:bt=\E-:cr=^M:do=^J:nl=^J:bl=^G:\
2617411Sedward 	:al=\EL:le=^H:bs:cd=\EJ:ce=\EK:cl=\EE:cm=\EY%+ %+ :co#80:dc=\EN:\
2717411Sedward 	:dl=1*\EM:do=\EB:ei=\EO:ho=\EH:im=\E@:li#24:mi:nd=\EC:as=\EF:ae=\EG:\
2817411Sedward 	:ms:ta=^I:pt:sr=\EI:se=\Eq:so=\Ep:up=\EA:vs=\Ex4:ve=\Ey4:\
2917411Sedward 	:kb=^H:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\EH:kn#1:k0=\E~:l0=HOME:\
3017411Sedward 	:k1=\ES:k2=\ET:k3=\EU:k4=\EV:k5=\EW:k6=\EP:k7=\EQ:k8=\ER:k9=\E01:\
3117411Sedward 	:es:hs:ts=\Ej\Ex5\Ex1\EY8%+ \Eo:fs=\Ek\Ey5:ds=\Ey1:us=\Es8:ue=\Es0:
3229712Sedward  *
3329712Sedward  */
3417411Sedward 
h29_setmodes(new)3517411Sedward h29_setmodes(new)
3617411Sedward register new;
3717411Sedward {
3817411Sedward 	register modes = '0';
3917411Sedward 
4017411Sedward 	if (new & WWM_REV)
4129712Sedward 		modes += 0x01;
4217411Sedward 	if (new & WWM_BLK)
4329712Sedward 		modes += 0x02;
4429712Sedward 	if (new & WWM_DIM)
4529712Sedward 		modes += 0x04;
4617411Sedward 	if (new & WWM_UL)
4729712Sedward 		modes += 0x08;
4829712Sedward 	if (new & WWM_USR)
4929712Sedward 		modes += 0x10;
5038799Sedward 	ttesc('s');
5138799Sedward 	ttputc(modes);
5217411Sedward 	if (new & WWM_GRP) {
5317411Sedward 		if ((tt.tt_modes & WWM_GRP) == 0)
5438799Sedward 			ttesc('F');
5517411Sedward 	} else
5617411Sedward 		if (tt.tt_modes & WWM_GRP)
5738799Sedward 			ttesc('G');
5817411Sedward 	tt.tt_modes = new;
5917411Sedward }
6017411Sedward 
tt_h29()6117411Sedward tt_h29()
6217411Sedward {
6317411Sedward 	if (tt_h19() < 0)
6417411Sedward 		return -1;
6524289Sedward 	tt.tt_setmodes = h29_setmodes;
6629712Sedward 	tt.tt_availmodes |= WWM_BLK|WWM_UL|WWM_DIM|WWM_USR;
6717411Sedward 	return 0;
6817411Sedward }
69