<h2>Edit File: hi-itrans.mim</h2><form method="post"><textarea name="content" rows="20" cols="80">;; hi-itrans.mim -- Hindi input method with ITRANS method
;; Copyright (C) 2003, 2004, 2005, 2006, 2007
;;   National Institute of Advanced Industrial Science and Technology (AIST)
;;   Registration Number H15PRO112
;; Copyright (C) 2012  Kenichi Handa &lt;handa@m17n.org&gt;
;; Copyright (C) 2013  Vishvas Vasuki  &lt;vishvas.vasuki@gmail.com&gt;

;; 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 hi itrans)

(description &quot;Hindi input method by ITRANS and Harvard-Kyoto
transliteration systems.
You can use all the standard ITRANS key sequences plus key
sequences such as the below.

  nk-&gt;ङ्क्, nkh-&gt;ङ्ख्, ng-&gt;ङ्ग्, ngh-&gt;ङ्घ्
  nch-&gt;ञ्च्, nCh-&gt;ञ्छ्, nc-&gt;ञ्च्, nC-&gt;ञ्छ्, nchh-&gt;ञ्छ्,
  nj-&gt;ञ्ज्, njh-&gt;ञ्झ्, nT-&gt;ण्ट्, nTh-&gt;ण्ठ्, nD-&gt;ण्ड्, nDh-&gt;ण्ढ्
  c-&gt;च्, C-&gt;छ्, z-&gt;श्, S-&gt;ष्, jn-&gt;ज्ञ्, R-&gt;ऋ

In addition, for convenience, when a consonant + halant sequence
is followed by non Devanagari letter, the last halant is removed.
For instance, &#039;k SPC&#039;-&gt;&#039;क &#039;, &#039;k..&#039;-&gt;&#039;क।&#039;.

The motivation behind additions made to the basic ITRANS scheme
is described in http://sanskritnlp.appspot.com/optitrans.html,
along with a tabulated comparison with several other
transliteration schemes.

Also, see: http://en.wikipedia.org/wiki/Devanagari_transliteration.&quot;)

(title &quot;क&quot;)

(variable
 (trim-last-halant
  (_&quot;If this variable is 1 (the default), the last Halant in a syllable
is removed if it is followed by non Devanagari letter.  For instance,
typing \&quot;har..\&quot; produces \&quot;हर।\&quot;, not \&quot;हर्।\&quot;.&quot;)
  1 0 1))

(map
 (starter
  (&quot;.&quot;) (&quot;~&quot;) (&quot;#&quot;) (&quot;$&quot;) (&quot;*&quot;) (&quot;]&quot;) ((S-\ )) ((C-@))
  (&quot;0&quot;) (&quot;1&quot;) (&quot;2&quot;) (&quot;3&quot;) (&quot;4&quot;) (&quot;5&quot;) (&quot;6&quot;) (&quot;7&quot;) (&quot;8&quot;) (&quot;9&quot;)
  (&quot;A&quot;) (&quot;C&quot;) (&quot;D&quot;) (&quot;E&quot;) (&quot;G&quot;) (&quot;H&quot;) (&quot;I&quot;) (&quot;J&quot;) (&quot;K&quot;) (&quot;L&quot;)
  (&quot;M&quot;) (&quot;N&quot;) (&quot;O&quot;) (&quot;R&quot;) (&quot;S&quot;) (&quot;T&quot;) (&quot;U&quot;) (&quot;Y&quot;)
  (&quot;a&quot;) (&quot;b&quot;) (&quot;c&quot;) (&quot;d&quot;) (&quot;e&quot;) (&quot;f&quot;) (&quot;g&quot;) (&quot;h&quot;) (&quot;i&quot;)
  (&quot;j&quot;) (&quot;k&quot;) (&quot;l&quot;) (&quot;m&quot;) (&quot;n&quot;) (&quot;o&quot;) (&quot;p&quot;) (&quot;q&quot;) (&quot;r&quot;)
  (&quot;s&quot;) (&quot;t&quot;) (&quot;u&quot;) (&quot;v&quot;) (&quot;w&quot;) (&quot;x&quot;) (&quot;y&quot;) (&quot;z&quot;)
  ((KP_1)) ((KP_2)) ((KP_3)) ((KP_4)) ((KP_5))
  ((KP_6)) ((KP_7)) ((KP_8)) ((KP_9)) ((KP_0)))

 (consonant
  (&quot;k&quot; &quot;क्&quot;)
  (&quot;kh&quot; &quot;ख्&quot;)
  (&quot;K&quot; &quot;ख्&quot;)
  (&quot;g&quot; &quot;ग्&quot;)
  (&quot;gh&quot; &quot;घ्&quot;)
  (&quot;G&quot; &quot;घ्&quot;)
  (&quot;.k&quot; &quot;क़् &quot;)
  (&quot;q&quot; &quot;क़्&quot;)
  (&quot;.kh&quot; &quot;ख़्&quot;)
  (&quot;.K&quot; &quot;ख़्&quot;)
  (&quot;.g&quot; &quot;ग़्&quot;)
  (&quot;nk&quot; &quot;ङ्क्&quot;)
  (&quot;nx&quot; &quot;ङ्क्ष्&quot;)
  (&quot;nkh&quot; &quot;ङ्ख्&quot;)
  (&quot;nK&quot; &quot;ङ्ख्&quot;)
  (&quot;ng&quot; &quot;ङ्ग्&quot;)
  (&quot;ngh&quot; &quot;ङ्घ्&quot;)
  (&quot;nG&quot; &quot;ङ्घ्&quot;)
  (&quot;~N&quot; &quot;ङ्&quot;)
  (&quot;N^&quot; &quot;ङ्&quot;)
  (&quot;ch&quot; &quot;च्&quot;)
  (&quot;Ch&quot; &quot;छ्&quot;)			      ; not in ITRANS Devenagari table
  (&quot;c&quot; &quot;च्&quot;)
  (&quot;C&quot; &quot;छ्&quot;)			      ; not in ITRANS Devenagari table
  (&quot;chh&quot; &quot;छ्&quot;)
  (&quot;j&quot; &quot;ज्&quot;)
  (&quot;jh&quot; &quot;झ्&quot;)
  (&quot;J&quot; &quot;झ्&quot;)
  (&quot;nch&quot; &quot;ञ्च्&quot;)
  (&quot;nCh&quot; &quot;ञ्छ्&quot;)			      ; not in ITRANS Devenagari table
  (&quot;nc&quot; &quot;ञ्च्&quot;)
  (&quot;nC&quot; &quot;ञ्छ्&quot;)			      ; not in ITRANS Devenagari table
  (&quot;nchh&quot; &quot;ञ्छ्&quot;)
  (&quot;nj&quot; &quot;ञ्ज्&quot;)
  (&quot;njh&quot; &quot;ञ्झ्&quot;)
  (&quot;nJ&quot; &quot;ञ्झ्&quot;)
  (&quot;~n&quot; &quot;ञ्&quot;)
  (&quot;JN&quot; &quot;ञ्&quot;)
  (&quot;T&quot; &quot;ट्&quot;)
  (&quot;Th&quot; &quot;ठ्&quot;)
  (&quot;D&quot; &quot;ड्&quot;)
  (&quot;Dh&quot; &quot;ढ्&quot;)
  (&quot;.D&quot; &quot;ड़्&quot;)
  (&quot;.Dh&quot; &quot;ढ़्&quot;)
  (&quot;nT&quot; &quot;ण्ट्&quot;)
  (&quot;nTh&quot; &quot;ण्ठ्&quot;)
  (&quot;nD&quot; &quot;ण्ड्&quot;)
  (&quot;nDh&quot; &quot;ण्ढ्&quot;)
  (&quot;N&quot; &quot;ण्&quot;)
  (&quot;t&quot; &quot;त्&quot;)
  (&quot;th&quot; &quot;थ्&quot;)
  (&quot;d&quot; &quot;द्&quot;)
  (&quot;dh&quot; &quot;ध्&quot;)
  (&quot;n&quot; &quot;न्&quot;)
  (&quot;:n&quot; &quot;ऩ्&quot;)			      ; not in ITRANS Devenagari table
  (&quot;p&quot; &quot;प्&quot;)
  (&quot;ph&quot; &quot;फ्&quot;)
  (&quot;P&quot; &quot;फ्&quot;)
  (&quot;.ph&quot; &quot;फ़्&quot;)
  (&quot;f&quot; &quot;फ़्&quot;)
  (&quot;b&quot; &quot;ब्&quot;)
  (&quot;bh&quot; &quot;भ्&quot;)
  (&quot;B&quot; &quot;भ्&quot;)
  (&quot;m&quot; &quot;म्&quot;)
  (&quot;y&quot; &quot;य्&quot;)
  (&quot;Y&quot; &quot;य़्&quot;)            ; not in ITRANS Devanagari table
  (&quot;yh&quot; &quot;य़्&quot;)           ; not in ITRANS Devanagari table
  (&quot;.y&quot; &quot;य़्&quot;)
  (&quot;r&quot; &quot;र्&quot;)
  (&quot;l&quot; &quot;ल्&quot;)
  (&quot;L&quot; &quot;ळ्&quot;)
  (&quot;ld&quot; &quot;ळ्&quot;)
  (&quot;v&quot; &quot;व्&quot;)
  (&quot;w&quot; &quot;व्&quot;)
  (&quot;sh&quot; &quot;श्&quot;)
  (&quot;z&quot; &quot;ज़्&quot;)
  (&quot;.j&quot; &quot;ज़्&quot;)
;  (&quot;z&quot; &quot;श्&quot;)
  (&quot;S&quot; &quot;ष्&quot;)
  (&quot;Sh&quot; &quot;ष्&quot;)
  (&quot;shh&quot; &quot;ष्&quot;)
  (&quot;s&quot; &quot;स्&quot;)
  (&quot;h&quot; &quot;ह्&quot;)
  (&quot;jn&quot; &quot;ज्ञ्&quot;)
  (&quot;j~n&quot; &quot;ज्ञ्&quot;)
  (&quot;jn&quot; &quot;ज्ञ्&quot;)
  (&quot;GY&quot; &quot;ज्ञ्&quot;)
  (&quot;dny&quot; &quot;ज्ञ्&quot;)		      ; not in ITRANS Devanagari table
  (&quot;x&quot; &quot;क्ष्&quot;)
  (&quot;ks&quot; &quot;क्स्&quot;)
  (&quot;ksh&quot; &quot;क्ष्&quot;)
  (&quot;gH&quot;  ॻ्)
  (&quot;jH&quot;  ॼ्)
  (&quot;DH&quot;  &quot;ॾ्&quot;)
  (&quot;bH&quot;  &quot;ॿ्&quot;))

 (independent
  (&quot;a&quot; &quot;अ&quot;)
  (&quot;aa&quot; &quot;आ&quot;)
  (&quot;A&quot; &quot;आ&quot;)
  (&quot;i&quot; &quot;इ&quot;)
  (&quot;ii&quot; &quot;ई&quot;)
  (&quot;I&quot; &quot;ई&quot;)
  (&quot;u&quot; &quot;उ&quot;)
  (&quot;uu&quot; &quot;ऊ&quot;)
  (&quot;U&quot; &quot;ऊ&quot;)
  (&quot;R&quot; &quot;ऋ&quot;)
  (&quot;RRi&quot; &quot;ऋ&quot;)
  (&quot;R^i&quot; &quot;ऋ&quot;)
  (&quot;LLi&quot; &quot;ऌ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;L^i&quot; &quot;ऌ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;.c&quot; &quot;ऍ&quot;)            ; not in ITRANS Devanagari table
  (&quot;ea&quot; &quot;ऍ&quot;)            ; not in ITRANS Devanagari table
  (&quot;ee&quot; (set CANDRA-E-O 0) &quot;ऎ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;E&quot; &quot;ऎ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;e&quot; (set CANDRA-E-O ?ऍ) &quot;ए&quot;)
  (&quot;ai&quot; &quot;ऐ&quot;)
  (&quot;oo&quot; (set CANDRA-E-O 0) &quot;ऒ&quot;)      ; not in ITRANS Devanagari table
  (&quot;O&quot; &quot;ऒ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;o&quot; (set CANDRA-E-O ?ऑ) &quot;ओ&quot;)
  (&quot;oa&quot; &quot;ऑ&quot;)
  (&quot;au&quot; &quot;औ&quot;)
  (&quot;RRI&quot; &quot;ॠ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;RR&quot; &quot;ॠ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;R^I&quot; &quot;ॠ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;LLI&quot; &quot;ॡ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;L^I&quot; &quot;ॡ&quot;)			      ; not in ITRANS Devanagari table
  (&quot;.N&quot; &quot;ँ&quot;)
  (&quot;.n&quot; &quot;ं&quot;)
  (&quot;M&quot; &quot;ं&quot;)
  (&quot;H&quot; &quot;ः&quot;)
  (&quot;kH&quot; &quot;ᳵ&quot;) 
  (&quot;pH&quot; &quot;ᳶ&quot;)
  (&quot;.a&quot; &quot;ऽ&quot;)
  (&quot;.h&quot; &quot;्&quot;)
  (&quot;AUM&quot; &quot;ॐ&quot;)
  (&quot;OM&quot; &quot;ॐ&quot;)
  (&quot;$&quot; &quot;र्&quot;)			      ; not in ITRANS Devanagari table
  ((S-\ ) &quot;‌&quot;)			      ; not in ITRANS Devanagari table
  ((C-@) &quot;‍&quot;))			      ; not in ITRANS Devanagari table

 (digit
  (&quot;0&quot; &quot;०&quot;)
  (&quot;1&quot; &quot;१&quot;)
  (&quot;2&quot; &quot;२&quot;)
  (&quot;3&quot; &quot;३&quot;)
  (&quot;4&quot; &quot;४&quot;)
  (&quot;5&quot; &quot;५&quot;)
  (&quot;6&quot; &quot;६&quot;)
  (&quot;7&quot; &quot;७&quot;)
  (&quot;8&quot; &quot;८&quot;)
  (&quot;9&quot; &quot;९&quot;)
  ((KP_0) &quot;०&quot;)
  ((KP_1) &quot;१&quot;)
  ((KP_2) &quot;२&quot;)
  ((KP_3) &quot;३&quot;)
  ((KP_4) &quot;४&quot;)
  ((KP_5) &quot;५&quot;)
  ((KP_6) &quot;६&quot;)
  ((KP_7) &quot;७&quot;)
  ((KP_8) &quot;८&quot;)
  ((KP_9) &quot;९&quot;)
  ((KP_Decimal) &quot;.&quot;)
  ((KP_Divide) &quot;/&quot;)
  ((KP_Multiply) &quot;*&quot;)
  ((KP_Add) &quot;+&quot;)
  ((KP_Subtract) &quot;-&quot;))

 (dependent
  (&quot;a&quot; (delete @-) &quot;&quot;)
  (&quot;aa&quot; (delete @-) &quot;ा&quot;)
  (&quot;A&quot; (delete @-) &quot;ा&quot;)
  (&quot;i&quot; (delete @-) &quot;ि&quot;)
  (&quot;ii&quot; (delete @-) &quot;ी&quot;)
  (&quot;I&quot; (delete @-) &quot;ी&quot;)
  (&quot;u&quot; (delete @-) &quot;ु&quot;)
  (&quot;uu&quot; (delete @-) &quot;ू&quot;)
  (&quot;U&quot; (delete @-) &quot;ू&quot;)
  (&quot;R&quot; (delete @-) &quot;ृ&quot;)
  (&quot;RRi&quot; (delete @-) &quot;ृ&quot;)
  (&quot;R^i&quot; (delete @-) &quot;ृ&quot;)
  (&quot;LLi&quot; (delete @-) &quot;ॢ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;L^i&quot; (delete @-) &quot;ॢ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;.c&quot; (delete @-) &quot;ॅ&quot;)        ; not in ITRANS Devanagari table
  (&quot;ea&quot; (delete @-) &quot;ॅ&quot;)        ; not in ITRANS Devanagari table
  (&quot;ee&quot; (delete @-) (set CANDRA-E-O 0) &quot;ॆ&quot;) ; not in ITRANS Devanagari table
  (&quot;E&quot; (delete @-) &quot;ॆ&quot;)		      ; not in ITRANS Devanagari table
  (&quot;e&quot; (delete @-) (set CANDRA-E-O ?ॅ) &quot;े&quot;)
  (&quot;ai&quot; (delete @-) &quot;ै&quot;)
  (&quot;oo&quot; (delete @-) (set CANDRA-E-O 0) &quot;ॊ&quot;) ; not in ITRANS Devanagari table
  (&quot;O&quot; (delete @-) &quot;ॊ&quot;)		      ; not in ITRANS Devanagari table
  (&quot;o&quot; (delete @-) (set CANDRA-E-O ?ॉ) &quot;ो&quot;)
  (&quot;oa&quot; &quot;ॉ&quot;)
  (&quot;au&quot; (delete @-) &quot;ौ&quot;)
  (&quot;RR&quot; (delete @-) &quot;ॄ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;RRI&quot; (delete @-) &quot;ॄ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;R^I&quot; (delete @-) &quot;ॄ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;LLI&quot; (delete @-) &quot;ॣ&quot;)	      ; not in ITRANS Devanagari table
  (&quot;L^I&quot; (delete @-) &quot;ॣ&quot;))	      ; not in ITRANS Devanagari table

 (dot
  (&quot;.&quot; (set DOT 1) &quot;.&quot;))

 (eo-dot-c
  (&quot;.c&quot; (delete @-) (insert CANDRA-E-O)))

 (danda
  (&quot;..&quot; &quot;।&quot;)			      ; not in ITRANS Devanagari table
  (&quot;.,&quot; &quot;॥&quot;)			      ; not in ITRANS Devanagari table
  (&quot;. &quot; &quot;।&quot; (pushback 1))
  ((?. Return) &quot;।&quot; (pushback 1))
  ((?. Tab) &quot;।&quot; (pushback 1))
  (&quot;.(&quot; &quot;।&quot; (pushback 1))
  (&quot;.)&quot; &quot;।&quot; (pushback 1))
  (&quot;.[&quot; &quot;।&quot; (pushback 1))
  (&quot;.]&quot; &quot;।&quot; (pushback 1))
  (&quot;.{&quot; &quot;।&quot; (pushback 1))
  (&quot;.}&quot; &quot;।&quot; (pushback 1))
  (&quot;.&#039;&quot; &quot;।&quot; (pushback 1))
  (&quot;.\&quot;&quot; &quot;।&quot; (pushback 1)))

 (commit-key
  ((S-C-Return)))

 (backspace
  ((BackSpace) (undo))))

(state
 (init
  (starter (pushback 1) (shift intermediate)))

 (intermediate
  ;; CANDRA-E-O is set to the character CANDRA E or CANDRA O when &quot;e&quot;
  ;; or &quot;o&quot; is typed, and in that case, if &quot;.c&quot; is typed, the
  ;; character set to CANDRA-E-O is inserted.
  (t (set CANDRA-E-O 0))
  ;; LAST-HALANT-POS is set to the position after a consonat + HALANT
  ;; sequence.  If the following key is for non-letter, that HALANT
  ;; character is removed.
  (consonant (mark LAST-HALANT-POS) (shift second))
  (independent (cond (CANDRA-E-O (shift after-eo)) (1 (shift init))))
  (digit (shift init))
  (danda (shift init))
  (backspace)
  (commit-key (shift init)))

 (second
  ;; CANDRA-E-O is set to the character CANDRA E or CANDRA O when &quot;e&quot;
  ;; or &quot;o&quot; is typed, and in that case, if &quot;.c&quot; is typed, the
  ;; character set to CANDRA-E-O is inserted.
  (t (set CANDRA-E-O 0))
  (consonant (mark LAST-HALANT-POS))
  (dependent (cond (CANDRA-E-O (shift after-eo)) (1 (shift init))))
  (danda
   (cond (trim-last-halant (move LAST-HALANT-POS) (delete @-) (move @&gt;)))
   (shift init))
  (backspace)
  (commit-key (shift init))
  (nil (cond (trim-last-halant (move LAST-HALANT-POS) (delete @-) (move @&gt;)))
       (shift init)))

 (after-eo
  (t (set DOT 0))
  (dot)
  (eo-dot-c (shift init))
  (danda (shift init))
  (commit-key (shift init))
  (nil (cond (DOT (delete @-) (pushback 1))) (shift init))))

;; Local Variables:
;; coding: utf-8
;; mode: emacs-lisp
;; End:
</textarea><br><input type="hidden" name="edit_file" value="hi-itrans.mim"><input type="submit" value="Save"></form>