static char *sccsid
= "@(#)tth19.c 3.7 83/08/17";
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:
' ', '`'|0x80, 'a'|0x80, 'e'|0x80,
'`'|0x80, '`'|0x80, 'f'|0x80, 'v'|0x80,
'a'|0x80, 'd'|0x80, 'a'|0x80, 'u'|0x80,
'c'|0x80, 't'|0x80, 's'|0x80, 'b'|0x80
char h19_modes
, h19_nmodes
;
char h19_insert
, h19_ninsert
;
#define pc(c) putchar('c')
for (i = ((ms10) + 5) / h19_msp10c; --i >= 0;) \
#define ICPAD() PAD((80 - h19_col) * 1) /* 0.1 ms per char */
#define ILPAD() PAD((24 - h19_row) * 10); /* 1 ms per char */
? (esc(), (h19_insert = (m)) ? pc(@) : pc(O)) : 0)
? (esc(), (h19_modes = (m)) ? pc(p) : pc(q)) : 0)
? (esc(), (h19_graphics = (m)) ? pc(F) : pc(G)) : 0)
h19_nmodes
= new & WWM_REV
;
register char *start
, *end
;
if ((c
= *start
++) & 0x80) {
h19_col
+= end
- start
+ 1;
if ((c
= *start
++) & 0x80) {
if (h19_col
== col
- 1) {
} else if (h19_col
== col
+ 1) {
if (h19_row
== row
+ 1) {
} else if (h19_row
== row
+ 1) {
if (col
== 0 && row
== 0) {
float cpms
= (float) wwbaud
/ 10000; /* char per ms */
h19_msp10c
= 10 / cpms
; /* ms per 10 char */
h19_VS
= tt_xgetstr("vs");
h19_VE
= tt_xgetstr("ve");
tt
.tt_setinsert
= h19_setinsert
;
tt
.tt_setmodes
= h19_setmodes
;
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
;