|
Last change
on this file since 641 was 641, checked in by Sam Habiel, 14 years ago |
|
Initial commit of XB, move away from sf.net.
Includes kids file and documentation.
|
|
File size:
299 bytes
|
| Line | |
|---|
| 1 | XBON ; IHS/ADC/GTH - SET REVERSE VIDEO ON ; [ 02/07/97 3:02 PM ]
|
|---|
| 2 | ;;4.0;XB;;Jul 20, 2009;Build 2
|
|---|
| 3 | ;
|
|---|
| 4 | ; Original routine from IHS/OHPRD/EDE. 08-25-95
|
|---|
| 5 | ;
|
|---|
| 6 | ; See also routine XBVIDEO.
|
|---|
| 7 | ;
|
|---|
| 8 | START ;
|
|---|
| 9 | NEW %,X,IORVON,IORVOFF
|
|---|
| 10 | I '$G(IOST(0)) D HOME^%ZIS
|
|---|
| 11 | S X="IORVON;IORVOFF"
|
|---|
| 12 | D ENDR^%ZISS
|
|---|
| 13 | W IORVON
|
|---|
| 14 | Q
|
|---|
| 15 | ;
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
