static char *sccsid
= "@(#)tth19.c 3.12 84/03/03";
kb|h19|heath|h19-b|h19b|heathkit|heath-19|z19|zenith:
cr=^M:nl=^J:bl=^G:al=1*\EL:am:le=^H:bs:cd=\EJ:ce=\EK:
cl=\EE:cm=\EY%+ %+ :co#80:dc=\EN:dl=1*\EM:do=\EB:
ei=\EO:ho=\EH:im=\E@:li#24:mi:nd=\EC:as=\EF:ae=\EG:ms:
ta=^I:pt:sr=\EI:se=\Eq:so=\Ep:up=\EA:vs=\Ex4:ve=\Ey4:
kb=^h:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\EH:
kn#8:k1=\ES:k2=\ET:k3=\EU:k4=\EV:k5=\EW:
l6=blue:l7=red:l8=white:k6=\EP:k7=\EQ:k8=\ER:
es:hs:ts=\Ej\Ex5\Ex1\EY8%+ \Eo:fs=\Ek\Ey5:ds=\Ey1:
#define G (WWM_GRP << WWC_MSHIFT)
' ', '`'|G
, 'a'|G
, 'e'|G
,
'`'|G
, '`'|G
, 'f'|G
, 'v'|G
,
'a'|G
, 'd'|G
, 'a'|G
, 'u'|G
,
'c'|G
, 't'|G
, 's'|G
, 'b'|G
#define pc(c) ttputc('c')
for (i = ((ms10) + 5) / h19_msp10c; --i >= 0;) \
#define ICPAD() PAD((NCOL - tt.tt_col) * 1) /* 0.1 ms per char */
#define ILPAD() PAD((NROW - tt.tt_row) * 10) /* 1 ms per char */
#define h19_setinsert(m) (esc(), (tt.tt_insert = (m)) ? pc(@) : pc(O))
diff
= new ^ tt
.tt_modes
;
if (tt
.tt_nmodes
!= tt
.tt_modes
)
h19_setmodes(tt
.tt_nmodes
);
if (tt
.tt_ninsert
!= tt
.tt_insert
)
h19_setinsert(tt
.tt_ninsert
);
if (tt
.tt_nmodes
!= tt
.tt_modes
)
h19_setmodes(tt
.tt_nmodes
);
if (tt
.tt_ninsert
!= tt
.tt_insert
)
h19_setinsert(tt
.tt_ninsert
);
if (tt
.tt_col
== col
- 1) {
} else if (tt
.tt_col
== col
+ 1) {
if (tt
.tt_row
== row
+ 1) {
} else if (tt
.tt_row
== row
- 1) {
if (col
== 0 && row
== 0) {
tt
.tt_col
= tt
.tt_row
= 0;
tt
.tt_ninsert
= tt
.tt_insert
= 0;
tt
.tt_nmodes
= tt
.tt_modes
= 0;
float cpms
= (float) wwbaud
/ 10000; /* char per ms */
h19_msp10c
= 10 / cpms
; /* ms per 10 char */
gen_VS
= ttxgetstr("vs");
gen_VE
= ttxgetstr("ve");
tt
.tt_insline
= h19_insline
;
tt
.tt_delline
= h19_delline
;
tt
.tt_delchar
= h19_delchar
;
tt
.tt_clreol
= h19_clreol
;
tt
.tt_clreos
= h19_clreos
;
tt
.tt_availmodes
= WWM_REV
|WWM_GRP
;