mim/development/mim/vax/tty/ttyops.mud

   1 <USE "NEWSTRUC">
   2
   3 ; "Bits for argument descriptors"
   4 <MSETG TTY-X-POS *200*>
   5 <MSETG TTY-Y-POS *300*>
   6 <MSETG TTY-X/Y *100*>   ; "0-->X, 1-->Y"
   7
   8 <MSETG TTY-ARG-BIT *40*>        ; "If 1, use arg rather than cur val"
   9 <MSETG TTY-BCD-ARG *20*>        ; "Output BCD of arg, according to desc"
  10 <MSETG TTY-INC-ARG *10*>        ; "Output arg+1, according to desc"
  11
  12 <MSETG TTY-ARG-DESC *7*>
  13 <MSETG TTY-LITERAL 0>
  14 <MSETG TTY-DECIMAL 1>
  15 <MSETG TTY-RJD2 2>
  16 <MSETG TTY-RJD3 3>
  17 <MSETG TTY-LIT+ 4>
  18 <MSETG TTY-UNKNOWN 5>
  19
  20 ; "Offsets for unix terminal descriptions"
  21 <MSETG TTY-FWD 1>       ; "Cursor right"
  22 <MSETG TTY-BCK 2>       ; "Cursor left"
  23 <MSETG TTY-UP 3>        ; "Cursor up"
  24 <MSETG TTY-DWN 4>       ; "Cursor down"
  25 <MSETG TTY-HRZ 5>       ; "Horizontal move"
  26 <MSETG TTY-VRT 6>       ; "Vertical move"
  27 <MSETG TTY-MOV 7>       ; "Move"
  28 <MSETG TTY-HOM 8>       ; "Home up"
  29 <MSETG TTY-HMD 9>       ; "Home down"
  30 <MSETG TTY-CLR 10>      ; "Clear screen"
  31 <MSETG TTY-CEW 11>      ; "Clear to EOS"
  32 <MSETG TTY-CEL 12>      ; "Clear to EOL"
  33 <MSETG TTY-ERA 13>      ; "Erase char"
  34 <MSETG TTY-BEC 14>      ; "Backspace and erase char"
  35 <MSETG TTY-IL 15>       ; "Insert line[s]"
  36 <MSETG TTY-DL 16>       ; "Delete line[s]"
  37 <MSETG TTY-IC 17>       ; "Insert char[s]"
  38 <MSETG TTY-DC 18>       ; "Delete char[s]"
  39 <MSETG TTY-DS 19>       ; "Define scrolling region"
  40 <MSETG TTY-SU 20>       ; "Scroll up"
  41 <MSETG TTY-SD 21>       ; "Scroll down"
  42
  43 <MSETG MAX-TTY-OP 21>
  44