home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2src / ascii.def next >
Text File  |  1995-06-24  |  2KB  |  87 lines
  1. DEFINITION MODULE ASCII;
  2. (*
  3.     Title     : A definition of ASCII constants
  4.     Author    : I.R. Matters (Ian.Matters@anu.edu.au)
  5.     System    : Juergen Neuhoff's Modula-2 compiler on OS/2
  6.     Version   : 1.00
  7.     Last Edit : 24 June 1995
  8. *)
  9.  
  10. CONST
  11.  
  12.     (* ASCII control characters by name *)
  13.  
  14.     nul = 00C;
  15.     soh = 01C;
  16.     stx = 02C;
  17.     etx = 03C;
  18.     eot = 04C;
  19.     enq = 05C;
  20.     ack = 06C;
  21.     bel = 07C;
  22.     bs  = 10C;
  23.     ht  = 11C;
  24.     lf  = 12C;
  25.     vt  = 13C;
  26.     ff  = 14C;
  27.     cr  = 15C;
  28.     so  = 16C;
  29.     si  = 17C;
  30.     dle = 20C;
  31.     dc1 = 21C;
  32.     dc2 = 22C;
  33.     dc3 = 23C;
  34.     dc4 = 24C;
  35.     nak = 25C;
  36.     syn = 26C;
  37.     etb = 27C;
  38.     can = 30C;
  39.     em  = 31C;
  40.     sub = 32C;
  41.     esc = 33C;
  42.     fs  = 34C;
  43.     gs  = 35C;
  44.     rs  = 36C;
  45.     us  = 37C;
  46.     sp  = 40C;
  47.     del = 177C;
  48.  
  49.     (* ASCII control characters by keystroke *)
  50.  
  51.     CtrlA = 01C;
  52.     CtrlB = 02C;
  53.     CtrlC = 03C;
  54.     CtrlD = 04C;
  55.     CtrlE = 05C;
  56.     CtrlF = 06C;
  57.     CtrlG = 07C;
  58.     CtrlH = 10C;
  59.     CtrlI = 11C;
  60.     CtrlJ = 12C;
  61.     CtrlK = 13C;
  62.     CtrlL = 14C;
  63.     CtrlM = 15C;
  64.     CtrlN = 16C;
  65.     CtrlO = 17C;
  66.     CtrlP = 20C;
  67.     CtrlQ = 21C;
  68.     CtrlR = 22C;
  69.     CtrlS = 23C;
  70.     CtrlT = 24C;
  71.     CtrlU = 25C;
  72.     CtrlV = 26C;
  73.     CtrlW = 27C;
  74.     CtrlX = 30C;
  75.     CtrlY = 31C;
  76.     CtrlZ = 32C;
  77.  
  78.     (* Special Modula-2 end of line character *)
  79.  
  80.     EOL = 36C;
  81.  
  82.     (* End of file character for text files *)
  83.  
  84.     EOF = CtrlZ;
  85.  
  86. END ASCII.
  87.