在原版FoxPro中实现汉字的特显功能

重庆  彭波林
1995-02-24

        源程序：
        ；PROGRAM NAME：TX.ASM
        seg-a segment byte public
        assume cs:seg-a,ds:seg-a
        org O
        tx    proc far
        start:push ds
        push cx
        mov ah,oEh
        mov bh,oh
        Loc-1:mov al,[bx]
        cmp al,0
        je loc-2
        int 10h
        int bx
        jmp start Loc-1
        Loc-2:pop cx
        pop ds
        retf
        tx    ends
        seg-a ends
        end start
        以上源程序经编译连接为BIN文件，在FoxPro中用Load命令将其载入，用call命令执行，非常方便，下面是一个实例，目的在屏幕(100，200)座标处显示96×96点阵楷体“汉字”两个大字：
        假设以上源程序经编译连接后生成TX.BIN，则在FoxPro环境中：
        ·Load TX
        ·Str=CHR(14)+'[{@96,96-100|200=3汉字}]'
        ·Call TX WITH str
        实践证明，在不同的汉字系统中，只要赋给变量str以合法的特显字符串，都能通过以上方法进行特显操作，这一点在程序设计中非常灵活与实用。
        (重庆  彭波林)
 
 