Шрифт из ПЗУ, Как вынуть битовую маску символа из ПЗУ Опции

[GoodWind]

Прочитал в одной из тем (про тушевание символа "U") примерно следующее:
"взять готовые из ПЗУ". Подскажите плз как ?

Желательно в виде Паскаль процедуры.

[xds]

Следующая функция возвращает указатель на начало одной из таблиц битовых комбинаций символов, используемых BIOS:

{ Типы шрифтов, адреса которых возвращает функция GetFontPtr }
const
  ftCgaGr8x8   = 0; { 8x8, графические режимы CGA (вектор int 1Fh) }
  ftCurGr      = 1; { шрифт текущего графического режима (вектор int 43h) }
  ftBios8x14   = 2; { 8x14, шрифт BIOS }
  ftBios8x8    = 3; { 8x8, шрифт BIOS }
  ftBios8x8Ext = 4; { 8x8, шрифт BIOS, вторая половина таблицы (#128-#255) }
  ftBios9x14   = 5; { 9x14, шрифт BIOS }
  ftBios8x16   = 6; { 8x16, шрифт BIOS }
  ftBios9x16   = 7; { 9x16, шрифт BIOS }

function GetFontPtr(FontType: Byte): Pointer; assembler;
asm
  push bp
  mov ax,1130h
  mov bh,FontType
  int 10h
  mov ax,bp
  mov dx,es
  pop bp
end;

[GoodWind]

To xds:
Сенкс :p4: