256色汉字显示程序

核心提示：/* CC256.C -- 256色汉字显示程序*/#include "dos.h"#include "stdio.h"#include "conio.h"FILE *fp;void OpenLIB(void);void CC256(int, int, in

/*
　  CC256.C -- 256色汉字显示程序
*/
#include "dos.h"
#include "stdio.h"
#include "conio.h" FILE *fp; void OpenLIB(void);
void CC256(int, int, int, char *Str);
void ErrMsg();
void InitScr();
void RstScr();
void PutPoint(int x, int y, int Color);
void Quit(); int main(void)
{
　  char *Str = "谢谢您使用本书";
　  OpenLIB();
　  InitScr();
　  CC256(70, 80, 2, Str);
　  getch();
　  Quit();
　  return 0;
} void InitScr()
{
　  union REGS In;
　  In.x.ax = 0x13;　　　　　　　　 /*进入13H模式  */
　  int86(0x10, &In, &In);
} void RstScr()
{
　  union REGS In;
　  In.x.ax = 0x03;　　　　　　 /* 退出13H模式 */
　  int86(0x10, &In, &In);
} void OpenLIB(void)　  /* 打开24点阵宋体字库 */
{
　  if ((fp = fopen("c:\\UCdos\\clib24s", "rb")) == NULL) ErrMsg();
} void CC256(int x, int y, int Wid, char *Str)
{
　 unsigned  Zcode, Bcode;　　　　　　　　　  /* 区码, 位码 */
　 int  i, j, k, Rec, Color;
　 long Len;
　 char Buf[72];
　 while (*Str)　　　　　　　　　　　　　　　 /* 直到字串显示完 */
　 {
　　  if ((*Str & 0x80) && (*(Str+1) &0x80))  /* 是汉字 */
　　  {
  Zcode = (*Str-0xa1) & 0x07f;　　　　  /* 区码 */
  Bcode = (*(Str+1)-0xa1) & 0x07f;　　  /* 位码 */
  Rec = Zcode*94+Bcode;　　　　　　　　 /* 记录号 */
  Len = Rec*72L;　　　　　　　　　　　  /* 在字库中位置 */
  fseek(fp, Len, SEEK_SET);
  fread (Buf, 1, 72, fp);　　　　　　　 /* 72字节 */
  for (i = 0; i < 24; i++)
　　 for (j = 0; j < 3; j++)
　　　  for (k = 0; k < 8; k++)
　  if (Buf[i*3+j] >> (7-k) & 1)
　  {
　　　 Color = y+j*8+k-46;
　　　 PutPoint(x+i, y+j*8+k, Color);
　  }
  x = x+24+Wid;
  Str += 2;
　　  }
　 }
　 return;
 }
/* 直接写视频缓冲区 */
void PutPoint(int x, int y, int Color)　 /* 画点函数 */
{
　 char far *p;
　 p = (char far *) (0x0a0000000L);
　 * (x+y*320+p) = Color;
} void Quit()
{
　  RstScr();
　  fcloseall();
} void ErrMsg()
{
　  PRintf("Open LIB File Error!");
　  getch();
　  Quit();
}