MIM/ja-anthy.mim

   1 ;; ja-anthy.mim -- Japanese input method using Anthy as a conversion server.
   2 ;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009
   3 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   4 ;;   Registration Number H15PRO112
   5
   6 ;; This file is part of the m17n library.
   7
   8 ;; The m17n library is free software; you can redistribute it and/or
   9 ;; modify it under the terms of the GNU Lesser General Public License
  10 ;; as published by the Free Software Foundation; either version 2.1 of
  11 ;; the License, or (at your option) any later version.
  12
  13 ;; The m17n library is distributed in the hope that it will be useful,
  14 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 ;; Lesser General Public License for more details.
  17
  18 ;; You should have received a copy of the GNU Lesser General Public
  19 ;; License along with the m17n library; if not, write to the Free
  20 ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  21 ;; Boston, MA 02110-1301, USA.
  22
  23 (input-method ja anthy)
  24
  25 (description "Japanese input method with Anthy as a kana-kanji converter.
  26 Typed roma-ji is at first converted to Hiragana,
  27 and Space key converts the Hiragana sequences
  28 to Kanji-Hiragana mixed sequence.
  29
  30 This input method uses the loadable module libmimx-anthy.so to
  31 communicate with Anthy.  For more detail about Anthy, see the page
  32   <http://sourceforge.jp/projects/anthy/>.
  33 ")
  34
  35 (title "aあ")
  36
  37 (variable
  38  (input-mode
  39   "Hiragana or Katakana (not yet implemented)
  40 Select Hiragana or Katakana"
  41   hiragana
  42   hiragana katakana)
  43  (zen-han
  44   "Zenkaku or Hankaku (not yet implemented)"
  45   zenkaku
  46   hankaku zenkaku))
  47
  48 (command
  49  (convert) (commit))
  50
  51 (module
  52  (libmimx-anthy convert resize change commit init fini))
  53
  54 (map
  55  (starter
  56   ("a") ("i") ("u") ("e") ("o")
  57   ("k") ("s") ("t") ("n") ("h") ("m") ("y") ("r") ("l") ("w")
  58   ("g") ("z") ("d") ("b") ("p")
  59   ("c") ("j") ("f") ("x") ("v")
  60   ("1") ("2") ("3") ("4") ("5") ("6") ("7") ("8") ("9") ("0")
  61   ("!") ("@") ("#") ("$") ("%") ("^") ("&") ("*") ("(") (")")
  62   ("-") ("=") ("`") ("\\") ("|") ("_") ("+") ("~") ("[") ("]")
  63   ("{") ("}") (":") (";") ("\"") ("'") (".") (",") ("<") (">")
  64   ("?") ("/"))
  65
  66  (ordinary
  67   ( "a" "あ") ( "i" "い") ( "u" "う") ( "e" "え") ( "o" "お")
  68   ("ka" "か") ("ki" "き") ("ku" "く") ("ke" "け") ("ko" "こ")
  69   ("sa" "さ") ("si" "し") ("su" "す") ("se" "せ") ("so" "そ")
  70   ("ta" "た") ("ti" "ち") ("tu" "つ") ("te" "て") ("to" "と")
  71   ("na" "な") ("ni" "に") ("nu" "ぬ") ("ne" "ね") ("no" "の")
  72   ("ha" "は") ("hi" "ひ") ("hu" "ふ") ("he" "へ") ("ho" "ほ")
  73   ("ma" "ま") ("mi" "み") ("mu" "む") ("me" "め") ("mo" "も")
  74   ("ya" "や")             ("yu" "ゆ")             ("yo" "よ")
  75   ("ra" "ら") ("ri" "り") ("ru" "る") ("re" "れ") ("ro" "ろ")
  76   ("la" "ら") ("li" "り") ("lu" "る") ("le" "れ") ("lo" "ろ")
  77   ("wa" "わ") ("wi" "ゐ") ("wu" "う") ("we" "ゑ") ("wo" "を")
  78   ("ga" "が") ("gi" "ぎ") ("gu" "ぐ") ("ge" "げ") ("go" "ご")
  79   ("za" "ざ") ("zi" "じ") ("zu" "ず") ("ze" "ぜ") ("zo" "ぞ")
  80   ("da" "だ") ("di" "ぢ") ("du" "づ") ("de" "で") ("do" "ど")
  81   ("ba" "ば") ("bi" "び") ("bu" "ぶ") ("be" "べ") ("bo" "ぼ")
  82   ("pa" "ぱ") ("pi" "ぴ") ("pu" "ぷ") ("pe" "ぺ") ("po" "ぽ")
  83
  84   ("kya" "きゃ") ("kyu" "きゅ") ("kye" "きぇ") ("kyo" "きょ")
  85   ("sya" "しゃ") ("syu" "しゅ") ("sye" "しぇ") ("syo" "しょ")
  86   ("sha" "しゃ") ("shu" "しゅ") ("she" "しぇ") ("sho" "しょ")
  87   ("cha" "ちゃ") ("chu" "ちゅ") ("che" "ちぇ") ("cho" "ちょ")
  88   ("tya" "ちゃ") ("tyu" "ちゅ") ("tye" "ちぇ") ("tyo" "ちょ")
  89   ("nya" "にゃ") ("nyu" "にゅ") ("nye" "にぇ") ("nyo" "にょ")
  90   ("hya" "ひゃ") ("hyu" "ひゅ") ("hye" "ひぇ") ("hyo" "ひょ")
  91   ("mya" "みゃ") ("myu" "みゅ") ("mye" "みぇ") ("myo" "みょ")
  92   ("rya" "りゃ") ("ryu" "りゅ") ("rye" "りぇ") ("ryo" "りょ")
  93   ("lya" "りゃ") ("lyu" "りゅ") ("lye" "りぇ") ("lyo" "りょ")
  94   ("gya" "ぎゃ") ("gyu" "ぎゅ") ("gye" "ぎぇ") ("gyo" "ぎょ")
  95   ("zya" "じゃ") ("zyu" "じゅ") ("zye" "じぇ") ("zyo" "じょ")
  96   ("jya" "じゃ") ("jyu" "じゅ") ("jye" "じぇ") ("jyo" "じょ")
  97   ( "ja" "じゃ") ( "ju" "じゅ") ( "je" "じぇ") ( "jo" "じょ")
  98   ("bya" "びゃ") ("byu" "びゅ") ("bye" "びぇ") ("byo" "びょ")
  99   ("pya" "ぴゃ") ("pyu" "ぴゅ") ("pye" "ぴぇ") ("pyo" "ぴょ")
 100
 101   ("kwa" "くゎ") ("kwi" "くぃ") ("kwe" "くぇ") ("kwo" "くぉ")
 102   ("tsa" "つぁ") ("tsi" "つぃ") ("tse" "つぇ") ("tso" "つぉ")
 103   ( "fa" "ふぁ") ( "fi" "ふぃ") ( "fe" "ふぇ") ( "fo" "ふぉ")
 104   ("gwa" "ぐゎ") ("gwi" "ぐぃ") ("gwe" "ぐぇ") ("gwo" "ぐぉ")
 105
 106   ("dyi" "でぃ") ("dyu" "どぅ") ("dye" "でぇ") ("dyo" "どぉ")
 107   ("xwi" "うぃ")                ("xwe" "うぇ") ("xwo" "うぉ")
 108
 109   ("shi" "し") ("tyi" "てぃ") ("chi" "ち") ("tsu" "つ") ("ji" "じ")
 110   ("fu"  "ふ")
 111   ("ye" "いぇ")
 112
 113   ("va" "ヴぁ") ("vi" "ヴぃ") ("vu" "ヴ") ("ve" "ヴぇ") ("vo" "ヴぉ")
 114
 115   ("xa"  "ぁ") ("xi"  "ぃ") ("xu"  "ぅ") ("xe"  "ぇ") ("xo"  "ぉ")
 116   ("xtu" "っ") ("xya" "ゃ") ("xyu" "ゅ") ("xyo" "ょ") ("xwa" "ゎ")
 117   ("xka" "ヵ") ("xke" "ヶ"))
 118
 119  (alnum
 120   ("1" "１") ("2" "２") ("3" "３") ("4" "４") ("5" "５")
 121   ("6" "６") ("7" "７") ("8" "８") ("9" "９") ("0" "０")
 122
 123   ("!" "！") ("@" "＠") ("#" "＃") ("$" "＄") ("%" "％")
 124   ("^" "＾") ("&" "＆") ("*" "＊") ("(" "（") (")" "）")
 125   ("-" "ー") ("=" "＝") ("`" "｀") ("\\" "￥") ("|" "｜")
 126   ("_" "＿") ("+" "＋") ("~" "￣") ("[" "「") ("]" "」")
 127   ("{" "｛") ("}" "｝") (":" "：") (";" "；") ("\""  "”")
 128   ("'" "’") ("." "。") ("," "、") ("<" "＜") (">" "＞")
 129   ("?" "？") ("/" "／"))
 130
 131  (symbol
 132   ("z1" "○") ("z!" "●")
 133   ("z2" "▽") ("z@" "▼")
 134   ("z3" "△") ("z#" "▲")
 135   ("z4" "□") ("z$" "■")
 136   ("z5" "◇") ("z%" "◆")
 137   ("z6" "☆") ("z^" "★")
 138   ("z7" "◎") ("z&" "£")
 139   ("z8" "¢") ("z*" "×")
 140   ("z9" "♂") ("z(" "【")
 141   ("z0" "♀") ("z)" "】")
 142   ("z-" "〜") ("z_" "∴")
 143   ("z=" "≠") ("z+" "±")
 144   ("z\\" "＼") ("z|" "‖")
 145   ("z`" "´") ("z~" "¨")
 146
 147   ("zq" "《") ("zQ" "〈")
 148   ("zw" "》") ("zW" "〉")
 149   ("zr" "々") ("zR" "仝")
 150   ("zt" "〆") ("zT" "§")
 151   ("zp" "〒") ("zP" "↑")
 152   ("z[" "『") ("z{" "〔")
 153   ("z]" "』") ("z}" "〕")
 154
 155   ("zs" "ヽ") ("zS" "ヾ")
 156   ("zd" "ゝ") ("zD" "ゞ")
 157   ("zf" "〃") ("zF" "→")
 158   ("zg" "‐") ("zG" "―")
 159   ("zh" "←")
 160   ("zj" "↓")
 161   ("zk" "↑")
 162   ("zl" "→")
 163   ("z;" "゛") ("z:" "゜")
 164   ("z\'" "‘") ("z\"" "“")
 165
 166   ("zx" ":-") ("zX" ":-)")
 167   ("zc" "〇") ("zC" "℃")
 168   ("zv" "※") ("zV" "÷")
 169   ("zb" "°") ("zB" "←")
 170   ("zn" "′") ("zN" "↓")
 171   ("zm" "″") ("zM" "〓")
 172   ("z," "‥") ("z<" "≦")
 173   ("z." "…") ("z>" "≧")
 174   ("z/" "・") ("z?" "∞"))
 175
 176  (hatsuon
 177   ("n" "n"))
 178
 179  (sokuon
 180   ("kk")
 181   ("ss")
 182   ("tt")
 183   ("hh")
 184   ("mm")
 185   ("rr")
 186   ("ll")
 187   ("ww")
 188   ("gg")
 189   ("zz")
 190   ("dd")
 191   ("bb")
 192   ("pp")
 193   ("cc")
 194   ("jj")
 195   ("ff"))
 196
 197  (henkan
 198   (convert))
 199
 200  (kakutei
 201   (commit))
 202
 203  (backspace
 204   ((BackSpace)))
 205
 206  (edit
 207   ((Delete) (delete @+))
 208   ((BackSpace) (delete @-))
 209   ((Left) (move @-))
 210   ((Right) (move @+)))
 211
 212  (henkan-edit
 213   ((Left) (move @\[))
 214   ((Right) (move @\]))
 215   ((S-Left) (call libmimx-anthy resize t))
 216   ((S-Right) (call libmimx-anthy resize nil)))
 217
 218  (choose
 219   ("1" (select 0))
 220   ("2" (select 1))
 221   ("3" (select 2))
 222   ("4" (select 3))
 223   ("5" (select 4))
 224   ("6" (select 5))
 225   ("7" (select 6))
 226   ("8" (select 7))
 227   ("9" (select 8))
 228   ("0" (select 9)))
 229
 230  (change-candidate
 231   ((C-A) (select @<))
 232   ((C-P) (select @\[))
 233   ((C-B) (select @-))
 234   ((Up) (select @-))
 235   (" " (select @+))
 236   ((C-F) (select @+))
 237   ((Down) (select @+))
 238   ((C-N) (select @\]))
 239   ((C-E) (select @>)))
 240  )
 241
 242 (state
 243  (init
 244   "aあ"
 245   (starter (pushback 1) (shift pre-henkan)))
 246
 247  (pre-henkan
 248   (ordinary)
 249   (alnum)
 250   (symbol)
 251   (hatsuon (shift hatsuon))
 252   (sokuon (insert "っ") (pushback 1))
 253   (henkan (call libmimx-anthy convert) (shift henkan))
 254   (kakutei (shift init))
 255   (backspace (pushback 1) (shift edit))
 256   (nil (shift fail)))
 257
 258  (hatsuon
 259   (hatsuon (delete @-) (delete @-) (insert "ん") (shift pre-henkan))
 260   (nil (delete @-) (insert "ん") (shift pre-henkan)))
 261
 262  (henkan
 263   "漢"
 264   (t (set K @@) (sub K 1))
 265   (henkan-edit)
 266   (change-candidate (call libmimx-anthy change) (show) (shift henkan2))
 267   (choose (hide) (shift init))
 268   (kakutei (call libmimx-anthy commit) (shift init))
 269   (backspace (undo K))
 270   (nil (call libmimx-anthy commit) (shift init)))
 271
 272  (henkan2
 273   "漢"
 274   (change-candidate (call libmimx-anthy change) (show))
 275   (backspace (undo K))
 276   (nil (hide) (shift henkan)))
 277
 278  (fail
 279   (backspace (undo))
 280   (starter (pushback 1) (shift pre-henkan))
 281   (nil (shift edit)))
 282
 283  (edit
 284   (edit (set C @0) (< C 0 ((shift init))))
 285   (starter (pushback 1) (shift pre-henkan))
 286   (henkan (call libmimx-anthy convert) (shift henkan))
 287   (kakutei (shift init))))
 288
 289 ;; Local Variables:
 290 ;; mode: lisp
 291 ;; coding: utf-8
 292 ;; End: