汉字显示编程示例

概述：

     一般在屏幕上显示汉字的时候需要汉字系统的支持，但需要自己显示汉字的时候，就需要自己读汉字字库文件，把字符点阵读出来，再用绘图的办法显示到屏幕上，本文是读 UCDOS 16点字库文件的示例。
    在 UCDOS 的点阵字库 HZK16 中，字符点阵是按照汉字内码排列的，汉字的内码从一些图形字符开始，起始编码为 A1A1H，汉字内码第一位为区码，每区为 94 个汉字，第二位为每区内的编码，每个汉字的点阵为 16点*16点 共32字节，数据按第一行 1-8点，9-16点，第二行 1-8点，9-16点...排列，每位数据 1 为要显示点，0 为不显示点。汉字点阵数据在字库中的偏移量为 ((区码-A1H)*94 + (区内编码-A1H))*32。
    本程序为一个简单的例子，要显示的汉字在变量 DISP_DATA 中，且没有考虑汉字、英文混用的情况。

源程序：

; Write in May 22,1996
;            By LuoYunBin ----- http://asm.yeah.net

.286

LINE_CHAR	EQU	210	;在屏幕上第几行显示
COL_CHAR	EQU	230	;在屏幕上第几列显示
COLOR_CHAR	EQU	0EH	;显示颜色
CHARS		EQU	(offset disp_data_end-offset disp_data)/2

CODE		SEGMENT
		ASSUME CS:CODE,DS:CODE
		ORG 100H
START:
		jmp	install

CC_FILE		DB	'C:\UCDOS\HZK16',0	;字库文件名，用 UCDOS 的16点阵汉字库
HANDLE		DW	?			;file handle

DISP_DATA	DB	'罗云彬'		;要显示的汉字
DISP_DATA_END	EQU	THIS BYTE

D_OPEN_ERROR	DB	'File C:\UCDOS\HZK16 not found !',0dh,0ah,24h

install:
		mov	ax,3d00h		;打开汉字库
		mov	dx,offset cc_file
		int	21h
		jnb	open_ok
		

		mov	ah,9
		mov	dx,offset d_open_error
		int	21h
		int	20h
open_ok:
		mov	handle,ax

		mov	si,offset disp_data
		mov	di,offset zi_buffer
		mov	cx,chars
		cld
ins2:
		lodsb
		mov	ah,al
		lodsb
		call	get_dots		；读出汉字点针
		loop	ins2

		call	disp_cc			；显示到屏幕

		int	20h

GET_DOTS	PROC

		pusha

		sub	ax,0a1a1h	;汉字的内码从 A1区开始
		cwd
		mov	dl,al		;所以绝对开始区是内码-A1
		mov	al,ah		;点阵在字库中的位置为	
		cbw
		mov	bl,94		;（（汉字码1-A1）* 94 + 汉字码2 - A1）* 32
		mul	bl
		add	ax,dx
		mov	bx,32
		mul	bx
		mov	cx,dx
		mov	dx,ax

		mov	ax,4200h	;移动读写指针到点阵数据位置
		mov	bx,handle
		int	21h

		mov	ah,3fh
		mov	cx,32
		mov	dx,di
		int	21h

		popa
		add	di,32
		ret

GET_DOTS	ENDP

DISP_CC		PROC

		mov	ax,12h		;640*480 mode
		int	10h		;设置640*480/16色显示模式

		mov	cx,chars
		mov	si,offset zi_buffer
		mov	bx,col_char-20	;BX = column
dh_lop0:
		add	bx,20		;every char column+20
		push	cx

		mov	cx,16		;l6 lines/char
		mov	dx,line_char	;DX = start line
dh_lop1:
		push	bx
		push	cx

		lodsb			;16 dots/line
		mov	ah,al
		lodsb
		mov	cx,16
dh_lop2:
		shl	ax,1
		push	ax
		push	bx
		push	cx
		jc	db_color
		xor	al,al		;back color is 0
		jmp	short db_draw
db_color:
		mov	al,color_char
db_draw:
		mov	ah,0ch
		mov	cx,bx
		xor	bh,bh
		int	10h
		pop	cx
		pop	bx
		pop	ax
		inc	bx		;inc column
		loop	dh_lop2

		inc	dx		;next line
		pop	cx
		pop	bx
		loop	dh_lop1

		pop	cx
		loop	dh_lop0

		xor	ah,ah
		int	16h
		mov	ax,3
		int	10h

		ret

DISP_CC		ENDP

ZI_BUFFER	EQU	THIS BYTE

CODE		ENDS

		END START