: E FBUF _blen EDPOS @ _cpos 2DUP + ( l a1 a1+l ) SWAP _rbufsz MOVE ( l ) ( get to next line - l ) DUP EDPOS @ 0xffc0 AND 0x40 + -^ _cpos ( l a ) SWAP 0 FILL EDPOS @ 64 / _pln ;