[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

ucdospy



Hi, Su Yong,
I am back from Nagasaki and have just tried your scheme. 
It is very nice! Thank you so much for your great help!

Regards,

--Wen
wen@japan.email.ne.jp

From: Su Yong <ysu@gnocis.org>
Subject: Re: About wnn
Date: Wed, 04 Apr 2001 13:57:14 +0800 (CST)
Message-ID: <20010404.135714.74740244.ysu@gnocis.org>

ysu> ----- Original Message -----
ysu> > ysu> 我現在用的就是quail, 輸入法是用UCDOS的 "智能全拼"的 .tit文件
ysu> > ysu>                                        ~~~~~~~~~~~~~~~
ysu> > ysu>                                     Debian的cxterm裡有
ysu> > ysu>                                     ucdos的輸入法, 大概
ysu> > ysu>                                     它的source裡有這個文件.
ysu> > ysu> 轉化而來的, 然後再自己手動(不要笑)做了修改, 我的一個
ysu> > ysu> 朋友為此寫了一個script, 可惜現在不在手上.
ysu> > 
ysu> > UCDOS我只是聽說過,但不知如何作. 你要是有時間能詳悉介紹一下,不勝感激.
ysu> 以Debian的GB編碼用戶為例:
ysu>         apt-get source cxterm-gb
ysu> 得到cxterm的source, 
ysu>         如比說 source 的目錄名為 cxterm-5.1p1 (也可能是別的名字)
ysu> 的文件, 啟動一個emacs會話, 然後輸入
ysu>         M-x titdic-convert cxterm-5.1p1/dict/UCDOSPY.tit RET
ysu> 你會發現當前目錄下多了一個叫 UCDOSPY.el的文件.
ysu> 這個文件能幹活, 但是幹得很糟, 主要是不能輸入詞(組).
ysu> 
ysu> 我們需要把象下面這樣的項
ysu>         ("buduan" "(不斷)")
ysu>         ("budui" "(不對)(部隊)")
ysu> 變成
ysu>         ("buduan" ["不斷"])
ysu>         ("budui" ["不對" "部隊"])
ysu> ;
ysu> 把
ysu>         ("xian" "秈□跣躚霰(西安)")
ysu> 變成
ysu>         ("xian" ["秈" "□" "跣" "躚" "霰" "西安"])
ysu> 當時我用vim完成了這件事情,
ysu> 我的一個朋友為此寫了個script(不過我發覺它不能對付"xian"這種情況).
ysu> 
ysu> #!/bin/bash
ysu> 
ysu> EMACS="emacs -batch --no-init-file --no-site-file --multibyte"
ysu> EMACSLISPDIR=/usr/share/emacs/21.0.100/lisp/
ysu> MV="mv -f"
ysu> 
ysu> ${EMACS} -l ${EMACSLISPDIR}/international/titdic-cnv --eval '(batch-titdic-convert t)' $1.tit
ysu> 
ysu> sed -e '/"(.*)")$/{ 
ysu> 	s/"(\(.*\))")$/["\1"])/ 
ysu> 	s/)(/""/g 
ysu> }' $1.el > $1.el.tmp
ysu> 
ysu> ${MV} $1.el.tmp $1.el
ysu> 
ysu> ${EMACS} -l ${EMACSLISPDIR}/international/quail -f batch-byte-compile $1.el
ysu> 
ysu> 當時我在vim直接修改的.
ysu> 首先先做下列變換:
ysu>        "(  => ["
ysu>        ~~     ~~
ysu>        )"  => "]
ysu>        ~~     ~~
ysu>        )(  => " "
ysu>        ~~     ~~~
ysu> 在得到新文件 UCDOSPY.el.1中,
ysu> 需要把象下面這樣的項:
ysu>         ("xian" "秈□跣躚霰(西安"])
ysu> 變成
ysu>         ("xian" ["秈" "□" "跣" "躚" "霰" "西安"])
ysu> 用sed該怎麼做我不清楚.
ysu> 不過因為象 "xian"這種特殊情況在漢語中實在太少了, 所以當時我
ysu> 是在emacs裡手動修改(在vi裡不好做, 因為UCDOSPY.el是mule編碼的)的.
ysu> 
ysu> 最後, 把修改後的 UCDOSPY.el 放到比如你的 $HOME 下,
ysu> 並且在你的.emacs裡加上:
ysu> ;;; Customize the Chinese Environment
ysu> (load-file "~/UCDOSPY.el")
ysu> (set-input-method "chinese-py-ucdos")
ysu> (set-default-font "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-fontset-standard")
ysu> 
ysu> BTW: 別忘了把coding system設為 Chinese GB
ysu> 
ysu> 重新啟動emacs, 現在你可以在emacs裡使用ucdos拼音了(不過只是部分功能).
ysu> 
ysu> 附件裡是我一直在用的ucdospy.el(gziped), 我已經在其中添加了許多詞條.
ysu> 不知道該如何給它加上聯想功能?
ysu> 
ysu> > 
ysu> > 十分感謝你提供的寶貴信息!

-- 
| This message was re-posted from debian-chinese-gb@lists.debian.org
| and converted from gb2312 to big5 by an automatic gateway.



Reply to: