14 lines
		
	
	
	
		
			417 B
		
	
	
	
		
			Modula-2
		
	
	
	
	
	
			
		
		
	
	
			14 lines
		
	
	
	
		
			417 B
		
	
	
	
		
			Modula-2
		
	
	
	
	
	
DEFINITION MODULE ASCII;
 | 
						|
 | 
						|
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;
 | 
						|
	del = 177C;
 | 
						|
 | 
						|
END ASCII.
 |