extern struct sgttyb ttys
;
if((i
= open(termtab
,0)) < 0){
read(i
,(char *)x
,8*sizeof(int));
read(i
,(char *)&t
.bset
,j
= sizeof(int)*((int *)&t
.zzz
- &t
.bset
));
lseek(i
,(long)t
.twinit
+8*sizeof(int),0);
for(p
= &t
.twinit
; p
< &t
.zzz
; p
++){
if(*p
)*p
+= j
;else *p
= "";
for(i
=0; i
<16; i
++)tabtab
[i
] = dtab
* (i
+1);
if(olinep
>= &oline
[LNSIZE
])olinep
--;
if((i
&CMASK
) != '\n')return;
lead
+= dip
->blss
+ lss
- t
.Newline
;
for(q
=oline
; q
<olinep
; q
++){
if((k
= (i
& CMASK
)) <= 040){
w
= t
.Char
* (*codep
++ & 0177);
if(*codep
&& (esc
|| lead
))move();
if(i
&074000)xfont
= (i
>>9) & 03;
if(!bdmode
&& (xfont
== 2)){
if(bdmode
&& (xfont
!= 2)){
for(k
=w
/t
.Char
;k
>0;k
--)oput('_');
for(k
=w
/t
.Char
;k
>0;k
--)oput('\b');
if(plotmode
)oputs(t
.plotoff
);
if(obufp
== (obuf
+ OBUFSZ
+ ascii
- 1))flusho();
if(!w
)for(k
=phyw
/t
.Char
;k
>0;k
--)oput('\b');
if(!plotmode
)oputs(t
.ploton
);
if((*k
& 0377) == 0200)k
++;
if(*k
& 040)j
= t
.up
; else j
= t
.down
;
if(*k
& 040)j
= t
.left
; else j
= t
.right
;
if(!(i
= *k
& 037))return(++k
);
if(esct
+= esc
)i
= "\0"; else i
= "\n\0";
/* if(!esct)i = t.flr; else i = "\0";*/
else { /* no half-line forward, not at line begining */
if(hflg
)while((dt
= dtab
- (iesct
%dtab
)) <= esc
){
if((*t
.ploton
& 0377) && (esc
|| lead
)){
if(!plotmode
)oputs(t
.ploton
);