; From: David Buchanan <d@vidbuchanan.co.uk>
;
; compiles to boot sector, pass as disk to qemu to run the code.
;

	BITS	16

	ORG	0x7C00
	
	mov	dx, 0x3d4 ; start_addr high byte
	mov	al, 0x0c
	out	dx, al
	
	mov	dx, 0x3d5
	mov	al, 0xff
	out	dx, al
	
	
	mov	dx, 0x3d4 ; line_compare
	mov	al, 0x07
	out	dx, al
	
	mov	dx, 0x3d5
	in	al, dx
	and	al, ~0x10
	out	dx, al
	
	
	mov	dx, 0x3d4 ; line_compare
	mov	al, 0x09
	out	dx, al
	
	mov	dx, 0x3d5
	in	al, dx
	and	al, ~0x40
	out	dx, al
	
	
	mov	dx, 0x3ce ; gfx mode
	mov	al, 0x06
	out	dx, al
	
	mov	dx, 0x3cf
	mov	al, 0x01
	out	dx, al
	

	jmp	$

	TIMES	510-($-$$) DB 0
	DW	0xAA55		; boot signature