code.delx.au - gnu-emacs/blob - leim/quail/ethiopic.el

   1 ;; quail/ethiopic.el --- Quail package for inputting Ethiopic characters
   2
   3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
   4 ;; Licensed to the Free Software Foundation.
   5
   6 ;; Keywords: multilingual, input method, ethiopic
   7
   8 ;; This file is part of GNU Emacs.
   9
  10 ;; GNU Emacs is free software; you can redistribute it and/or modify
  11 ;; it under the terms of the GNU General Public License as published by
  12 ;; the Free Software Foundation; either version 2, or (at your option)
  13 ;; any later version.
  14
  15 ;; GNU Emacs is distributed in the hope that it will be useful,
  16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ;; GNU General Public License for more details.
  19
  20 ;; You should have received a copy of the GNU General Public License
  21 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  23 ;; Boston, MA 02111-1307, USA.
  24
  25 ;; Author: TAKAHASHI Naoto <ntakahas@etl.go.jp>
  26
  27 ;;; Code:
  28
  29 (require 'quail)
  30 (require 'ethio-util)
  31
  32 ;;
  33 ;; Ethiopic word separator vs. ASCII space
  34 ;;
  35
  36 (defvar ethio-prefer-ascii-space t)
  37 (make-variable-buffer-local 'ethio-prefer-ascii-space)
  38
  39 (defun ethio-toggle-space nil
  40   "Toggle ASCII space and Ethiopic separator for keyboard input."
  41   (interactive)
  42   (setq ethio-prefer-ascii-space
  43         (not ethio-prefer-ascii-space))
  44   (force-mode-line-update))
  45
  46 (defun ethio-insert-space (arg)
  47   "Insert ASCII spaces or Ethiopic word separators depending on context.
  48
  49 If the current word separator (indicated in mode-line) is the ASCII space,
  50 insert an ASCII space.  With ARG, insert that many ASCII spaces.
  51
  52 If the current word separator is the colon-like Ethiopic word
  53 separator and the point is preceded by `an Ethiopic punctuation mark
  54 followed by zero or more ASCII spaces', then insert also an ASCII
  55 space.  With ARG, insert that many ASCII spaces.
  56
  57 Otherwise, insert a colon-like Ethiopic word separator.  With ARG, insert that
  58 many Ethiopic word separators."
  59
  60   (interactive "*p")
  61   (cond
  62    (ethio-prefer-ascii-space
  63     (insert-char 32 arg))
  64    ((save-excursion
  65       (skip-chars-backward " ")
  66       (memq (preceding-char)
  67             '(?\e$(3$h\e(B ?\e$(3$i\e(B ?\e$(3$j\e(B ?\e$(3$k\e(B ?\e$(3$l\e(B ?\e$(3$m\e(B ?\e$(3$n\e(B ?\e$(3$o\e(B ?\e$(3%t\e(B ?\e$(3%u\e(B ?\e$(3%v\e(B ?\e$(3%w\e(B ?\e$(3%x\e(B)))
  68     (insert-char 32 arg))
  69    (t
  70     (insert-char ?\e$(3$h\e(B arg))))
  71
  72 (defun ethio-insert-ethio-space (arg)
  73   "Insert the Ethiopic word delimiter (the colon-like character).
  74 With ARG, insert that many delimiters."
  75   (interactive "*p")
  76   (insert-char ?\e$(3$h\e(B arg))
  77
  78 ;;
  79 ;; Ethiopic punctuation vs. ASCII punctuation
  80 ;;
  81
  82 (defvar ethio-prefer-ascii-punctuation nil)
  83 (make-variable-buffer-local 'ethio-prefer-ascii-punctuation)
  84
  85 (defun ethio-toggle-punctuation nil
  86   "Toggle Ethiopic punctuations and ASCII punctuations for keyboard input."
  87   (interactive)
  88   (setq ethio-prefer-ascii-punctuation
  89         (not ethio-prefer-ascii-punctuation))
  90   (let* ((keys '("." ".." "..." "," ",," ";" ";;" ":" "::" ":::" "*" "**"))
  91          (puncs
  92           (if ethio-prefer-ascii-punctuation
  93               '(?. [".."] ["..."] ?, [",,"] ?\; [";;"] ?: ["::"] [":::"] ?* ["**"])
  94             '(?\e$(3$i\e(B ?\e$(3%u\e(B ?. ?\e$(3$j\e(B ?, ?\e$(3$k\e(B ?\; ?\e$(3$h\e(B ?\e$(3$i\e(B ?: ?* ?\e$(3$o\e(B))))
  95     (while keys
  96       (quail-defrule (car keys) (car puncs) "ethiopic")
  97       (setq keys (cdr keys)
  98             puncs (cdr puncs)))
  99     (force-mode-line-update)))
 100
 101 ;;
 102 ;; Gemination
 103 ;;
 104
 105 (defun ethio-gemination nil
 106   "Compose the character before the point with the Ethiopic gemination mark.
 107 If the characater is already composed, decompose it and remove the gemination
 108 mark."
 109   (interactive "*")
 110   (cond
 111    ((eq (char-charset (preceding-char)) 'ethiopic)
 112     (insert "\e$(3%s\e(B")
 113     (compose-region
 114      (save-excursion (backward-char 2) (point))
 115      (point))
 116     (forward-char 1))
 117    ((eq (char-charset (preceding-char)) 'leading-code-composition)
 118     (decompose-region
 119      (save-excursion (backward-char 1) (point))
 120      (point))
 121     (delete-backward-char 1))
 122    (t
 123     (error ""))))
 124
 125 ;;
 126 ;; The package "ethiopic"
 127 ;;
 128
 129 (quail-define-package
 130  "ethiopic" "Ethiopic"
 131  '("\e$(3$O#U!.\e(B "
 132    (ethio-prefer-ascii-space "_" "\e$(3$h\e(B")
 133    (ethio-prefer-ascii-punctuation "." "\e$(3$i\e(B"))
 134  t "  KEYS AND FUNCTIONS
 135
 136 [F2] or `M-x ethio-toggle-space'
 137   Toggles space characters for keyboard input.  The current mode is
 138   indicated in mode-line, whether by `_' (ASCII space) or `\e$(3$h\e(B'
 139   (Ethiopic colon-like word separator).  Even in the `\e$(3$h\e(B' mode, an
 140   ASCII space is inserted if the point is preceded by `an Ethiopic
 141   punctuation followed by zero or more ASCII spaces'.
 142
 143 [F3] or `M-x ethio-toggle-punctuation'
 144   Toggles ASCII punctuations and Ethiopic punctuations for keyboard input.
 145   The current mode is indicated by `.' (ASCII) or `\e$(3$i\e(B' (Ethiopic).
 146
 147 C-^ or `M-x ethio-insert-ethio-space
 148   Always insert an Ethiopic word separator `\e$(3$h\e(B'.  With a prefix number,
 149   insert that many word separators.
 150
 151 C-' or ethio-gemination
 152   Compose the character before the point with the Ethiopic gemination mark.
 153   If the characater is already composed, decompose it and remove the
 154   gemination mark."
 155
 156  '(([f2] . ethio-toggle-space)
 157    ([f3] . ethio-toggle-punctuation)
 158    (" " . ethio-insert-space)
 159    ([?\C-^] . ethio-insert-ethio-space)
 160    ([?\C-'] . ethio-gemination))
 161  t t)
 162
 163 ;; These keys should work even if translation region is not active.
 164 (define-key quail-mode-map [f2] 'ethio-toggle-space)
 165 (define-key quail-mode-map [f3] 'ethio-toggle-punctuation)
 166 (define-key quail-mode-map " "  'ethio-insert-space)
 167 (define-key quail-mode-map [?\C-^] 'ethio-insert-ethio-space)
 168 (define-key quail-mode-map [?\C-'] 'ethio-gemination)
 169 (define-key quail-mode-map [?\S- ] 'ethio-insert-ethio-space)
 170
 171 (quail-define-rules
 172  ("he" ?\e$(3!!\e(B)
 173  ("hu" ?\e$(3!"\e(B)
 174  ("hi" ?\e$(3!#\e(B)
 175  ("ha" ?\e$(3!$\e(B)
 176  ("hE" ?\e$(3!%\e(B)
 177  ("h" ?\e$(3!&\e(B)
 178  ("ho" ?\e$(3!'\e(B)
 179  ("hW" ?\e$(3"N\e(B)
 180  ("hWa" ?\e$(3"N\e(B)
 181  ("hWe" ?\e$(3"K\e(B)
 182  ("hWu" ?\e$(3"P\e(B)
 183  ("hWi" ?\e$(3"M\e(B)
 184  ("hWE" ?\e$(3"O\e(B)
 185  ("hW'" ?\e$(3"P\e(B)
 186
 187  ("le" ?\e$(3!)\e(B)
 188  ("lu" ?\e$(3!*\e(B)
 189  ("li" ?\e$(3!+\e(B)
 190  ("la" ?\e$(3!,\e(B)
 191  ("lE" ?\e$(3!-\e(B)
 192  ("l" ?\e$(3!.\e(B)
 193  ("lo" ?\e$(3!/\e(B)
 194  ("lW" ?\e$(3!0\e(B)
 195  ("lWa" ?\e$(3!0\e(B)
 196  ("lWe" ["\e$(3!.%n\e(B"])
 197  ("lWu" ["\e$(3!.%r\e(B"])
 198  ("lWi" ["\e$(3!.%o\e(B"])
 199  ("lWE" ["\e$(3!.%q\e(B"])
 200  ("lW'" ["\e$(3!.%r\e(B"])
 201
 202  ("Le" ?\e$(3!)\e(B)
 203  ("Lu" ?\e$(3!*\e(B)
 204  ("Li" ?\e$(3!+\e(B)
 205  ("La" ?\e$(3!,\e(B)
 206  ("LE" ?\e$(3!-\e(B)
 207  ("L" ?\e$(3!.\e(B)
 208  ("Lo" ?\e$(3!/\e(B)
 209  ("LW" ?\e$(3!0\e(B)
 210  ("LWa" ?\e$(3!0\e(B)
 211  ("LWe" ["\e$(3!.%n\e(B"])
 212  ("LWu" ["\e$(3!.%r\e(B"])
 213  ("LWi" ["\e$(3!.%o\e(B"])
 214  ("LWE" ["\e$(3!.%q\e(B"])
 215  ("LW'" ["\e$(3!.%r\e(B"])
 216
 217  ("He" ?\e$(3!1\e(B)
 218  ("Hu" ?\e$(3!2\e(B)
 219  ("Hi" ?\e$(3!3\e(B)
 220  ("Ha" ?\e$(3!4\e(B)
 221  ("HE" ?\e$(3!5\e(B)
 222  ("H" ?\e$(3!6\e(B)
 223  ("Ho" ?\e$(3!7\e(B)
 224  ("HW" ?\e$(3!8\e(B)
 225  ("HWa" ?\e$(3!8\e(B)
 226  ("HWe" ["\e$(3!6%n\e(B"])
 227  ("HWu" ["\e$(3!6%r\e(B"])
 228  ("HWi" ["\e$(3!6%o\e(B"])
 229  ("HWE" ["\e$(3!6%q\e(B"])
 230  ("HW'" ["\e$(3!6%r\e(B"])
 231
 232  ("me" ?\e$(3!9\e(B)
 233  ("mu" ?\e$(3!:\e(B)
 234  ("mi" ?\e$(3!;\e(B)
 235  ("ma" ?\e$(3!<\e(B)
 236  ("mE" ?\e$(3!=\e(B)
 237  ("m" ?\e$(3!>\e(B)
 238  ("mo" ?\e$(3!?\e(B)
 239  ("mWe" ?\e$(3%1\e(B)
 240  ("mWu" ?\e$(3%a\e(B)
 241  ("mWi" ?\e$(3%A\e(B)
 242  ("mW" ?\e$(3!@\e(B)
 243  ("mWa" ?\e$(3!@\e(B)
 244  ("mWE" ?\e$(3%Q\e(B)
 245  ("mW'" ?\e$(3%a\e(B)
 246  ("mY" ?\e$(3$_\e(B)
 247  ("mYa" ?\e$(3$_\e(B)
 248
 249  ("Me" ?\e$(3!9\e(B)
 250  ("Mu" ?\e$(3!:\e(B)
 251  ("Mi" ?\e$(3!;\e(B)
 252  ("Ma" ?\e$(3!<\e(B)
 253  ("ME" ?\e$(3!=\e(B)
 254  ("M" ?\e$(3!>\e(B)
 255  ("Mo" ?\e$(3!?\e(B)
 256  ("MWe" ?\e$(3%1\e(B)
 257  ("MWu" ?\e$(3%a\e(B)
 258  ("MWi" ?\e$(3%A\e(B)
 259  ("MW" ?\e$(3!@\e(B)
 260  ("MWa" ?\e$(3!@\e(B)
 261  ("MWE" ?\e$(3%Q\e(B)
 262  ("MW'" ?\e$(3%a\e(B)
 263  ("MY" ?\e$(3$_\e(B)
 264  ("MYa" ?\e$(3$_\e(B)
 265
 266  ("`se" ?\e$(3!A\e(B)
 267  ("`su" ?\e$(3!B\e(B)
 268  ("`si" ?\e$(3!C\e(B)
 269  ("`sa" ?\e$(3!D\e(B)
 270  ("`sE" ?\e$(3!E\e(B)
 271  ("`s" ?\e$(3!F\e(B)
 272  ("`so" ?\e$(3!G\e(B)
 273  ("`sW" ?\e$(3!H\e(B)
 274  ("`sWa" ?\e$(3!H\e(B)
 275  ("`sWe" ["\e$(3!F%n\e(B"])
 276  ("`sWu" ["\e$(3!F%r\e(B"])
 277  ("`sWi" ["\e$(3!F%o\e(B"])
 278  ("`sWE" ["\e$(3!F%q\e(B"])
 279  ("`sW'" ["\e$(3!F%r\e(B"])
 280
 281  ("s2e" ?\e$(3!A\e(B)
 282  ("s2u" ?\e$(3!B\e(B)
 283  ("s2i" ?\e$(3!C\e(B)
 284  ("s2a" ?\e$(3!D\e(B)
 285  ("s2E" ?\e$(3!E\e(B)
 286  ("s2" ?\e$(3!F\e(B)
 287  ("s2o" ?\e$(3!G\e(B)
 288  ("s2W" ?\e$(3!H\e(B)
 289  ("s2Wa" ?\e$(3!H\e(B)
 290  ("s2We" ["\e$(3!F%n\e(B"])
 291  ("s2Wu" ["\e$(3!F%r\e(B"])
 292  ("s2Wi" ["\e$(3!F%o\e(B"])
 293  ("s2WE" ["\e$(3!F%q\e(B"])
 294  ("s2W'" ["\e$(3!F%r\e(B"])
 295
 296  ("sse" ?\e$(3!A\e(B)
 297  ("ssu" ?\e$(3!B\e(B)
 298  ("ssi" ?\e$(3!C\e(B)
 299  ("ssa" ?\e$(3!D\e(B)
 300  ("ssE" ?\e$(3!E\e(B)
 301  ("ss" ?\e$(3!F\e(B)
 302  ("sso" ?\e$(3!G\e(B)
 303  ("ssW" ?\e$(3!H\e(B)
 304  ("ssWa" ?\e$(3!H\e(B)
 305  ("ssWe" ["\e$(3!F%n\e(B"])
 306  ("ssWu" ["\e$(3!F%r\e(B"])
 307  ("ssWi" ["\e$(3!F%o\e(B"])
 308  ("ssWE" ["\e$(3!F%q\e(B"])
 309  ("ssW'" ["\e$(3!F%r\e(B"])
 310
 311  ("re" ?\e$(3!I\e(B)
 312  ("ru" ?\e$(3!J\e(B)
 313  ("ri" ?\e$(3!K\e(B)
 314  ("ra" ?\e$(3!L\e(B)
 315  ("rE" ?\e$(3!M\e(B)
 316  ("r" ?\e$(3!N\e(B)
 317  ("ro" ?\e$(3!O\e(B)
 318  ("rW" ?\e$(3!P\e(B)
 319  ("rWa" ?\e$(3!P\e(B)
 320  ("rY" ?\e$(3$`\e(B)
 321  ("rYa" ?\e$(3$`\e(B)
 322  ("rWe" ["\e$(3!N%n\e(B"])
 323  ("rWu" ["\e$(3!N%r\e(B"])
 324  ("rWi" ["\e$(3!N%o\e(B"])
 325  ("rWE" ["\e$(3!N%q\e(B"])
 326  ("rW'" ["\e$(3!N%r\e(B"])
 327
 328  ("Re" ?\e$(3!I\e(B)
 329  ("Ru" ?\e$(3!J\e(B)
 330  ("Ri" ?\e$(3!K\e(B)
 331  ("Ra" ?\e$(3!L\e(B)
 332  ("RE" ?\e$(3!M\e(B)
 333  ("R" ?\e$(3!N\e(B)
 334  ("Ro" ?\e$(3!O\e(B)
 335  ("RW" ?\e$(3!P\e(B)
 336  ("RWa" ?\e$(3!P\e(B)
 337  ("RYa" ?\e$(3$`\e(B)
 338  ("RWe" ["\e$(3!N%n\e(B"])
 339  ("RWu" ["\e$(3!N%r\e(B"])
 340  ("RWi" ["\e$(3!N%o\e(B"])
 341  ("RWE" ["\e$(3!N%q\e(B"])
 342  ("RW'" ["\e$(3!N%r\e(B"])
 343
 344  ("se" ?\e$(3!Q\e(B)
 345  ("su" ?\e$(3!R\e(B)
 346  ("si" ?\e$(3!S\e(B)
 347  ("sa" ?\e$(3!T\e(B)
 348  ("sE" ?\e$(3!U\e(B)
 349  ("s" ?\e$(3!V\e(B)
 350  ("so" ?\e$(3!W\e(B)
 351  ("sW" ?\e$(3!X\e(B)
 352  ("sWa" ?\e$(3!X\e(B)
 353  ("sWe" ["\e$(3!V%n\e(B"])
 354  ("sWu" ["\e$(3!V%r\e(B"])
 355  ("sWi" ["\e$(3!V%o\e(B"])
 356  ("sWE" ["\e$(3!V%q\e(B"])
 357  ("sW'" ["\e$(3!V%r\e(B"])
 358
 359  ("xe" ?\e$(3!Y\e(B)
 360  ("xu" ?\e$(3!Z\e(B)
 361  ("xi" ?\e$(3![\e(B)
 362  ("xa" ?\e$(3!\\e(B)
 363  ("xE" ?\e$(3!]\e(B)
 364  ("x" ?\e$(3!^\e(B)
 365  ("xo" ?\e$(3!_\e(B)
 366  ("xW" ?\e$(3!`\e(B)
 367  ("xWa" ?\e$(3!`\e(B)
 368  ("xWe" ["\e$(3!^%n\e(B"])
 369  ("xWu" ["\e$(3!^%r\e(B"])
 370  ("xWi" ["\e$(3!^%o\e(B"])
 371  ("xWE" ["\e$(3!^%q\e(B"])
 372  ("xW'" ["\e$(3!^%r\e(B"])
 373
 374  ("qe" ?\e$(3!a\e(B)
 375  ("qu" ?\e$(3!b\e(B)
 376  ("qi" ?\e$(3!c\e(B)
 377  ("qa" ?\e$(3!d\e(B)
 378  ("qE" ?\e$(3!e\e(B)
 379  ("q" ?\e$(3!f\e(B)
 380  ("qo" ?\e$(3!g\e(B)
 381  ("qWe" ?\e$(3!i\e(B)
 382  ("qWu" ?\e$(3!n\e(B)
 383  ("qWi" ?\e$(3!k\e(B)
 384  ("qW" ?\e$(3!l\e(B)
 385  ("qWa" ?\e$(3!l\e(B)
 386  ("qWE" ?\e$(3!m\e(B)
 387  ("qW'" ?\e$(3!n\e(B)
 388
 389  ("`qe" ?\e$(3%)\e(B)
 390  ("`qu" ?\e$(3%*\e(B)
 391  ("`qi" ?\e$(3%+\e(B)
 392  ("`qa" ?\e$(3%,\e(B)
 393  ("`qE" ?\e$(3%-\e(B)
 394  ("`q" ?\e$(3%.\e(B)
 395  ("`qo" ?\e$(3%/\e(B)
 396
 397  ("q2e" ?\e$(3%)\e(B)
 398  ("q2u" ?\e$(3%*\e(B)
 399  ("q2i" ?\e$(3%+\e(B)
 400  ("q2a" ?\e$(3%,\e(B)
 401  ("q2E" ?\e$(3%-\e(B)
 402  ("q2" ?\e$(3%.\e(B)
 403  ("q2o" ?\e$(3%/\e(B)
 404
 405  ("qqe" ?\e$(3%)\e(B)
 406  ("qqu" ?\e$(3%*\e(B)
 407  ("qqi" ?\e$(3%+\e(B)
 408  ("qqa" ?\e$(3%,\e(B)
 409  ("qqE" ?\e$(3%-\e(B)
 410  ("qq" ?\e$(3%.\e(B)
 411  ("qqo" ?\e$(3%/\e(B)
 412
 413  ("Qe" ?\e$(3!q\e(B)
 414  ("Qu" ?\e$(3!r\e(B)
 415  ("Qi" ?\e$(3!s\e(B)
 416  ("Qa" ?\e$(3!t\e(B)
 417  ("QE" ?\e$(3!u\e(B)
 418  ("Q" ?\e$(3!v\e(B)
 419  ("Qo" ?\e$(3!w\e(B)
 420  ("QWe" ?\e$(3!y\e(B)
 421  ("QWu" ?\e$(3!~\e(B)
 422  ("QWi" ?\e$(3!{\e(B)
 423  ("QW" ?\e$(3!|\e(B)
 424  ("QWa" ?\e$(3!|\e(B)
 425  ("QWE" ?\e$(3!}\e(B)
 426  ("QW'" ?\e$(3!~\e(B)
 427
 428  ("be" ?\e$(3"#\e(B)
 429  ("bu" ?\e$(3"$\e(B)
 430  ("bi" ?\e$(3"%\e(B)
 431  ("ba" ?\e$(3"&\e(B)
 432  ("bE" ?\e$(3"'\e(B)
 433  ("b" ?\e$(3"(\e(B)
 434  ("bo" ?\e$(3")\e(B)
 435  ("bWe" ?\e$(3%2\e(B)
 436  ("bWu" ?\e$(3%b\e(B)
 437  ("bWi" ?\e$(3%B\e(B)
 438  ("bW" ?\e$(3"*\e(B)
 439  ("bWa" ?\e$(3"*\e(B)
 440  ("bWE" ?\e$(3%R\e(B)
 441  ("bW'" ?\e$(3%b\e(B)
 442
 443  ("Be" ?\e$(3"#\e(B)
 444  ("Bu" ?\e$(3"$\e(B)
 445  ("Bi" ?\e$(3"%\e(B)
 446  ("Ba" ?\e$(3"&\e(B)
 447  ("BE" ?\e$(3"'\e(B)
 448  ("B" ?\e$(3"(\e(B)
 449  ("Bo" ?\e$(3")\e(B)
 450  ("BWe" ?\e$(3%2\e(B)
 451  ("BWu" ?\e$(3%b\e(B)
 452  ("BWi" ?\e$(3%B\e(B)
 453  ("BW" ?\e$(3"*\e(B)
 454  ("BWa" ?\e$(3"*\e(B)
 455  ("BWE" ?\e$(3%R\e(B)
 456  ("BW'" ?\e$(3%b\e(B)
 457
 458  ("ve" ?\e$(3"+\e(B)
 459  ("vu" ?\e$(3",\e(B)
 460  ("vi" ?\e$(3"-\e(B)
 461  ("va" ?\e$(3".\e(B)
 462  ("vE" ?\e$(3"/\e(B)
 463  ("v" ?\e$(3"0\e(B)
 464  ("vo" ?\e$(3"1\e(B)
 465  ("vW" ?\e$(3"2\e(B)
 466  ("vWa" ?\e$(3"2\e(B)
 467  ("vWe" ["\e$(3"0%n\e(B"])
 468  ("vWu" ["\e$(3"0%r\e(B"])
 469  ("vWi" ["\e$(3"0%o\e(B"])
 470  ("vWE" ["\e$(3"0%q\e(B"])
 471  ("vW'" ["\e$(3"0%r\e(B"])
 472
 473  ("Ve" ?\e$(3"+\e(B)
 474  ("Vu" ?\e$(3",\e(B)
 475  ("Vi" ?\e$(3"-\e(B)
 476  ("Va" ?\e$(3".\e(B)
 477  ("VE" ?\e$(3"/\e(B)
 478  ("V" ?\e$(3"0\e(B)
 479  ("Vo" ?\e$(3"1\e(B)
 480  ("VW" ?\e$(3"2\e(B)
 481  ("VWa" ?\e$(3"2\e(B)
 482  ("VWe" ["\e$(3"0%n\e(B"])
 483  ("VWu" ["\e$(3"0%r\e(B"])
 484  ("VWi" ["\e$(3"0%o\e(B"])
 485  ("VWE" ["\e$(3"0%q\e(B"])
 486  ("VW'" ["\e$(3"0%r\e(B"])
 487
 488  ("te" ?\e$(3"3\e(B)
 489  ("tu" ?\e$(3"4\e(B)
 490  ("ti" ?\e$(3"5\e(B)
 491  ("ta" ?\e$(3"6\e(B)
 492  ("tE" ?\e$(3"7\e(B)
 493  ("t" ?\e$(3"8\e(B)
 494  ("to" ?\e$(3"9\e(B)
 495  ("tW" ?\e$(3":\e(B)
 496  ("tWa" ?\e$(3":\e(B)
 497  ("tWe" ["\e$(3"8%n\e(B"])
 498  ("tWu" ["\e$(3"8%r\e(B"])
 499  ("tWi" ["\e$(3"8%o\e(B"])
 500  ("tWE" ["\e$(3"8%q\e(B"])
 501  ("tW'" ["\e$(3"8%r\e(B"])
 502
 503  ("ce" ?\e$(3";\e(B)
 504  ("cu" ?\e$(3"<\e(B)
 505  ("ci" ?\e$(3"=\e(B)
 506  ("ca" ?\e$(3">\e(B)
 507  ("cE" ?\e$(3"?\e(B)
 508  ("c" ?\e$(3"@\e(B)
 509  ("co" ?\e$(3"A\e(B)
 510  ("cW" ?\e$(3"B\e(B)
 511  ("cWa" ?\e$(3"B\e(B)
 512  ("cWe" ["\e$(3"@%n\e(B"])
 513  ("cWu" ["\e$(3"@%r\e(B"])
 514  ("cWi" ["\e$(3"@%o\e(B"])
 515  ("cWE" ["\e$(3"@%q\e(B"])
 516  ("cW'" ["\e$(3"@%r\e(B"])
 517
 518  ("`he" ?\e$(3"C\e(B)
 519  ("`hu" ?\e$(3"D\e(B)
 520  ("`hi" ?\e$(3"E\e(B)
 521  ("`ha" ?\e$(3"F\e(B)
 522  ("`hE" ?\e$(3"G\e(B)
 523  ("`h" ?\e$(3"H\e(B)
 524  ("`ho" ?\e$(3"I\e(B)
 525  ("`hWe" ?\e$(3"K\e(B)
 526  ("`hWu" ?\e$(3"P\e(B)
 527  ("`hWi" ?\e$(3"M\e(B)
 528  ("`hW" ?\e$(3"N\e(B)
 529  ("`hWa" ?\e$(3"N\e(B)
 530  ("`hWE" ?\e$(3"O\e(B)
 531  ("`hW'" ?\e$(3"P\e(B)
 532
 533  ("h2e" ?\e$(3"C\e(B)
 534  ("h2u" ?\e$(3"D\e(B)
 535  ("h2i" ?\e$(3"E\e(B)
 536  ("h2a" ?\e$(3"F\e(B)
 537  ("h2E" ?\e$(3"G\e(B)
 538  ("h2" ?\e$(3"H\e(B)
 539  ("h2o" ?\e$(3"I\e(B)
 540  ("h2We" ?\e$(3"K\e(B)
 541  ("h2Wu" ?\e$(3"P\e(B)
 542  ("h2Wi" ?\e$(3"M\e(B)
 543  ("h2W" ?\e$(3"N\e(B)
 544  ("h2Wa" ?\e$(3"N\e(B)
 545  ("h2WE" ?\e$(3"O\e(B)
 546  ("h2W'" ?\e$(3"P\e(B)
 547
 548  ("hhe" ?\e$(3"C\e(B)
 549  ("hhu" ?\e$(3"D\e(B)
 550  ("hhi" ?\e$(3"E\e(B)
 551  ("hha" ?\e$(3"F\e(B)
 552  ("hhE" ?\e$(3"G\e(B)
 553  ("hh" ?\e$(3"H\e(B)
 554  ("hho" ?\e$(3"I\e(B)
 555  ("hhWe" ?\e$(3"K\e(B)
 556  ("hhWu" ?\e$(3"P\e(B)
 557  ("hhWi" ?\e$(3"M\e(B)
 558  ("hhW" ?\e$(3"N\e(B)
 559  ("hhWa" ?\e$(3"N\e(B)
 560  ("hhWE" ?\e$(3"O\e(B)
 561  ("hhW'" ?\e$(3"P\e(B)
 562
 563  ("ne" ?\e$(3"S\e(B)
 564  ("nu" ?\e$(3"T\e(B)
 565  ("ni" ?\e$(3"U\e(B)
 566  ("na" ?\e$(3"V\e(B)
 567  ("nE" ?\e$(3"W\e(B)
 568  ("n" ?\e$(3"X\e(B)
 569  ("no" ?\e$(3"Y\e(B)
 570  ("nW" ?\e$(3"Z\e(B)
 571  ("nWa" ?\e$(3"Z\e(B)
 572  ("nWe" ["\e$(3"X%n\e(B"])
 573  ("nWu" ["\e$(3"X%r\e(B"])
 574  ("nWi" ["\e$(3"X%o\e(B"])
 575  ("nWE" ["\e$(3"X%q\e(B"])
 576  ("nW'" ["\e$(3"X%r\e(B"])
 577
 578  ("Ne" ?\e$(3"[\e(B)
 579  ("Nu" ?\e$(3"\\e(B)
 580  ("Ni" ?\e$(3"]\e(B)
 581  ("Na" ?\e$(3"^\e(B)
 582  ("NE" ?\e$(3"_\e(B)
 583  ("N" ?\e$(3"`\e(B)
 584  ("No" ?\e$(3"a\e(B)
 585  ("NW" ?\e$(3"b\e(B)
 586  ("NWa" ?\e$(3"b\e(B)
 587  ("NWe" ["\e$(3"`%n\e(B"])
 588  ("NWu" ["\e$(3"`%r\e(B"])
 589  ("NWi" ["\e$(3"`%o\e(B"])
 590  ("NWE" ["\e$(3"`%q\e(B"])
 591  ("NW'" ["\e$(3"`%r\e(B"])
 592
 593  ("e" ?\e$(3"c\e(B)
 594  ("u" ?\e$(3"d\e(B)
 595  ("U" ?\e$(3"d\e(B)
 596  ("i" ?\e$(3"e\e(B)
 597  ("a" ?\e$(3"f\e(B)
 598  ("A" ?\e$(3"f\e(B)
 599  ("E" ?\e$(3"g\e(B)
 600  ("I" ?\e$(3"h\e(B)
 601  ("o" ?\e$(3"i\e(B)
 602  ("O" ?\e$(3"i\e(B)
 603  ("ea" ?\e$(3"j\e(B)
 604  ("eee" ?\e$(3"j\e(B)
 605
 606  ("ke" ?\e$(3"k\e(B)
 607  ("ku" ?\e$(3"l\e(B)
 608  ("ki" ?\e$(3"m\e(B)
 609  ("ka" ?\e$(3"n\e(B)
 610  ("kE" ?\e$(3"o\e(B)
 611  ("k" ?\e$(3"p\e(B)
 612  ("ko" ?\e$(3"q\e(B)
 613  ("kWe" ?\e$(3"s\e(B)
 614  ("kWu" ?\e$(3"x\e(B)
 615  ("kWi" ?\e$(3"u\e(B)
 616  ("kW" ?\e$(3"v\e(B)
 617  ("kWa" ?\e$(3"v\e(B)
 618  ("kWE" ?\e$(3"w\e(B)
 619  ("kW'" ?\e$(3"x\e(B)
 620
 621  ("`ke" ?\e$(3%9\e(B)
 622  ("`ku" ?\e$(3%:\e(B)
 623  ("`ki" ?\e$(3%;\e(B)
 624  ("`ka" ?\e$(3%<\e(B)
 625  ("`kE" ?\e$(3%=\e(B)
 626  ("`k" ?\e$(3%>\e(B)
 627  ("`ko" ?\e$(3%?\e(B)
 628
 629  ("k2e" ?\e$(3%9\e(B)
 630  ("k2u" ?\e$(3%:\e(B)
 631  ("k2i" ?\e$(3%;\e(B)
 632  ("k2a" ?\e$(3%<\e(B)
 633  ("k2E" ?\e$(3%=\e(B)
 634  ("k2" ?\e$(3%>\e(B)
 635  ("k2o" ?\e$(3%?\e(B)
 636
 637  ("kke" ?\e$(3%9\e(B)
 638  ("kku" ?\e$(3%:\e(B)
 639  ("kki" ?\e$(3%;\e(B)
 640  ("kka" ?\e$(3%<\e(B)
 641  ("kkE" ?\e$(3%=\e(B)
 642  ("kk" ?\e$(3%>\e(B)
 643  ("kko" ?\e$(3%?\e(B)
 644
 645  ("Ke" ?\e$(3"{\e(B)
 646  ("Ku" ?\e$(3"|\e(B)
 647  ("Ki" ?\e$(3"}\e(B)
 648  ("Ka" ?\e$(3"~\e(B)
 649  ("KE" ?\e$(3#!\e(B)
 650  ("K" ?\e$(3#"\e(B)
 651  ("Ko" ?\e$(3##\e(B)
 652  ("KWe" ?\e$(3#%\e(B)
 653  ("KWu" ?\e$(3#*\e(B)
 654  ("KWi" ?\e$(3#'\e(B)
 655  ("KW" ?\e$(3#(\e(B)
 656  ("KWa" ?\e$(3#(\e(B)
 657  ("KWE" ?\e$(3#)\e(B)
 658  ("KW'" ?\e$(3#*\e(B)
 659
 660  ("Xe" ?\e$(3%I\e(B)
 661  ("Xu" ?\e$(3%J\e(B)
 662  ("Xi" ?\e$(3%K\e(B)
 663  ("Xa" ?\e$(3%L\e(B)
 664  ("XE" ?\e$(3%M\e(B)
 665  ("X" ?\e$(3%N\e(B)
 666  ("Xo" ?\e$(3%O\e(B)
 667
 668  ("we" ?\e$(3#-\e(B)
 669  ("wu" ?\e$(3#.\e(B)
 670  ("wi" ?\e$(3#/\e(B)
 671  ("wa" ?\e$(3#0\e(B)
 672  ("wE" ?\e$(3#1\e(B)
 673  ("w" ?\e$(3#2\e(B)
 674  ("wo" ?\e$(3#3\e(B)
 675
 676  ("`e" ?\e$(3#5\e(B)
 677  ("`u" ?\e$(3#6\e(B)
 678  ("`U" ?\e$(3#6\e(B)
 679  ("`i" ?\e$(3#7\e(B)
 680  ("`a" ?\e$(3#8\e(B)
 681  ("`A" ?\e$(3#8\e(B)
 682  ("`E" ?\e$(3#9\e(B)
 683  ("`I" ?\e$(3#:\e(B)
 684  ("`o" ?\e$(3#;\e(B)
 685  ("`O" ?\e$(3#;\e(B)
 686
 687  ("e2" ?\e$(3#5\e(B)
 688  ("u2" ?\e$(3#6\e(B)
 689  ("U2" ?\e$(3#6\e(B)
 690  ("i2" ?\e$(3#7\e(B)
 691  ("a2" ?\e$(3#8\e(B)
 692  ("A2" ?\e$(3#8\e(B)
 693  ("E2" ?\e$(3#9\e(B)
 694  ("I2" ?\e$(3#:\e(B)
 695  ("o2" ?\e$(3#;\e(B)
 696  ("O2" ?\e$(3#;\e(B)
 697
 698  ("ee" ?\e$(3#5\e(B)
 699  ("uu" ?\e$(3#6\e(B)
 700  ("UU" ?\e$(3#6\e(B)
 701  ("ii" ?\e$(3#7\e(B)
 702  ("aa" ?\e$(3#8\e(B)
 703  ("AA" ?\e$(3#8\e(B)
 704  ("EE" ?\e$(3#9\e(B)
 705  ("II" ?\e$(3#:\e(B)
 706  ("oo" ?\e$(3#;\e(B)
 707  ("OO" ?\e$(3#;\e(B)
 708
 709  ("ze" ?\e$(3#=\e(B)
 710  ("zu" ?\e$(3#>\e(B)
 711  ("zi" ?\e$(3#?\e(B)
 712  ("za" ?\e$(3#@\e(B)
 713  ("zE" ?\e$(3#A\e(B)
 714  ("z" ?\e$(3#B\e(B)
 715  ("zo" ?\e$(3#C\e(B)
 716  ("zW" ?\e$(3#D\e(B)
 717  ("zWa" ?\e$(3#D\e(B)
 718  ("zWe" ["\e$(3#B%n\e(B"])
 719  ("zWu" ["\e$(3#B%r\e(B"])
 720  ("zWi" ["\e$(3#B%o\e(B"])
 721  ("zWE" ["\e$(3#B%q\e(B"])
 722  ("zW'" ["\e$(3#B%r\e(B"])
 723
 724  ("Ze" ?\e$(3#E\e(B)
 725  ("Zu" ?\e$(3#F\e(B)
 726  ("Zi" ?\e$(3#G\e(B)
 727  ("Za" ?\e$(3#H\e(B)
 728  ("ZE" ?\e$(3#I\e(B)
 729  ("Z" ?\e$(3#J\e(B)
 730  ("Zo" ?\e$(3#K\e(B)
 731  ("ZW" ?\e$(3#L\e(B)
 732  ("ZWa" ?\e$(3#L\e(B)
 733  ("ZWe" ["\e$(3#J%n\e(B"])
 734  ("ZWu" ["\e$(3#J%r\e(B"])
 735  ("ZWi" ["\e$(3#J%o\e(B"])
 736  ("ZWE" ["\e$(3#J%q\e(B"])
 737  ("ZW'" ["\e$(3#J%r\e(B"])
 738
 739  ("ye" ?\e$(3#M\e(B)
 740  ("yu" ?\e$(3#N\e(B)
 741  ("yi" ?\e$(3#O\e(B)
 742  ("ya" ?\e$(3#P\e(B)
 743  ("yE" ?\e$(3#Q\e(B)
 744  ("y" ?\e$(3#R\e(B)
 745  ("yo" ?\e$(3#S\e(B)
 746  ("yW" ?\e$(3#T\e(B)
 747  ("yWa" ?\e$(3#T\e(B)
 748  ("yWe" ["\e$(3#R%n\e(B"])
 749  ("yWu" ["\e$(3#R%r\e(B"])
 750  ("yWi" ["\e$(3#R%o\e(B"])
 751  ("yWE" ["\e$(3#R%q\e(B"])
 752  ("yW'" ["\e$(3#R%r\e(B"])
 753
 754  ("Ye" ?\e$(3#M\e(B)
 755  ("Yu" ?\e$(3#N\e(B)
 756  ("Yi" ?\e$(3#O\e(B)
 757  ("Ya" ?\e$(3#P\e(B)
 758  ("YE" ?\e$(3#Q\e(B)
 759  ("Y" ?\e$(3#R\e(B)
 760  ("Yo" ?\e$(3#S\e(B)
 761  ("YW" ?\e$(3#T\e(B)
 762  ("YWa" ?\e$(3#T\e(B)
 763  ("YWe" ["\e$(3#R%n\e(B"])
 764  ("YWu" ["\e$(3#R%r\e(B"])
 765  ("YWi" ["\e$(3#R%o\e(B"])
 766  ("YWE" ["\e$(3#R%q\e(B"])
 767  ("YW'" ["\e$(3#R%r\e(B"])
 768
 769  ("de" ?\e$(3#U\e(B)
 770  ("du" ?\e$(3#V\e(B)
 771  ("di" ?\e$(3#W\e(B)
 772  ("da" ?\e$(3#X\e(B)
 773  ("dE" ?\e$(3#Y\e(B)
 774  ("d" ?\e$(3#Z\e(B)
 775  ("do" ?\e$(3#[\e(B)
 776  ("dW" ?\e$(3#\\e(B)
 777  ("dWa" ?\e$(3#\\e(B)
 778  ("dWe" ["\e$(3#Z%n\e(B"])
 779  ("dWu" ["\e$(3#Z%r\e(B"])
 780  ("dWi" ["\e$(3#Z%o\e(B"])
 781  ("dWE" ["\e$(3#Z%q\e(B"])
 782  ("dW'" ["\e$(3#Z%r\e(B"])
 783
 784  ("De" ?\e$(3#]\e(B)
 785  ("Du" ?\e$(3#^\e(B)
 786  ("Di" ?\e$(3#_\e(B)
 787  ("Da" ?\e$(3#`\e(B)
 788  ("DE" ?\e$(3#a\e(B)
 789  ("D" ?\e$(3#b\e(B)
 790  ("Do" ?\e$(3#c\e(B)
 791  ("DW" ?\e$(3#d\e(B)
 792  ("DWa" ?\e$(3#d\e(B)
 793  ("DWe" ["\e$(3#b%n\e(B"])
 794  ("DWu" ["\e$(3#b%r\e(B"])
 795  ("DWi" ["\e$(3#b%o\e(B"])
 796  ("DWE" ["\e$(3#b%q\e(B"])
 797  ("DW'" ["\e$(3#b%r\e(B"])
 798
 799  ("je" ?\e$(3#e\e(B)
 800  ("ju" ?\e$(3#f\e(B)
 801  ("ji" ?\e$(3#g\e(B)
 802  ("ja" ?\e$(3#h\e(B)
 803  ("jE" ?\e$(3#i\e(B)
 804  ("j" ?\e$(3#j\e(B)
 805  ("jo" ?\e$(3#k\e(B)
 806  ("jW" ?\e$(3#l\e(B)
 807  ("jWa" ?\e$(3#l\e(B)
 808  ("jWe" ["\e$(3#j%n\e(B"])
 809  ("jWu" ["\e$(3#j%r\e(B"])
 810  ("jWi" ["\e$(3#j%o\e(B"])
 811  ("jWE" ["\e$(3#j%q\e(B"])
 812  ("jW'" ["\e$(3#j%r\e(B"])
 813
 814  ("Je" ?\e$(3#e\e(B)
 815  ("Ju" ?\e$(3#f\e(B)
 816  ("Ji" ?\e$(3#g\e(B)
 817  ("Ja" ?\e$(3#h\e(B)
 818  ("JE" ?\e$(3#i\e(B)
 819  ("J" ?\e$(3#j\e(B)
 820  ("Jo" ?\e$(3#k\e(B)
 821  ("JW" ?\e$(3#l\e(B)
 822  ("JWa" ?\e$(3#l\e(B)
 823  ("JWe" ["\e$(3#j%n\e(B"])
 824  ("JWu" ["\e$(3#j%r\e(B"])
 825  ("JWi" ["\e$(3#j%o\e(B"])
 826  ("JWE" ["\e$(3#j%q\e(B"])
 827  ("JW'" ["\e$(3#j%r\e(B"])
 828
 829  ("ge" ?\e$(3#m\e(B)
 830  ("gu" ?\e$(3#n\e(B)
 831  ("gi" ?\e$(3#o\e(B)
 832  ("ga" ?\e$(3#p\e(B)
 833  ("gE" ?\e$(3#q\e(B)
 834  ("g" ?\e$(3#r\e(B)
 835  ("go" ?\e$(3#s\e(B)
 836  ("gWe" ?\e$(3#u\e(B)
 837  ("gWu" ?\e$(3#z\e(B)
 838  ("gWi" ?\e$(3#w\e(B)
 839  ("gW" ?\e$(3#x\e(B)
 840  ("gWa" ?\e$(3#x\e(B)
 841  ("gWE" ?\e$(3#y\e(B)
 842  ("gW'" ?\e$(3#z\e(B)
 843
 844  ("`ge" ?\e$(3%Y\e(B)
 845  ("`gu" ?\e$(3%Z\e(B)
 846  ("`gi" ?\e$(3%[\e(B)
 847  ("`ga" ?\e$(3%\\e(B)
 848  ("`gE" ?\e$(3%]\e(B)
 849  ("`g" ?\e$(3%^\e(B)
 850  ("`go" ?\e$(3%_\e(B)
 851
 852  ("g2e" ?\e$(3%Y\e(B)
 853  ("g2u" ?\e$(3%Z\e(B)
 854  ("g2i" ?\e$(3%[\e(B)
 855  ("g2a" ?\e$(3%\\e(B)
 856  ("g2E" ?\e$(3%]\e(B)
 857  ("g2" ?\e$(3%^\e(B)
 858  ("g2o" ?\e$(3%_\e(B)
 859
 860  ("gge" ?\e$(3%Y\e(B)
 861  ("ggu" ?\e$(3%Z\e(B)
 862  ("ggi" ?\e$(3%[\e(B)
 863  ("gga" ?\e$(3%\\e(B)
 864  ("ggE" ?\e$(3%]\e(B)
 865  ("gg" ?\e$(3%^\e(B)
 866  ("ggo" ?\e$(3%_\e(B)
 867
 868  ("Ge" ?\e$(3#}\e(B)
 869  ("Gu" ?\e$(3#~\e(B)
 870  ("Gi" ?\e$(3$!\e(B)
 871  ("Ga" ?\e$(3$"\e(B)
 872  ("GE" ?\e$(3$#\e(B)
 873  ("G" ?\e$(3$$\e(B)
 874  ("Go" ?\e$(3$%\e(B)
 875  ("GWe" ?\e$(3%3\e(B)
 876  ("GWu" ?\e$(3%c\e(B)
 877  ("GWi" ?\e$(3%C\e(B)
 878  ("GW" ?\e$(3$&\e(B)
 879  ("GWa" ?\e$(3$&\e(B)
 880  ("GWE" ?\e$(3%S\e(B)
 881  ("GW'" ?\e$(3%c\e(B)
 882
 883  ("te" ?\e$(3$'\e(B)
 884  ("tu" ?\e$(3$(\e(B)
 885  ("ti" ?\e$(3$)\e(B)
 886  ("ta" ?\e$(3$*\e(B)
 887  ("tE" ?\e$(3$+\e(B)
 888  ("t" ?\e$(3$,\e(B)
 889  ("to" ?\e$(3$-\e(B)
 890  ("tW" ?\e$(3$.\e(B)
 891  ("tWa" ?\e$(3$.\e(B)
 892  ("tWe" ["\e$(3$,%n\e(B"])
 893  ("tWu" ["\e$(3$,%r\e(B"])
 894  ("tWi" ["\e$(3$,%o\e(B"])
 895  ("tWE" ["\e$(3$,%q\e(B"])
 896  ("tW'" ["\e$(3$,%r\e(B"])
 897
 898  ("Ce" ?\e$(3$/\e(B)
 899  ("Cu" ?\e$(3$0\e(B)
 900  ("Ci" ?\e$(3$1\e(B)
 901  ("Ca" ?\e$(3$2\e(B)
 902  ("CE" ?\e$(3$3\e(B)
 903  ("C" ?\e$(3$4\e(B)
 904  ("Co" ?\e$(3$5\e(B)
 905  ("CW" ?\e$(3$6\e(B)
 906  ("CWa" ?\e$(3$6\e(B)
 907  ("CWe" ["\e$(3$4%n\e(B"])
 908  ("CWu" ["\e$(3$4%r\e(B"])
 909  ("CWi" ["\e$(3$4%o\e(B"])
 910  ("CWE" ["\e$(3$4%q\e(B"])
 911  ("CW'" ["\e$(3$4%r\e(B"])
 912
 913  ("Pe" ?\e$(3$7\e(B)
 914  ("Pu" ?\e$(3$8\e(B)
 915  ("Pi" ?\e$(3$9\e(B)
 916  ("Pa" ?\e$(3$:\e(B)
 917  ("PE" ?\e$(3$;\e(B)
 918  ("P" ?\e$(3$<\e(B)
 919  ("Po" ?\e$(3$=\e(B)
 920  ("PW" ?\e$(3$>\e(B)
 921  ("PWa" ?\e$(3$>\e(B)
 922  ("PWe" ["\e$(3$<%n\e(B"])
 923  ("PWu" ["\e$(3$<%r\e(B"])
 924  ("PWi" ["\e$(3$<%o\e(B"])
 925  ("PWE" ["\e$(3$<%q\e(B"])
 926  ("PW'" ["\e$(3$<%r\e(B"])
 927
 928  ("Se" ?\e$(3$?\e(B)
 929  ("Su" ?\e$(3$@\e(B)
 930  ("Si" ?\e$(3$A\e(B)
 931  ("Sa" ?\e$(3$B\e(B)
 932  ("SE" ?\e$(3$C\e(B)
 933  ("S" ?\e$(3$D\e(B)
 934  ("So" ?\e$(3$E\e(B)
 935  ("SW" ?\e$(3$F\e(B)
 936  ("SWa" ?\e$(3$F\e(B)
 937  ("SWe" ["\e$(3$D%n\e(B"])
 938  ("SWu" ["\e$(3$D%r\e(B"])
 939  ("SWi" ["\e$(3$D%o\e(B"])
 940  ("SWE" ["\e$(3$D%q\e(B"])
 941  ("SW'" ["\e$(3$D%r\e(B"])
 942
 943  ("`Se" ?\e$(3$G\e(B)
 944  ("`Su" ?\e$(3$H\e(B)
 945  ("`Si" ?\e$(3$I\e(B)
 946  ("`Sa" ?\e$(3$J\e(B)
 947  ("`SE" ?\e$(3$K\e(B)
 948  ("`S" ?\e$(3$L\e(B)
 949  ("`So" ?\e$(3$M\e(B)
 950  ("`SW" ?\e$(3$F\e(B)
 951  ("`SWa" ?\e$(3$F\e(B)
 952  ("`SWe" ["\e$(3$L%n\e(B"])
 953  ("`SWu" ["\e$(3$L%r\e(B"])
 954  ("`SWi" ["\e$(3$L%o\e(B"])
 955  ("`SWE" ["\e$(3$L%q\e(B"])
 956  ("`SW'" ["\e$(3$L%r\e(B"])
 957
 958  ("S2e" ?\e$(3$G\e(B)
 959  ("S2u" ?\e$(3$H\e(B)
 960  ("S2i" ?\e$(3$I\e(B)
 961  ("S2a" ?\e$(3$J\e(B)
 962  ("S2E" ?\e$(3$K\e(B)
 963  ("S2" ?\e$(3$L\e(B)
 964  ("S2o" ?\e$(3$M\e(B)
 965  ("S2W" ?\e$(3$F\e(B)
 966  ("S2Wa" ?\e$(3$F\e(B)
 967  ("S2We" ["\e$(3$L%n\e(B"])
 968  ("S2Wu" ["\e$(3$L%r\e(B"])
 969  ("S2Wi" ["\e$(3$L%o\e(B"])
 970  ("S2WE" ["\e$(3$L%q\e(B"])
 971  ("S2W'" ["\e$(3$L%r\e(B"])
 972
 973  ("SSe" ?\e$(3$G\e(B)
 974  ("SSu" ?\e$(3$H\e(B)
 975  ("SSi" ?\e$(3$I\e(B)
 976  ("SSa" ?\e$(3$J\e(B)
 977  ("SSE" ?\e$(3$K\e(B)
 978  ("SS" ?\e$(3$L\e(B)
 979  ("SSo" ?\e$(3$M\e(B)
 980  ("SSW" ?\e$(3$F\e(B)
 981  ("SSWa" ?\e$(3$F\e(B)
 982  ("SSWe" ["\e$(3$L%n\e(B"])
 983  ("SSWu" ["\e$(3$L%r\e(B"])
 984  ("SSWi" ["\e$(3$L%o\e(B"])
 985  ("SSWE" ["\e$(3$L%q\e(B"])
 986  ("SW'" ["\e$(3$L%r\e(B"])
 987
 988  ("fe" ?\e$(3$O\e(B)
 989  ("fu" ?\e$(3$P\e(B)
 990  ("fi" ?\e$(3$Q\e(B)
 991  ("fa" ?\e$(3$R\e(B)
 992  ("fE" ?\e$(3$S\e(B)
 993  ("f" ?\e$(3$T\e(B)
 994  ("fo" ?\e$(3$U\e(B)
 995  ("fWe" ?\e$(3%4\e(B)
 996  ("fWu" ?\e$(3%d\e(B)
 997  ("fWi" ?\e$(3%D\e(B)
 998  ("fW" ?\e$(3$V\e(B)
 999  ("fWa" ?\e$(3$V\e(B)
1000  ("fWE" ?\e$(3%T\e(B)
1001  ("fW'" ?\e$(3%d\e(B)
1002  ("fY" ?\e$(3$a\e(B)
1003  ("fYa" ?\e$(3$a\e(B)
1004
1005  ("Fe" ?\e$(3$O\e(B)
1006  ("Fu" ?\e$(3$P\e(B)
1007  ("Fi" ?\e$(3$Q\e(B)
1008  ("Fa" ?\e$(3$R\e(B)
1009  ("FE" ?\e$(3$S\e(B)
1010  ("F" ?\e$(3$T\e(B)
1011  ("Fo" ?\e$(3$U\e(B)
1012  ("FWe" ?\e$(3%4\e(B)
1013  ("FWu" ?\e$(3%d\e(B)
1014  ("FWi" ?\e$(3%D\e(B)
1015  ("FW" ?\e$(3$V\e(B)
1016  ("FWa" ?\e$(3$V\e(B)
1017  ("FWE" ?\e$(3%T\e(B)
1018  ("FW'" ?\e$(3%d\e(B)
1019  ("FY" ?\e$(3$a\e(B)
1020  ("FYa" ?\e$(3$a\e(B)
1021
1022  ("pe" ?\e$(3$W\e(B)
1023  ("pu" ?\e$(3$X\e(B)
1024  ("pi" ?\e$(3$Y\e(B)
1025  ("pa" ?\e$(3$Z\e(B)
1026  ("pE" ?\e$(3$[\e(B)
1027  ("p" ?\e$(3$\\e(B)
1028  ("po" ?\e$(3$]\e(B)
1029  ("pWe" ?\e$(3%5\e(B)
1030  ("pWu" ?\e$(3%e\e(B)
1031  ("pWi" ?\e$(3%E\e(B)
1032  ("pW" ?\e$(3$^\e(B)
1033  ("pWa" ?\e$(3$^\e(B)
1034  ("pWE" ?\e$(3%U\e(B)
1035  ("pW'" ?\e$(3%e\e(B)
1036
1037  ("'" [""])
1038  ("''" ?')
1039  (":" ?\e$(3$h\e(B)
1040  ("::" ?\e$(3$i\e(B)
1041  (":::" ?:)
1042  ("." ?\e$(3$i\e(B)
1043  (".." ?\e$(3%u\e(B)
1044  ("..." ?.)
1045  ("," ?\e$(3$j\e(B)
1046  (",," ?,)
1047  (";" ?\e$(3$k\e(B)
1048  (";;" ?\;)
1049  ("-:" ?\e$(3$l\e(B)
1050  (":-" ?\e$(3$m\e(B)
1051  ("*" ?*)
1052  ("**" ?\e$(3$o\e(B)
1053  (":|:" ?\e$(3$o\e(B)
1054  ("?" ?\e$(3%x\e(B)
1055  ("??" ?\e$(3$n\e(B)
1056  ("`?" ?\e$(3$n\e(B)
1057  ("???" ??)
1058  ("<<" ?\e$(3%v\e(B)
1059  (">>" ?\e$(3%w\e(B)
1060  ("`!" ?\e$(3%t\e(B)
1061  ("wWe" ?\e$(3%n\e(B)
1062  ("wWu" ?\e$(3%r\e(B)
1063  ("wWi" ?\e$(3%o\e(B)
1064  ("wW" ?\e$(3%p\e(B)
1065  ("wWa" ?\e$(3%p\e(B)
1066  ("wWE" ?\e$(3%q\e(B)
1067  ("wW'" ?\e$(3%r\e(B)
1068  ("We" ?\e$(3%n\e(B)
1069  ("Wu" ?\e$(3%r\e(B)
1070  ("Wi" ?\e$(3%o\e(B)
1071  ("W" ?\e$(3%p\e(B)
1072  ("Wa" ?\e$(3%p\e(B)
1073  ("WE" ?\e$(3%q\e(B)
1074  ("W'" ?\e$(3%r\e(B)
1075  ("`1" ?\e$(3$p\e(B)
1076  ("`2" ?\e$(3$q\e(B)
1077  ("`3" ?\e$(3$r\e(B)
1078  ("`4" ?\e$(3$s\e(B)
1079  ("`5" ?\e$(3$t\e(B)
1080  ("`6" ?\e$(3$u\e(B)
1081  ("`7" ?\e$(3$v\e(B)
1082  ("`8" ?\e$(3$w\e(B)
1083  ("`9" ?\e$(3$x\e(B)
1084  ("`10" ?\e$(3$y\e(B)
1085  ("`20" ?\e$(3$z\e(B)
1086  ("`30" ?\e$(3${\e(B)
1087  ("`40" ?\e$(3$|\e(B)
1088  ("`50" ?\e$(3$}\e(B)
1089  ("`60" ?\e$(3$~\e(B)
1090  ("`70" ?\e$(3%!\e(B)
1091  ("`80" ?\e$(3%"\e(B)
1092  ("`90" ?\e$(3%#\e(B)
1093  ("`100" ?\e$(3%$\e(B)
1094  ("`1000" ["\e$(3$y%$\e(B"])
1095  ("`2000" ["\e$(3$z%$\e(B"])
1096  ("`3000" ["\e$(3${%$\e(B"])
1097  ("`4000" ["\e$(3$|%$\e(B"])
1098  ("`5000" ["\e$(3$}%$\e(B"])
1099  ("`6000" ["\e$(3$~%$\e(B"])
1100  ("`7000" ["\e$(3%!%$\e(B"])
1101  ("`8000" ["\e$(3%"%$\e(B"])
1102  ("`9000" ["\e$(3%#%$\e(B"])
1103  ("`10000" ?\e$(3%%\e(B)
1104  ("`20000" ["\e$(3$q%%\e(B"])
1105  ("`30000" ["\e$(3$r%%\e(B"])
1106  ("`40000" ["\e$(3$s%%\e(B"])
1107  ("`50000" ["\e$(3$t%%\e(B"])
1108  ("`60000" ["\e$(3$u%%\e(B"])
1109  ("`70000" ["\e$(3$v%%\e(B"])
1110  ("`80000" ["\e$(3$w%%\e(B"])
1111  ("`90000" ["\e$(3$x%%\e(B"])
1112  ("`100000" ["\e$(3$y%%\e(B"])
1113  ("`200000" ["\e$(3$z%%\e(B"])
1114  ("`300000" ["\e$(3${%%\e(B"])
1115  ("`400000" ["\e$(3$|%%\e(B"])
1116  ("`500000" ["\e$(3$}%%\e(B"])
1117  ("`600000" ["\e$(3$~%%\e(B"])
1118  ("`700000" ["\e$(3%!%%\e(B"])
1119  ("`800000" ["\e$(3%"%%\e(B"])
1120  ("`900000" ["\e$(3%#%%\e(B"])
1121  ("`1000000" ["\e$(3%$%%\e(B"])
1122 )
1123
1124 ;; The translation of `a' depends on the language (Tigrigna or Amharic).
1125 (add-hook 'quail-mode-hook
1126           (lambda nil
1127             (quail-defrule "a"
1128                            (if (ethio-prefer-amharic-p) ?\e$(3"c\e(B ?\e$(3"f\e(B)
1129                            "ethiopic")))
1130
1131 ;;; quail/ethiopic.el ends here