VALM4 ;ALB/MJK - Screen Malipulation Utilities ;02:36 PM 16 Dec 1992
Source file <VALM4.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | REFRESH^VALM ($$LOWER,$$NOW,INSTR)^VALM1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESET | ; -- reset scrolling region to bottom of screen
|
|
| PGUPD | ; -- update page var and screen
|
|
| UND(STR,X,Y,LEN,ON,OFF,ERASE) | ;
|
|
| IOIL(DX,DY) | ; -- position cursor ; insert line ; cr
|
|
| PAGE(BEG,LINES) | ; -- calc page #
|
|
| FORMATQ | ||
| LAST | ; -- display last screen (LS)
|
|
| NEXT | ; -- display next screen (NX)
|
|
| GET(LNUM) | ; -- get actual line number (may be different if indexed)
|
|
| RE | ; -- re-display current screen (RE)
|
|
| LST | ; -- compute last line on screen
|
|
| LASTQ | ||
| PLUS | ; -- add plus indicators to screen
|
|
| IOXY(DX,DY) | ; -- position cursor and tell os
|
|
| FINISH | ; -- finish action tasks
|
|
| PAINT | ;
|
|
| FIRSTQ | ||
| EXTRACT(X) | ; -- extract string
|
|
| PGUPDQ | ||
| FIRST | ; -- display first screen (FS)
|
|
| FORMAT(LINE,TEXT,FIXED,PREVCOL,TXTLEFT,RMAR,DY) | ;
|
|
| START | ; -- start action tasks
|
|
| WRITEQ | ||
| PREVQ | ||
| WRITE(LINE,LF,CTRL,DY) | ;
|
|
| PREV | ; -- display previous screen (BU)
|
|
| SCROLL | ; -- set scrolling region to list area
|
|
| NEXTQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("VALM VIDEO" | WRITE+6, FORMAT+4 |
| Name | Line Occurrences |
|---|---|
| $$EXTRACT | WRITE+3 |
| $$PAGE | PGUPD+2 |
| FINISH | NEXTQ, PREVQ, FIRSTQ, LASTQ |
| FIRSTQ | FIRST+2 |
| FORMAT | WRITE+8, WRITE+9 |
| IOIL | PREV+8, PAINT+3 |
| IOXY | NEXT+7, PAINT+2, RESET+1, RESET+4, FORMAT+10, FORMAT+12 |
| LASTQ | LAST+3, LAST+7 |
| LST | NEXT+6, PREV+6, FIRST+4, LAST+9 |
| NEXTQ | NEXT+3 |
| PAINT | FIRST+4, LAST+9 |
| PGUPD | NEXT+10, PREV+10, FIRST+5, LAST+10 |
| PGUPDQ | PGUPD+2 |
| PLUS | NEXT+9, PREV+9, PAINT+4 |
| PREVQ | PREV+3 |
| RESET | NEXT+9, PREV+9, PAINT+4 |
| SCROLL | NEXT+6, PREV+6, PAINT+1 |
| START | NEXT+1, PREV+1, FIRST+1, LAST+1 |
| UND | RESET+3, PLUS+7, PLUS+8, PGUPD+4 |
| WRITE | NEXT+8, PREV+8, PAINT+3 |
| WRITEQ | WRITE+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | FORMAT+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ATR | FORMAT+1~, FORMAT+4*, FORMAT+10 |
| BEG | PAGE~, PAGE+1*, PAGE+2 |
| COL | FORMAT+1~, FORMAT+2*, FORMAT+4*, FORMAT+5, FORMAT+6 |
| CRTLCOL | FORMAT+1~ |
| CTRL | WRITE~, WRITE+6 |
| >> CTRLCOL | FORMAT+6*, FORMAT+7*, FORMAT+8*, FORMAT+9, FORMAT+10 |
| DN | PLUS+1~, PLUS+5*, PLUS+8 |
| DX | IOIL~, IOXY~, WRITE+3* |
| DY | NEXT+7*, NEXT+8, PREV+7*, PREV+8, PAINT+2*, PAINT+3*, IOIL~, IOXY~, WRITE~, WRITE+8 , WRITE+9, FORMAT~, FORMAT+10, FORMAT+12 |
| ERASE | UND~, UND+1 |
| FIN | FORMAT+1~, FORMAT+2*, FORMAT+4, FORMAT+8* |
| FIXED | FORMAT~, FORMAT+6 |
| I | NEXT+2~, NEXT+8*, PREV+2~, PREV+8*, LAST+2~, PAINT+1~, PAINT+3*, LST+1~, LST+2* |
| >> IOBM | RESET+2*, SCROLL+1* |
| >> IOEDEOP | RESET+1 |
| >> IOIL | IOIL+1 |
| >> IORC | RESET+2, SCROLL+1 |
| >> IORVOFF | PLUS+8 |
| >> IORVON | PLUS+8 |
| >> IOSC | RESET+2, SCROLL+1 |
| IOSL | RESET+2 |
| IOST | PAINT+2 |
| >> IOSTBM | RESET+2, SCROLL+1 |
| >> IOTM | RESET+2*, SCROLL+1* |
| >> IOUOFF | RESET+3, PLUS+7, PGUPD+4 |
| >> IOUON | RESET+3, PLUS+7, PGUPD+4 |
| >> IOXY | IOIL+1, IOXY+1 |
| LASTCOL | FORMAT+1~ |
| LEN | UND~, UND+1 |
| LF | WRITE~, WRITE+4 |
| LINE | WRITE~, WRITE+3, WRITE+6, WRITE+8, WRITE+9, FORMAT~, FORMAT+4 |
| LINES | PAGE~, PAGE+2 |
| LN | NEXT+2~, NEXT+8*, PREV+2~, PREV+8*, PAINT+1~, PAINT+3* |
| LNUM | GET~, GET+1 |
| OFF | UND~, UND+1 |
| ON | UND~, UND+1 |
| P | PGUPD+1~, PGUPD+2*, PGUPD+3, PGUPD+4 |
| PREVCOL | FORMAT~, FORMAT+7, FORMAT+9*, FORMAT+11 |
| RMAR | FORMAT~, FORMAT+8, FORMAT+11, FORMAT+12 |
| STR | UND~, UND+1 |
| TEXT | WRITE+1~, WRITE+3*, WRITE+6, WRITE+8, WRITE+9, FORMAT~, FORMAT+9, FORMAT+11 |
| TXTLEFT | FORMAT~, FORMAT+5, FORMAT+6 |
| UP | PLUS+1~, PLUS+5*, PLUS+7 |
| >> VALM("BM" | NEXT+7, RESET+1, RESET+2, RESET+4, SCROLL+1, PLUS+8 |
| >> VALM("FIXED" | WRITE+8, WRITE+9, EXTRACT+1 |
| >> VALM("LINES" | NEXT+3, NEXT+4, NEXT+8, PREV+4, PREV+8, LAST+3, LAST+6, PAINT+2, PAINT+3, LST+2 , PGUPD+2 |
| >> VALM("TM" | PREV+7, PAINT+2, PAINT+3, SCROLL+1, PLUS+7 |
| >> VALM(0 | GET+1, PLUS+5 |
| >> VALMAR | LST+2, WRITE+3, PLUS+5, PAGE+1 |
| >> VALMBCK | FINISH+1*, RE+1*, RESET+4 |
| >> VALMBG | NEXT+3, NEXT+4*, PREV+3, PREV+4, PREV+5*, FIRST+2, FIRST+3*, LAST+7, LAST+8*, PAINT+3 , LST+2, PLUS+5, PGUPD+2 |
| VALMBGO | PREV+2~, PREV+5*, PREV+8 |
| >> VALMCC | NEXT+6, PREV+6, FIRST+4, LAST+9, FINISH+1, WRITE+6, PGUPD+4 |
| >> VALMCNT | NEXT+3, LAST+3, LAST+6, LST+2 |
| >> VALMCOFF | START+2 |
| >> VALMCON | FINISH+2 |
| >> VALMDN | PLUS+8* |
| >> VALMDY | START+1*, RESET+1 |
| >> VALMEVL | WRITE+6, FORMAT+4 |
| >> VALMIDX | GET+1, PLUS+5 |
| >> VALMLFT | WRITE+9, EXTRACT+1 |
| >> VALMLST | NEXT+5, LST+2*, PLUS+5 |
| VALMLSTO | NEXT+2~, NEXT+5*, NEXT+8 |
| >> VALMMENU | START+1 |
| >> VALMPGE | PGUPD+2, PGUPD+3* |
| >> VALMSGR | FORMAT+12 |
| >> VALMUP | PLUS+7* |
| >> VALMWD | RESET+3, WRITE+3, WRITE+9, EXTRACT+1, PGUPD+4 |
| WIDTH | FORMAT+1~, FORMAT+4*, FORMAT+5 |
| X | PREV+2~, PAINT+1~, EXTRACT~, EXTRACT+1, UND~, UND+1 |
| Y | PREV+2~, PREV+4*, PREV+5, LAST+2~, LAST+6*, LAST+7, LAST+8, UND~, UND+1 |