@database ASCII
@node Main "ASCII"

Konstanten

   @{" ack " link Modul 6}                         @{" bel " link Modul 6}                         @{" bs " link Modul 7}
   @{" can " link Modul 11}                         @{" cr " link Modul 8}                          @{" csi " link Modul 17}
   @{" dc1 " link Modul 9}                         @{" dc2 " link Modul 9}                         @{" dc3 " link Modul 9}
   @{" dc4 " link Modul 10}                         @{" del " link Modul 14}                         @{" dle " link Modul 9}
   @{" em " link Modul 11}                          @{" enq " link Modul 6}                         @{" eof " link Modul 16}
   @{" eol " link Modul 15}                         @{" eot " link Modul 6}                         @{" esc " link Modul 11}
   @{" etb " link Modul 10}                         @{" etx " link Modul 5}                         @{" ff " link Modul 8}
   @{" fs " link Modul 12}                          @{" gs " link Modul 12}                          @{" ht " link Modul 7}
   @{" lf " link Modul 7}                          @{" nak " link Modul 10}                         @{" nul " link Modul 4}
   @{" rs " link Modul 12}                          @{" si " link Modul 8}                          @{" so " link Modul 8}
   @{" soh " link Modul 5}                         @{" sp " link Modul 13}                          @{" stx " link Modul 5}
   @{" sub " link Modul 11}                         @{" syn " link Modul 10}                         @{" us " link Modul 12}
   @{" vt " link Modul 7}                       

@endnode
@node Modul "TMP:Modula-2/ASCII.def"
(*$ Implementation:=FALSE *)
DEFINITION MODULE ASCII;
(* 2.0 / 29.4.87 / ms,red *)

CONST
 nul = 00C;  soh = 01C;  stx = 02C;  etx = 03C;
 eot = 04C;  enq = 05C;  ack = 06C;  bel = 07C;
 bs  = 10C;  ht  = 11C;  lf  = 12C;  vt  = 13C;
 ff  = 14C;  cr  = 15C;  so  = 16C;  si  = 17C;
 dle = 20C;  dc1 = 21C;  dc2 = 22C;  dc3 = 23C;
 dc4 = 24C;  nak = 25C;  syn = 26C;  etb = 27C;
 can = 30C;  em  = 31C;  sub = 32C;  esc = 33C;
 fs  = 34C;  gs  = 35C;  rs  = 36C;  us  = 37C;
 sp  = ' ';
 del = 177C;
 eol = lf;    (* end of line character          *)
 eof = fs;    (* end of file character ctrl-"\" *)
 csi = 233C;  (* command sequence introducer    *)

END ASCII.

@endnode