'*****************************************************************************
'* INT 10H AH=12h (VGA BIOS) 
'*****************************************************************************

protected function Exec as boolean

select case cpu.AL 
case 0 //obtain display info
 cpu.AL=0x1A //function supported
 cpu.BH=0 //single display
 cpu.BL=mem.Byte(0x48A) //display type
case else : exit(false)
end select

//success
result=true : end