Hi All.

wordstar 4.00 is an excellent text editor for large files
especiall those that are bigger than available ram.
the only problem is it doesn't compensate for the text mode you run it in.

this little btm fixes that by writing to the fields in the executable that
hold that info.

::  texted.btm  - /ws/texted.exe is a copy of wordstar 4.0 configured
::  for editing ascii files (non-documents)
::
setlocal
set fh=%{at}fileopen[c:\ws\texted.exe,append, b]
 if %{at}fileseek[%fh,%{at}eval[0xaa1],0] == 0  goto panic
 if %{at}filewriteb[%fh,2,%{at}char[%_rows %_columns]]] == -1 goto panic
 if %{at}fileclose[%fh] == -1 (echo file error ^ quit )
goto work
;panic
 echo file error!
 if %{at}fileclose[%fh] == -1 rem
 quit

:work
::stuff "n %1
c:\ws\texted  %1

 -=> Bye <=-

---