🚀 go-pugleaf

こんにちは、藤澤と申します。

便乗質問なのですが......

In article <KATE.99Feb5174124@yamato.trad.pfu.co.jp> kate@pfu.co.jp
(KATAYAMA Yoshio) writes:
> お望みの結果は、

> (global-set-key "\C-x\M-="
> 		(lambda ()
> 		  (interactive)
> 		  (let* ((c (following-char))
> 			 (lc (char-component c 0)))
> 		    (cond ((< lc 128)
>			   (message "0x%.2x" lc))
>			  ((or (= lc lc-roman))
>			   (message "0x%.2x"
>				    (- (char-component c 1) 128)))
>			  ((or (= lc lc-jp) (= lc lc-jpold))
>			   (message "0x%.2x%.2x"
>				    (- (char-component c 1) 128)
>				    (- (char-component c 2) 128))))))) 
>
> を行なっておいて、C-x M-= で得られると思います。これは手抜きをしてい
> て、ASCII、JIS X 0201-roman、JIS X 0208-{1976|1983} しか対応していま
> せん。--片山＠ＰＦＵ

これを ASCII、JIS X 0201-roman、JIS X 0208 以外、例えば GB や Big5 に
対応させるには、どのようにしたらよろしいのでしょうか。

現在特に Big5 のコードを簡単に調べられないかと考えていますので、御教授
下されば幸いに存じます。


------
                                 ┌────────────────┐
                                 │藤澤次郎   神戸大学文化学研究科 ┃
                                 │E-mail:fujisawa@lit.kobe-u.ac.jp┃
                                 └━━━━━━━━━━━━━━━━┛