;	Static Name Aliases
;
	TITLE   clrwin
;	NAME    clrwin.C

	.287
_TEXT	SEGMENT  BYTE PUBLIC 'CODE'
_TEXT	ENDS
_DATA	SEGMENT  WORD PUBLIC 'DATA'
_DATA	ENDS
CONST	SEGMENT  WORD PUBLIC 'CONST'
CONST	ENDS
_BSS	SEGMENT  WORD PUBLIC 'BSS'
_BSS	ENDS
DGROUP	GROUP	CONST,	_BSS,	_DATA
	ASSUME  CS: _TEXT, DS: DGROUP, SS: DGROUP, ES: DGROUP
EXTRN	__chkstk:NEAR
EXTRN	_int86:NEAR
_TEXT      SEGMENT
; Line 4
	PUBLIC	_clrwin
_clrwin	PROC NEAR
	*** 000000	55 			push	bp
	*** 000001	8b ec 			mov	bp,sp
	*** 000003	b8 0e 00 		mov	ax,14
	*** 000006	e8 00 00 		call	__chkstk
; Line 5
;	row1 = 4
;	col1 = 6
;	row2 = 8
;	col2 = 10
;	attr = 12
;	regs = -14
; Line 8
	*** 000009	c7 46 f2 00 06 		mov	WORD PTR [bp-14],1536	;regs
; Line 9
	*** 00000e	8a 46 0c 		mov	al,[bp+12]	;attr
	*** 000011	88 46 f5 		mov	[bp-11],al
; Line 10
	*** 000014	8b 46 04 		mov	ax,[bp+4]	;row1
	*** 000017	b1 08 			mov	cl,8
	*** 000019	d3 e0 			shl	ax,cl
	*** 00001b	0b 46 06 		or	ax,[bp+6]	;col1
	*** 00001e	89 46 f6 		mov	[bp-10],ax
; Line 11
	*** 000021	8b 46 08 		mov	ax,[bp+8]	;row2
	*** 000024	d3 e0 			shl	ax,cl
	*** 000026	0b 46 0a 		or	ax,[bp+10]	;col2
	*** 000029	89 46 f8 		mov	[bp-8],ax
; Line 12
	*** 00002c	8d 46 f2 		lea	ax,[bp-14]	;regs
	*** 00002f	50 			push	ax
	*** 000030	8d 46 f2 		lea	ax,[bp-14]	;regs
	*** 000033	50 			push	ax
	*** 000034	b8 10 00 		mov	ax,16
	*** 000037	50 			push	ax
	*** 000038	e8 00 00 		call	_int86
; Line 13
	*** 00003b	8b e5 			mov	sp,bp
	*** 00003d	5d 			pop	bp
	*** 00003e	c3 			ret	

_clrwin	ENDP
_TEXT	ENDS
END
