|
||||
|
||||||||
在西文环境下制作小字库显示汉字编程上海市浦东沈家弄路３４０号 计算中心（２００１２０） 魏为民 |
|
众所周知，为了在西文环境下显示汉字至少要有一个汉字库，汉字库一般比较大， 而其实所需要显示的汉字并不多。这样我们可以把所要显示的汉字字模从字库中取出来， 放到一个小的字库文件中。 用Ｔｕｒｂｏ Ｃ语言在西文环境下显示汉字有三种方法：直接写视频缓冲区Ｖｉｄ ｅｏ－ｂｕｆｆｅｒ；读字库字模，利用Ｐｕｔｐｉｘｅｌ（）画点方式写汉字；读字库 字模，利用ｓｅｔｌｉｎｅｓｔｙｌｅ（）用户定义方式结合ｌｉｎｅ（）画线方式写汉 字。其中方法１显示速度快但系统兼容性差，方法２较为普及，方法３最适宜于１６×１ ６点阵字库。本文采用第３种方法。 本文中Ｆｉｌｔｅｒ．ｃ将源程序中的汉字过滤存放到文件ＩＮＰＵＴ－ＤＡＴ．Ｔ ＸＴ中；Ｍａｋｅ－ｈｚｋ．ｃ将文件ＩＮＰＵＴ－ＤＡＴ．ＴＸＴ中汉字对应的１６× １６点阵字库字模存放到小字库文件ＳＣＣＬＩＢ．ＤＯＴ中；Ｓｈｏｗ－ｈｚｋ．ｃ显 示小字库文件ＳＣＣＬＩＢ１６．ＤＯＴ内容。 １６×１６点阵字库可以是任何一个汉字系统下的１６×１６点阵字库。所有程序在 Ｈｅｒｃ／ＣＧＡ／ＥＧＡ／ＶＧＡ模式ＰＣ／ＸＴ／２８６／３８６上通过。＊ Ｆｉ ｌｔｅｒ．Ｃ Ｖ１．１３ ９３．８．２８＊ ＊ Ｆｕｎｃｔｉｏｎ ＊ Ｆｉｌｔｅｒ ｔｈｅ ｃｈｉｎｅｓｅ ｃｈａｒａｃｔｅｒｓ ｆｏｒｍ ａ Ｃ ｓｏｕｒｃｅ ｆｉｌｅ＊ Ｕｓａｇｅ ＊ Ｆｉｌｔｅｒ ｃ ｓｏｕｒｃｅ ｆｉｌｅ Ｏｕｔ ｆｉｌｅ ＊ ＃ｉｍｃｌｕｄｅ ＜ｓｔｄｉｏ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｓｔｄｌｉｂ．ｈ＞ ＃ｄｅｆｉｌｅ ＣＲ ＯｘＯａ ＦＩＬＥ ＊ＩｎＦｉｌｅ，＊ＯｕｔＦｉｌｅ； ｍａｉｎ（ｉｎｔ ａｒｇｃ，ｃｈａｒ ＊ａｒｇｖｌｌ） ｛ ｉｎｔ ｃｈ， ｉＯｕｔＦｉｌｅ＝０； ｉｆ（ａｒｇｃ ！＝３）｛ Ｐｒｉｎｔｆ（“＼ｎ ００７ＵＳＡＧＥ：ＦＩＬＴＥＲ Ｃ ｓｏｕｒｃｅ ｆｉｌｅ Ｏｕｔ ｆｉｌｅ＼ｎ”）； ｅｘｉｔ（１）； ｛ ｉｆ（（ＩｎＦｉｌｅ＝ｆｏｐｅｎ（ａｒｇｖ［１］，“ｒ”））＝＝ＮＵＬＬ） ｛ ｐｒｉｎｔｆ（“＼ｎ ００７Ｃａｎ’ｔ ｏｐｅｎ ｔｈｅ Ｃｓｏｕｒｃ ｅ ｆｉｌｅ＼ｎ”）； ｅｘｉｔ（１）； ｝ ｉｆ（（ＯｕｔＦｉｌｅ＝ｆｏｐｅｎ（ａｒｇｖ［２］，“ｗ”））＝＝ＮＵＬＬ） ｝ ｐｒｉｎｔｆ（“＼ｎ ００７Ｃａｎ’ｔ ｏｐｅｎ ｔｈｅ ｏｕｔｐｕｔ ｆ ｉｌｅ ＩＮＰＵＴ ＤＡＴ．ＴＸＴ＼ｍ”）； ｅｘｉｔ（１）； ｛ ｗｈｉｌｅ （（ｃｈ＝ｆｇｅｔｃ（ＩｎＦｉｌｅ））！＝ＥＯＦ） ｛ ｉｆ（（ｃｈ＞Ｏｘａｌ）＆＆（ｃｈ＜Ｏｘｆｅ）） ｛ ｆｐｕｔｃ（ｃｈ，ＯｕｔＦｉｌｅ）； ｃｈ＝ｆｇｅｔ，（ＩｎＦｉｌｅ）； ｆｐｕｔｃ（ｃｈ，ＯｕｔＦｉｌｅ）； ｉ ＯｕｔＦｉｌｅ＋＋； ｉｆ （！（ｉ ＯｕｔＦｉｌｅ ％ ２０））ｆｐｕｔｃ（ＣＲ，ＯｕｔＦ ｉｌｅ）； ｝ ｝ ｆｃｌｏｓｅ（ＩｎＦｉｌｅ）； ｆｃｌｏｓｅ（ＯｕｔＦｉｌｅ）； ｝ ／＊ ＊ Ｍａｋｅ ｈｘｋ．Ｃ Ｖ１．１３ ９３．８．２８ ＊ ＊ Ｆｕｎｃｔｉｏｎ ＊ Ｍａｋｅ ｃｈｉｎｅｓｅ ｃｈａｒａｃｔｅｒ ｄｏｔ ｌｉｂｆｉｌｅ ＊ Ｕｓａｇｅ ＊ ＭＡＫＥ ＨＺＫ Ｉｎ ｆｉｌｅ Ｏｕｔ ｆｉｌｅ ＊ Ｅｘａｍｐｌｅ ＊ Ｆｉｌｅｓ ＊ Ｃ：＼ＣＣＬＩＢＪ．ＤＯＴ １６×１６ ｄｏｔ ｌｉｂ ｆｉｌｅ ＊ ＩＮＰＵＴ ＤＡＴ．ＴＸＴ Ｉｎｐｕｔ ｔｅｘｔ ｆｉｌｅ ＊ ＳＣＣＬＩＢ１６．ＤＯＴ ＯｕｔＰｕｔ １６×１６ ｄｏｔｌｉｂ ｆｉ ｌｅ ＊ ＳｅｅＡｌｓｏ ＊ Ｂｕｇｓ ＊ １６×１６ ｃｈｉｎｅｓｅ ｄｏｔ ｌｉｂ ＊ ＃ｉｎｃｌｕｄｅ ＜ｓｌｄｉｏ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｓｌｄｋｉｂ．ｈ＞ ＦＩＬＥ ＊ＩｎＦｉｌｅ，＊ＯｕｔＦｉｌｅ，＊ＣｃｌｉｂＦｉｌｅ，＊ｆｏｐｅｎ （）；ａｉｎ（ｉｎｔ ａｒｇｃ，ｃｈａｒ ＊ａｒｇｖ［］） ｛ ｉｎｔ ｃｈ； ｕｎｓｉｇｎｅｄ ｃｈａｒ ｂｕｆ［３２］； ｕｎｓｉｇｎｅｄ ｃｈａｒ ｈｉｇｈ ｂｙｔｅ，ｌｏｗ ｂｙｔｅ； ｌｏｎｇ ｐ； ｉｆ ａｒｇｃ ！＝３）｛ ｐｒｉｎｔｆ（“＼ｎ＼００７ＵＳＡＧＥ：ＭＡＫＥ ＨＺＫＩｎ ｆｉｌ ｅ Ｏｕｔ ｆｉｌｅ＼ｎ”）； ｐｒｉｎｔ（“Ｉｎ ｆｉｌｅ：Ｉｎｐｕｔ ｃｈｉｅｓｅ ｃｈａｒａｃ ｔｅｒ ｔｅｘｔ ｆｉｌｅ ＩＮＰＵＴ ＤＡＴ．ＴＸＴ＼ｎ”）； ｐｒｉｎｔｆ（“Ｏｕｔ ｆｉｌｅ：Ｏｕｔｐｕｔ ｓｍａｌｌｃｈｉｎｅ ｓｅ ｃｈａｒａｃｔｅｒ ｌｉｂ ＳＣＣＬＩＢ１６．ＤＯＴ＼ｎ”）； ｅｘｉｔ（１）； ｝ ｉｆ（（ＩｎＦｉｌｅ＝ｆｏｐｅｎ（ａｒｇｖ［１］，“ｒ”））＝＝ＮＵＬＬ） ｛ ｐｒｉｎｔ（“＼＼００７Ｃａｎ’ｔ ｏｐｅｎ ｔｈｅ ｉｎｐｕｔ ｃｈ ｉｎｅｓｅ ｃｈａｒａｃｔｅｒ”）； ｐｒｉｎｔｆ（“ｔｅｘｔ ｆｉｌｅ ＩＮＰＵＴ ＤＡＴ．ＴＸＴ＼ｎ”） ； ｅｘｉｔ（１）； ｝ ｉｆ（（ＯｕｔＦｉｌｅ＝ｆｏｐｅｎ（ａｒｇｖ［２］，“ｅｂ”））＝＝ＮＵＬ Ｌ”）｛ ｐｒｉｎｔｆ（“＼ｎ＼００７Ｃａｎ’ｔ ｏｐｅｎ ｔｈｅ ｏｕｔｐｕｔ ｓｍａｌｌ ｃｈｉｎｅｓｅ ｃｈａｒａｃｔｅｒ”）； ｐｒｉｎｔｆ（“ｌｉｂ ｆｉｌｅ ＳＣＣＬＩＢ１６．ＤＯＴ＼ｎ”）； ｅｘｉｔ（１）； ｝ ｉｆ（（ＣｃｌｉｂＦｉｌｅ＝ｆｏｐｅｎ（“Ｃ：＼ＣＣＬＩＢＪ．ＤＯＴ“，” “ｒｂ”））＝＝ＮＵＬＬ） ＰＲＩＮＴ（“＼ｎＣａｎ ｎｏｔ ｏｐｅｎ ＣＣＬＩＢ！＼ｎ＼００７” ）； ＥＸＩＴ（１）； ｝ ｆｓｅｅｋ（ＯｕｔＦｉｌｅ，０，０）； ｗｈｉｌｅ（！ ｆｅｏｆ（ＩｎＦｉｌｅ））｛ ｃｈ＝ｆｇｅｔｒ（ＩｎＦｉｌｅ）； ｉｆ（ｃｈ＞＝Ｏｘａｌ ＆＆ ｃｈ＜＝Ｏｘｆｏ）｛ ｈｉｇｈ ｂｙｔｅ＝ｃｈ； ｌｏｗ ｂｙｔｅ＝ｆｇｅｔｃ（ＩｎＦｉｌｅ）； ｐ＝ｈｉｇｈ ｂｙｔｅ－Ｏｘａｌ； ｉｆ （Ｐ＞＝１５ ）ｐ－＝６； ｐ＝ｐ＊９４＊ｌｏｗ ｂｙｔｅ－Ｏｘａｌ； ｆｓｅｅｋ（ＣｃｌｉｂＦｉｌｅ，（ｌｏｎｇ）ｐ＊３２，ＳＥＥＫ ＳＥＴ ）； ＦＲＥＡＤ（ｂｕｆ，ｓｉｚｅｏｆ（ｕｎｓｉｇｎｅｄ ｃｈａｒ），３２， ＣｃｌｉｂＦｉｌｅ）； ｆｗｒｉｔｅ（ｂｕｆ，ｓｉｚｅｏｆ（ｕｎｓｉｇｎｅｄ ｃｈａｒ），３２ ，ＯｕｔＦｉｌｅ）； ｝ ｝ ｆｃｌｏｓｅ（ＩｎＦｉｌｅ）； ｆｃｌｏｃｅ（ＯｕｔＦｉｌｅ）； ｆｃｌｏｓｅ（ＣｃｌｉｂＦｉｌｅ）； ＊ ＊ Ｓｈｏｗ ｈｚｋ．Ｃ Ｖ１．１３ ９３．８．２８ ＊ ＊ Ｆｕｎｃｔｉｏｎ ＊ Ｓｈｏｗ ＭＡＫＥ ＨＺＫ．ＥＸＥ ｍａｋｅ ｌｉｂ ｆｉｌｅｃｏｎｔｅ ｎｔ＊ Ｕｓａｇｅ ＊ Ｓｈｏｗ ｈｚｋ ＳＣＣＬＩＢ１６．ＤＯＴ ＊ Ｓｅｅａｌｓｏ ＊ Ｔｕｒｂｏ Ｃ ＊ ｓｅｔｌｉｎｅｓｔｙｌｅ（ＵＳＥＲＢＩＴ ＬＩＮＥ，ｕｐａｔｔｅｒｎ ，ＮＯＲＭ ＷＩＤＴＨ）；＊ ＬＩＮＥ（）； ＊ Ｂｕｇｓ ＊ １６×１６ｃｈｉｎｅｓｅ ｄｏｔ ＊／ ＃ｉｎｃｌｕｄｅ ＜ｓｔｄｏｉｏ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｓｔｄｌｉｂ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｇｒａｐｈｉｃｓ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｓｔｒｉｎｇ．ｈ＞ ＃ｉｎｃｌｕｄｅ ＜ｃｔｙｐｅ．ｈ＞ ＃ｄｅｆｉｌｅ ＭａｘＢｕｆＳｉｚｅ ２０４８ ＃ｄｅｆｉｌｅ ＳＰＡＣＥ Ｏｘ２０ ＃ｄｅｆｉｌｅ ＣＲ ＯｘＯａ ＦＩＬＥ ＊Ｌｉｂ ｄａｔ Ｆｉｌｅ； ｍａｉｎ（ｉｎｔ ａｒｇｃ， ｃｈａｒ ＊ａｒｇｖ［］） ｛ ｌｏｎｇ Ｉ ｏｆｆｓｅｔ； ｕｎｓｉｇｎｅｄ ｃｈａｒ ｂｕｆ［３２］； ｕｎｓｉｇｎｅｄ ｉｎｔ ｕｐａｔｔｅｒｎ； ｉｎｔ ｘ ｓｔａｒｔ＝５，ｙ ｓｔａｒｔ＝５； ｉｎｔ ｘ，ｙ，ＭａｘＸ，ＭａｘＹ； ｉｎｔ ｉ，ｄｏｔ ｓｐａｃｅ ｄｏｔ＝１２，ｃｏｌｏｒ＝ＹＥＬＬＯＷ； ｉｆ（ａｒｇｃ ！＝２）｛ ｐｒｉｎｔｆ（“＼ｎ＼００７ＵＳＡＧＥ：Ｓｈｏｗ ｈｚｋ ＳＣＣＬＩＢ １６．ＤＯＴ＼ｎ”）； ｅｘｉｔ（１）； ｝ ｉｆ（（Ｌｉｂ ｄａｔ Ｆｉｌｅ＝ｆｏｐｅｎ（ａｒｇｖ［１］，“ｒｂ”）） ＝＝ＮＵＬＬ）｛ ｐｒｉｎｔｆ（“＼ｎ＼００７Ｃａｎ’ｔ ｏｐｅｎ ｔｈｅ ｓｍａｌｌ ｃｈｉｎｅｓｅ ｃｈａｒａｃｔｅｒ”）； ｐｒｉｎｔｆ（“ｌｉｂ ｆｉｌｅ ＳＣＣＬＩＢ１６．ＤＯＴ＼ｎ”）； ｅｘｉｔ（１）； ｝ Ｉｎｉｔｉａｚｅ（）； ＭａｘＸ＝ｇｅｔｍａｘｘ（）； ＭａｘＹ＝ｇｅｔｍａｘｙ（）； ｘ＝ｘ ｓｔａｒｔ； ｙ＝ｙ ｓｔａｒｔ； ｓｅｔｃｏｌｏｒ（ｃｏｔｏｒ）； Ｉ ｏｆｆｓｅｔ＝０； ｗｈｉｌｅ（！ｆｅｏｆ（Ｌｉｂ ｄａｔ Ｆｉｌｅ）） ｛ ｆｓｅｃｋ（Ｌｉｂ ｄａｔ Ｆｉｌｅ，（ｌｏｎｇ）Ｉ ｏｆｆｓｅｔ＊３ ２，ＳＥＥＫ ＳＥＴ）； ｆｒｅａｄ（ｂｕｆ，ｓｉｚｅｏｆ（ｕｎｓｉｇｎｅｄ ｃｈａｒ），３２， Ｌｉｂ ｄａｔ Ｆｉｌｅ）； Ｉ ｏｆｆｓｅｔ＋＋； ｆｏｒ（ｉ＝０；；ｉ＜３２；ｉ＋＝２） ｛ ｕｐａｔｔｅｒｎ＝（ｂｕｆ［ｉ］＜＜８） 丨 ｂｕｆ［ｉ＋１］； ｓｅｔｌｉｎｅｓｔｙｌｅ（ＵＳＥＲＢＩＴ ＬＩＮＥ，ｕｐａｔｔｅｒ ｎ，ＮＯＲＭ ＷＩＤＴＨ）； ｌｉｎｅ（ｘ＋１５，ｙ＋ｉ＼２，ｘ，ｙ＋ｉ＼２）； ｝ ｘ＝ｘ＋１６＋ｄｏｔ ｓｐａｃｅ ｄｏｔ； ｉｆ（ｘ＞ＭａｘＸ） ｛ ｘ＝ｘ ｓｔａｒｔ； ｙ＋＝２４； ｝ ｉｆ（（ｙ＋１６）＞ＭａｘＹ）｛ ｇｅｔｃｈ（）； ｃｌｅａｒｄｅｖｉｃｅ（）； ｙ＝ｙ ｓｔａｒｔ； ｝ ｝ ｆｃｌｏｓｅ（Ｌｉｂ ｄａｔ Ｆｉｌｅ）； ｇｅｔｃｈ（）； ｃｌｏｓｅｇｒａｐｈ（）； ｝ ／＊ ＊ ＩＮＩＴＩＡＬＩＺＥ：Ｉｎｉｔｉａｌｉｚｅｓ ｔｈｅ ｇｒａｐｈｉｃｓ ｓｙｓｔｅｍ ａｎｄ ｒｅｐｏｒｔｓ ＊ ａｎｙ ｅｒｒｏｒｓ ｗｈｉｃｈ ｏｃｃｕｒｅｄ． ＊／ Ｉｎｉｔｉａｌｉｚｅ（ｖｏｉｄ） ｛ ｉｎｔ ＧｒａｐｈＤｒｉｖｅｒ，ＧｒａｐｈＭｏｄｅ，ＥｒｒｏｒＣｏｄｅ； ＧｒａｐｈＤｒｉｖｅｒ＝ＤＥＴＥＣＴ； ｉｎｉｔｇｒａｐｈ（ ＆ＧｒａｐｈＤｒｉｖｅｒ， ＆ＧｒａｐｈＭｏｄｅ，“ ”）； ＥｒｒｏｒＣｏｄｅ＝ｇｒａｐｈｒｅｓｕｌｔ（）； ｉｆ（ＥｒｒｏｒＣｏｄｅ！＝ｇｒＯｋ） ｛ ｐｒｉｎｔ（“Ｇｒａｐｈｉｃｓ Ｓｙｓｔｅｍ Ｅｒｒｏｒ：％ｓ＼ｎ”， ｇｒａｐｈｅｒｒｏｒｍｓｇ（ＥｒｒｏｒＣｏｄｅ）； ｅｘｉｔ（１）； ｝ ｝ （计算机世界报 1994年 第1期） |
周报全文频道联系方式：010-68130909 |
||||||
| 【关于我们】 【广告服务】 【周报发行】 【投稿指南】 【投稿声明】 【联系方式】 【法律声明】 【媒体手册】 【编读往来】 |
||||||
| Copyright© ccw.com.cn,All rights reserved | ||||||
| 中国计算机世界出版服务公司版权所有 | ||||||