/*********************************************************/
/*                     VGA13H模式函數(shù)                    */
/*********************************************************/
/*********************************************************/

# if !defined(__DOS_DEF_)
#    include <dos.h>
# endif
/* 此處定義了一些通用的宏 */

# define BYTE  unsigned char
# define WORD  unsigned int
# define DWORD unsigned long
# define BOOL  BYTE
# define TRUE  1
# define FALSE !TRUE

/* BIOS 8*8 西文字庫的段地址和偏移量 */
WORD FONT_SEG;
WORD FONT_OFF;

void setmode();
void waitkey();
void closemode();
void GetFontAdd();
void locate(int Line,int Col);
void pset(int x,int y,BYTE color);
void setpal(int Color,BYTE r,BYTE g,BYTE b);
BYTE ScanKey(void);
BYTE point(int x,int y);

/* 獲取BIOS 8*8 西文字庫的段地址和偏移量 */
void GetFontAdd()
{
  struct REGPACK regs;
  regs.r_bx=0x0300;
  regs.r_ax=0x1130;
  intr(0x10,&regs);
  FONT_SEG=regs.r_es;
  FONT_OFF=regs.r_bp;
}

/* 等待鍵盤輸入 */
void waitkey()
{
  _AX=0;
  geninterrupt(0x16);
}
/* 設置VGA 13H模式 */
void setmode()
{
  _AX=0x13;
  geninterrupt(0x10);
  GetFontAdd();
}

/* 設置文本模式 */
void closemode()
{
  _AX=0x3;
  geninterrupt(0x10);
}

/* 設置調色板 */
void setpal(int Color,BYTE r,BYTE g,BYTE b)
{
  outportb(0x3c8,Color);
  outportb(0x3c9,r);
  outportb(0x3c9,g);
  outportb(0x3c9,b);
}

/* 屏幕定位（用于輸出字符）*/
void locate(int Line,int Col)
{
  _DH=Line;
  _DL=Col;
  _AH=2;
  _BX=0;
  geninterrupt(0x10);
}

/* 從鍵盤緩沖區(qū)內直接讀出掃描碼 */
BYTE ScanKey(void)
{
  int  start,end;
  WORD key=0;
  start=peek(0,0x41a);
  end=peek(0,0x41c);
  if (start==end) return(0);
  else
  {
    key=peek(0x40,start);
    start+=2;
    if (start==0x3e) start=0x1e;
    poke(0x40,0x1a,start);
    return(key/256);
  }
}

/* 在（X，Y）處繪點 */
void pset(int x,int y,BYTE color)
{
  pokeb(0xa000,y*320+x,color);
}

/* 取（X，Y）處顏色 */
BYTE point(int x,int y)
{
  return peekb(0xa000,y*320+x);
}