code1	segment	'code'
assume	cs:code1,ds:code1
org	100h
main	proc
	sti
	mov	dx,3f2h
	mov	al,28
	out	dx,al
;------------DELAY ~1 sec --------------------
	mov	cx,65535
delay:	push	cx
	mov	cx,25
delay2:	loop	delay2
	pop	cx
	loop	delay
;------------END OF DELAY-----------------------

;------------EXIT TO DOS------------------------
	mov	ax,4c00h
	int	21h
main	endp
buffer	db	0
code1	ends
end	main