View file File name : zh-bopomofo.mim Content :;; zh-bopomofo.mim -- Bopomofo input method ;; Copyright (C) 2004, 2005, 2006 ;; National Institute of Advanced Industrial Science and Technology (AIST) ;; Registration Number H15PRO112 ;; This file is part of the m17n database; a sub-part of the m17n ;; library. ;; The m17n library is free software; you can redistribute it and/or ;; modify it under the terms of the GNU Lesser General Public License ;; as published by the Free Software Foundation; either version 2.1 of ;; the License, or (at your option) any later version. ;; The m17n library is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; Lesser General Public License for more details. ;; You should have received a copy of the GNU Lesser General Public ;; License along with the m17n library; if not, write to the Free ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ;; Boston, MA 02110-1301, USA. ;;; Input method for Bopomofo. ;;; @image html bopo-kbd.png "Keyboard Layout" ;;; @image latex bopo-kbd.eps "Keyboard Layout" width=\narrowwidth ;; ㄅ ㄉ ˇ ˋ ㄓ ˊ ˙ ㄚ ㄞ ㄢ ㄦ =+ ;; ㄆ ㄊ ㄍ ㄐ ㄔ ㄗ ㄧ ㄛ ㄟ ㄣ [{ ]} ;; ㄇ ㄋ ㄎ ㄑ ㄕ ㄘ ㄨ ㄜ ㄠ ㄤ '" \| ;; ㄈ ㄌ ㄏ ㄒ ㄖ ㄙ ㄩ ㄝ ㄡ ㄥ (input-method zh bopomofo) (description "Bopomofo input method using this keyboard layout. ㄅ ㄉ ˇ ˋ ㄓ ˊ ˙ ㄚ ㄞ ㄢ ㄦ =+ ㄆ ㄊ ㄍ ㄐ ㄔ ㄗ ㄧ ㄛ ㄟ ㄣ [{ ]} ㄇ ㄋ ㄎ ㄑ ㄕ ㄘ ㄨ ㄜ ㄠ ㄤ '\" \\| ㄈ ㄌ ㄏ ㄒ ㄖ ㄙ ㄩ ㄝ ㄡ ㄥ ") (title "BOPO") (map (map ("1" ?ㄅ) ("2" ?ㄉ) ("3" ?ˇ) ("4" ?ˋ) ("5" ?ㄓ) ("6" ?ˊ) ("7" ?˙) ("8" ?ㄚ) ("9" ?ㄞ) ("0" ?ㄢ) ("-" ?ㄦ) ("`" ?€) ("q" ?ㄆ) ("w" ?ㄊ) ("e" ?ㄍ) ("r" ?ㄐ) ("t" ?ㄔ) ("y" ?ㄗ) ("u" ?ㄧ) ("i" ?ㄛ) ("o" ?ㄟ) ("p" ?ㄣ) ("a" ?ㄇ) ("s" ?ㄋ) ("d" ?ㄎ) ("f" ?ㄑ) ("g" ?ㄕ) ("h" ?ㄘ) ("j" ?ㄨ) ("k" ?ㄜ) ("l" ?ㄠ) (";" ?ㄤ) ("z" ?ㄈ) ("x" ?ㄌ) ("c" ?ㄏ) ("v" ?ㄒ) ("b" ?ㄖ) ("n" ?ㄙ) ("m" ?ㄩ) ("," ?ㄝ) ("." ?ㄡ) ("/" ?ㄥ)) (fullwidth ("1" "1") ("2" "2") ("3" "3") ("4" "4") ("5" "5") ("6" "6") ("7" "7") ("8" "8") ("9" "9") ("0" "0") ("-" "ー") ("=" "=") ("`" "`") ("!" "!") ("@" "@") ("#" "#") ("$" "$") ("%" "%") ("^" "^") ("&" "&") ("*" "*") ("(" "(") (")" ")") ("_" "_") ("+" "+") ("~" ("〜 ̄")) ("q" "q") ("w" "w") ("e" "e") ("r" "r") ("t" "t") ("y" "y") ("u" "u") ("i" "i") ("o" "o") ("p" "p") ("[" ("「[")) ("]" ("」]")) ("\\" ("\¥")) ("Q" "Q") ("W" "W") ("E" "E") ("R" "R") ("T" "T") ("Y" "Y") ("U" "U") ("I" "I") ("O" "O") ("P" "P") ("{" "{") ("}" "}") ("|" "|") ("a" "a") ("s" "s") ("d" "d") ("f" "f") ("g" "g") ("h" "h") ("j" "j") ("k" "k") ("l" "l") (":" ":") ("'" "’") ("A" "A") ("S" "S") ("D" "D") ("F" "F") ("G" "G") ("H" "H") ("J" "J") ("K" "K") ("L" "L") (";" ";") ("\"" "”") ("z" "z") ("x" "x") ("c" "c") ("v" "v") ("b" "b") ("n" "n") ("m" "m") ("," (",、")) ("." (".。")) ("/" "/") ("Z" "Z") ("X" "X") ("C" "C") ("V" "V") ("B" "B") ("N" "N") ("M" "M") ("<" "〈<") ("<<" "《") (">" ">") (">>" "》") ("?" "?")) (to-fullwidth ("\\"))) (state (init (fullwidth) (map) () ;; Local Variables: ;; coding: utf-8 ;; mode: lisp ;; End: