Title: | DECWINDOWS 26-JAN-89 to 29-NOV-90 |
Notice: | See 1639.0 for VMS V5.3 kit; 2043.0 for 5.4 IFT kit |
Moderator: | STAR::VATNE |
Created: | Mon Oct 30 1989 |
Last Modified: | Mon Dec 31 1990 |
Last Successful Update: | Fri Jun 06 1997 |
Number of topics: | 3726 |
Total number of notes: | 19516 |
I would like to revert to the terminal page size I had before running EDT. When my EDIT.COM does a $SET TERMINAL /PAGE=24 before invoking the editor, my window slips up a notch. So I have to go to the 'Commands' pull down menu and click on 'Clear lines off top'. What escape code is required to get this done ? Where is it documented ?
T.R | Title | User | Personal Name | Date | Lines |
---|---|---|---|---|---|
451.1 | QUARK::LIONEL | The dream is alive | Wed Mar 22 1989 08:04 | 5 | |
You need the "set scrolling region" sequence, but I usually just type SHOW CLUSTER and that does it for me. Steve | |||||
451.2 | There always set terminal/page=48 | EVETPU::REINIG | This too shall change | Wed Mar 22 1989 09:37 | 8 |
You could always use EVE. Tell DCL to EDIT/TPU, press the DO key, type set keypad edt, and away you go. EVE will use the full terminal, meaning that your terminal never changes size, thus you need not change it back to its original size. August G. Reinig TPU Developer | |||||
451.3 | set/term AND scroll | TALLIS::ZANZERKIA | Wed Mar 22 1989 10:25 | 40 | |
The following is the modified version of VTSET.COM file which set's the proper terminal attribute (set terminal/page=nn/width=mm) and also it set's the proper scrolling (using escape sequences). Usage: $vtset [<page_size>] [<width>] e.g $vtset 39 This will set the screen to 39 line hight. OR If you are concerned about scrolling problem only then the following command will fix it too. $type/page nl: This will set the proper scrolling given that your terminal(show term) characteristcs are correct. Robert --------------------------------------------------------------------------- $ ESC[0,8] = 27 $ page = p1 $ width = p2 $ Echo = "Write Sys$Output " $ if page .nes. "" $ then $ Echo ESC,"[",PAGE,"t" $ Echo ESC,"[r",ESC,"[",PAGE,"H" $ set term/page='PAGE' $ endif $ if width .nes. "" $ then $ Echo ESC,"[",WIDTH,"$|" $ set term/width='WIDTH' $ endif $ Exit | |||||
451.4 | STAR::MFOLEY | Rebel without a Clue | Wed Mar 22 1989 11:13 | 6 | |
Definately switch to EVE/TPU.... mike | |||||
451.5 | (There is no "a" in "definitely" :-) | POOL::HALLYB | The Smart Money was on Goliath | Wed Mar 22 1989 11:41 | 7 |
> Definately switch to EVE/TPU.... The problem is that EVE/TPU take forever to start up compared to EDT. This can be especially annoying when you want to do a REPLY/EXTR/EDIT from MAIL, or add a line to a DCL procedure. TPU makes you pay for a lot of freight even if you just want to send an ovenight letter. | |||||
451.6 | STAR::MFOLEY | Rebel without a Clue | Wed Mar 22 1989 15:01 | 9 | |
Oh yea, there isn't an "a", is there? :-) Yea, that's true John but I still think the advantages outweigh the disadvantage. mike |