1(* Ulm's Oberon Library
2   Copyright (C) 1989-1994 by University of Ulm, SAI, D-89069 Ulm, Germany
3   ----------------------------------------------------------------------------
4   Ulm's Oberon Library is free software; you can redistribute it
5   and/or modify it under the terms of the GNU Library General Public
6   License as published by the Free Software Foundation; either version
7   2 of the License, or (at your option) any later version.
8
9   Ulm's Oberon Library is distributed in the hope that it will be
10   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
11   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12   Library General Public License for more details.
13
14   You should have received a copy of the GNU Library General Public
15   License along with this library; if not, write to the Free Software
16   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17   ----------------------------------------------------------------------------
18   E-mail contact: oberon@mathematik.uni-ulm.de
19   ----------------------------------------------------------------------------
20   $Id: ASCII.om,v 1.1 1994/02/22 20:01:03 borchert Exp $
21   ----------------------------------------------------------------------------
22   $Log: ASCII.om,v $
23   Revision 1.1  1994/02/22  20:01:03  borchert
24   Initial revision
25
26   ----------------------------------------------------------------------------
27   AFB 12/90
28   ----------------------------------------------------------------------------
29*)
30
31MODULE ulmASCII;
32
33   CONST
34
35      (* control characters *)
36      nul* = 000X;   soh* = 001X;   stx* = 002X;   etx* = 003X;   eot* = 004X;
37      enq* = 005X;   ack* = 006X;   bel* = 007X;   bs*  = 008X;   ht*  = 009X;
38      nl*  = 00AX;   vt*  = 00BX;   np*  = 00CX;   cr*  = 00DX;   so*  = 00EX;
39      si*  = 00FX;   dle* = 010X;   dc1* = 011X;   dc2* = 012X;   dc3* = 013X;
40      dc4* = 014X;   nak* = 015X;   syn* = 016X;   etb* = 017X;   can* = 018X;
41      em*  = 019X;   sub* = 01AX;   esc* = 01BX;   fs*  = 01CX;   gs*  = 01DX;
42      rs*  = 01EX;   us*  = 01FX;   sp*  = 020X;   del* = 07FX;
43
44      CtrlA* = 01X;  CtrlB* = 02X;  CtrlC* = 03X;  CtrlD* = 04X;  CtrlE* = 05X;
45      CtrlF* = 06X;  CtrlG* = 07X;  CtrlH* = 08X;  CtrlI* = 09X;  CtrlJ* = 0AX;
46      CtrlK* = 0BX;  CtrlL* = 0CX;  CtrlM* = 0DX;  CtrlN* = 0EX;  CtrlO* = 0FX;
47      CtrlP* = 10X;  CtrlQ* = 11X;  CtrlR* = 12X;  CtrlS* = 13X;  CtrlT* = 14X;
48      CtrlU* = 15X;  CtrlV* = 16X;  CtrlW* = 17X;  CtrlX* = 18X;  CtrlY* = 19X;
49      CtrlZ* = 1AX;
50
51      (* other usual names *)
52      EOL* = nl;
53      null* = nul;
54      bell* = bel;
55      tab* = ht;
56      lf* = nl;
57      ff* = np;
58      quote* = 22X;
59
60END ulmASCII.
61