page	78,132
	page
comment *

     This program was written by Joseph Sarkes for use under
PC-DOS 2.0.  Proper operation may not result if used under
DOS versions not compatible with 2.0 function calls.     *
	name	escape
	title	escape sequence generator
cseg	segment	para public 'code'
	assume	cs:cseg,ds:cseg,es:cseg,ss:cseg
	org	100h
esc	proc	far
	mov	byte ptr ds:[81h],27
	mov	ah,40h
	mov	bx,1
	mov	cl,byte ptr ds:[80h]
	xor	ch,ch
	mov	dx,81h
	int	21h
	mov	ah,4ch
	int	21h
esc	endp
cseg	ends
	end	esc
]

 size of param string
	xor	ch,ch
	jlong	cxz,no_param_string
	mov	si,81h	;start offset of parameter st