将UCDOS下的五笔输入法移植到Windows9X

习惯使用UCDOS下的五笔字型输入法的用户，由于系统升级，用上Windows 9X系统，但录入文字时，仍恋恋不忘UCDOS下的五笔字型输入法，此时你可以将UCDOS下的五笔字型输入法移植过来，供你使用。具体方法如下：
第一步：使用UCDOS下的万能输入法编码管理器IMDMNG.EXE（UCDOS 5.0以上版本均有），将已编译好的编码字典WB.imd反编译为UCDOS下的码表格式文件WB.TXT，命令如下：
C:\UCDOS\IMDMNG C:\UCDOS\DRV\WB.IMD C:\UCDOS\WB.TXT
第二步：将UCDOS的码表格式文件WB.TXT 转换为 Windows 9X 下码表格式文件，但UCDOS的码表格式文件和Windows 9X下的码表格式文件格式不同，其一：文件头格式不同；其二：正文部分编码与字词的排列方式不同，Windows 9X要求的格式是字词在前编码在后，中间不留空格。而UCDOS码表正文格式是编码在前字词在后，编码占12个位置，这样编码与字词之间就留有空格；其三：对重码的处理方法不同，Windows 9X要求所有重码分行表示，而UCDOS则要求重码的字或词放在同一行，重码的字或词之间以空格作为分隔符；其四：Windows 9X不要求字、词按编码的字母顺序排，而UCDOS要求字、词按编码的字母顺序排。由于上述不同，UCDOS 码表格式文件变为Windows 9X码表格式文件，需要经过以下步骤：
1.将UCDOS码表格式文件的文件头去掉。使用字处理软件对文本文件WB.TXT 进行编辑，将文件头去掉,只留正文部分，然后存盘即可。
2.将WB.TXT转换成Windows 9X下的格式文件WB9X.TXT。进入VFP或FoxPro for Windows环境编程，程序名为CH.PRG，运行该程序即将WB.TXT转换成Windows9X的格式文件WB9X.TXT。程序清单如下：
create dbf wb(bm C(12), hz C(24))
appe from c:\ucdos\wb.txt sdf

inde on bm to bm
go top
namef='C:\UCDOS\WB9X.TXT'
hand=fcreate(namef)
CRLF=CHR(13)+CHR(10)
**建立Windows 9x码表文件头
=fwrite(hand,'[Description]'+crlf) &&描述
=fwrite(hand,'Name=五笔'+crlf) &&输入法名称
=fwrite(hand,'MaxCodes=4'+crlf)&&最大码长
=fwrite(hand,"UsedCodes=abcdefghijklmnopqrstuvwxy"+crlf) &&码元表
=fwrite(hand,'WildChar=z'+crlf) && 万能键
=fwrite(hand,'Sort=0'+crlf) &&sort为0在挂接输入法时不对码表文件排序，为1 排序
=fwrite(hand,'[Text]'+crlf) &&正文部分
do while .not.eof()
hz1=trim易做图+' '
do while at(' ',hz1)<>1
kg=at(' ',hz1)
=fwrite(hand,left(hz1,kg-1)+trim(bm)+crlf)
hz1=trim(subs(hz1,kg+1))+' '
enddo
skip
enddo
use
=fclose(hand)
retu
第三步：在Windows9x系统中，通过在附件下安装的输入法生成器，在弹出的对说框中选“创建输入法”，单击“浏览”，找到WB9X.TXT，再单击“转换”，完成后单击“确定”，再选“创建”即可直接将五笔输入模块挂接在Windows9X系统中使用。感兴趣的朋友可按上述方法试一试。用你喜欢的输入法录入汉字。
（完）计算机基础教程网