home *** CD-ROM | disk | FTP | other *** search
/ Best Objectech Shareware Selections / UNTITLED.iso / boss / word / misc / 009 / resume.inc < prev    next >
Text File  |  1991-05-28  |  1KB  |  58 lines
  1. CONST SPACE = 32, ESC = 27, ENTER = 13, TABKEY = 9
  2. CONST down = 80, up = 72, LEFT = 75, RIGHT = 77
  3. CONST home = 71, ENDK = 79, pgDn = 81, pgUp = 73
  4. CONST ins = 82, del = 83, NULL = 0
  5. CONST CTRLD = 4, CTRLG = 7, CTRLH = 8, CTRLS = 19, CTRLV = 22
  6. CONST CTRLB = 2, CTRLLEFT = 115, CTRLF = 6, CTRLRIGHT = 116, CTRLR = 18
  7. CONST SHIFTTABKEY = 15, CTRLN = 14, CTRLA = 1, BKSP = 127, CTRLP = 16
  8. CONST CTRLC = 3, F1 = 59
  9.  
  10.  
  11.  
  12.  
  13. CONST FALSE = 0, TRUE = NOT FALSE
  14.  
  15. CONST CURSORON = 1, CURSOROFF = 0
  16.  
  17. CONST Filename$ = "STANDARD.DAT"
  18.  
  19.  
  20. DIM ESCI$(1 TO 95), ESCP$(1 TO 95), ESCSC(1 TO 95)
  21. DIM ESCSR(1 TO 95), ESCL(1 TO 95)
  22.  
  23. DIM ArrayI$(1 TO 95), ArrayP$(1 TO 95), ArraySC(1 TO 95)
  24. DIM ArraySR(1 TO 95), ArrayL(1 TO 95), ArrayPSC(1 TO 95), ArrayPSR(1 TO 95)
  25.  
  26.  
  27. DIM HelpArray$(1 TO 173)
  28.  
  29.  
  30.  
  31. COMMON SHARED HelpArray$(), Insert
  32. COMMON SHARED FieldNo, Loop$, OldRow, OldColumn, ScreenNumber, Printer$
  33. COMMON SHARED DelimChar, Position, Monitor, ESCI$(), ESCP$(), ESCSC()
  34. COMMON SHARED ESCSR(), ESCL(), PrinterError
  35.  
  36.  
  37. Monitor = ColorChk
  38.                              'Check if monitor is color or monitor
  39.     CONST Black = 0
  40.     CONST LBlue = 9
  41.     CONST Yellow = 14
  42.     CONST LRed = 12
  43.     CONST LGreen = 10
  44.     CONST LMagenta = 13
  45.     CONST LCyan = 11
  46.     CONST Blue = 1
  47.     CONST White = 7
  48.     CONST HWhite = 15
  49.     CONST Gray = 8
  50.     CONST Brown = 6
  51.     CONST Cyan = 3
  52.     CONST Green = 2
  53.     CONST Red = 4
  54.     CONST Magenta = 5
  55.     CONST Blinking = 16
  56.   
  57.  
  58.