title	'msgout'
DGROUP  GROUP   DATA
	public  msgout
	cseg
msgout:
	push	di
	push	es
	push	bx
	push	dx
	push	cx
	mov	bx, ax
	shl	bx, 1		; make msg. no a word pointer
	MOV	DX, MSG[bx]	;Error Message address 
	MOV	CL,09
	INT	224
	pop	cx
	pop	dx
	pop	bx
	pop	es
	pop	di
	ret
	DSEG
	Public	Err_no
MSG	dw	offset m_opwk		; 0
	dw	offset m_clswk		; 1
	dw	offset m_doflow		; 2
	dw	offset m_setup		; 3 
	dw	offset m_raster		; 4
	dw	offset m_scaner		; 5
	dw	Offset M_err		; 6

m_opwk	DB	'Printer Output...Generating Picture Element List'
	Db	0dh,0ah,'$'
m_clswk DB	'Close Workstation',0dh,0ah,'$'
m_doflow  DB	'Creating Temporary Object List File GSXTMP',0dh,0ah,'$'
m_setup   DB	'Making Raster Image',0dh,0ah,'$'
m_raster  DB	'Raster Phase',0dh,0ah,'$'
m_scaner  DB	'Scanning Phase',0dh,0ah,'$'
M_err	Db	'Memory allocation Failed'
Err_No	Db	30H,0dh,0ah,'$'
	end