'******************************************************************************
'* 
'* VGA BIOS INITIALIZATION 
'*
'* Version history:
'*  - initial code by WadiM
'*
'******************************************************************************

dim w as word, i as integer

//Update installed hardware configuration word (used by INT 11h)
mem.Word(0x410)=mem.Word(0x410) and (not 0x30) 'EGA/VGA

//Update BIOS data area values
mem.Word(0x460)=0x0706  'cursor size (top and bottom scanline indexes)
mem.Byte(0x485)=8 	'char height for current EGA/VGA video mode
mem.Byte(0x487)=0x60 	'video memory size (256Kb)
mem.Byte(0x48A)=8 	'DCC display type (color VGA)
mem.Byte(0x489)=0x81 	'VGA 200lines-text
mem.Dword(0x4A8)=0 'vector to videoparams of EGA/VGA

//Update CMOS configuration cell value
//TODO - correct it with checksum calculation


