include	clib.inc
include	conio.inc

PPROC	dlshow, dobj:dword
	les	bx,dobj
	invoke	rcshow, es:[bx.dl_rect], es:[bx.dl_flag], es:[bx.dl_wp]
	les	bx,dobj
	test	ax,ax
	jz	@F
	or	es:[bx.dl_flag],_D_ONSCR
	mov	ax,1
    @@:	ret
PEND	dlshow

	END
