PAGE	66,132
;
;
;
;
;
;
;
;
;  readcs.asm
;
;  usage:
;	    unsigned int readcs()
;	    segment = readcs();
;
;  Function to allow a C program to determine the CS register
;
;  (c) 1984 University of Waterloo,
;           Faculty of Engineering,
;           Engineering Microcomputer Network Development Office
;
;  version
;
;    0.0    01-May-1984   B. T. Campbell 
;
;
	include masmdefs.hsm
	include	model.hsm

codedef READCS
datadef

cstart  READCS
cpublic readcs

	mov	AX,CS

creturn readcs
cend    READCS

        end
