Updated by the author.

diff --git a/im/hi-remington.mim b/im/hi-remington.mim
index 708ea04..60b485d 100644 (file)
--- a/im/hi-remington.mim
+++ b/im/hi-remington.mim
@@ -1,5 +1,5 @@
 ;; hi-remington.mim -- Hindi input method for Remington typewriter layout
 ;; hi-remington.mim -- Hindi input method for Remington typewriter layout

-;; Copyright (c) 2006-2007 Red Hat, Inc. All Rights Reserved.
+;; Copyright (c) 2006-2010 Red Hat, Inc. All Rights Reserved.

 
 ;; This file is part of the m17n contrib; a sub-part of the m17n
 ;; library.
 
 ;; This file is part of the m17n contrib; a sub-part of the m17n
 ;; library.

@@ -28,8 +28,49 @@ Author: Rajesh Ranjan <rranjan@redhat.com>
 (title "क")
 
 (map
 (title "क")
 
 (map

- (trans
- 
+ (starter
+  (".") ("~") ("!") ("@") ("#") ("$") ("%") ("^") ("&") 
+  ("*") ("(") (")") ("{") ("}") ("[") ("]") ("<") (">")
+  (",") ("?") ("/") ("\\") ("\"") (":") (";") ("+") ("=")
+  ("_") ("-") ("0") ("1") ("2") ("3") ("4") ("5") ("6")
+  ("7") ("8") ("9") ("`") ("|") ("'")
+  ("A") ("B")("C") ("D") ("E") ("F") ("G") ("H") ("I") 
+  ("J") ("K") ("L") ("M") ("N") ("O") ("P") ("Q") ("R")
+  ("S") ("T") ("U") ("V") ("W") ("X") ("Y") ("Z")
+  ("a") ("b") ("c") ("d") ("e") ("f") ("g") ("h") ("i")
+  ("j") ("k") ("l") ("m") ("n") ("o") ("p") ("q") ("r")
+  ("s") ("t") ("u") ("v") ("w") ("x") ("y") ("z")
+  ((KP_1)) ((KP_2)) ((KP_3)) ((KP_4)) ((KP_5))
+  ((KP_6)) ((KP_7)) ((KP_8)) ((KP_9)) ((KP_0)))
+
+ (consonant
+  ("{" "क्ष्")
+  ("[" "ख्")
+  (")" "द्घ")
+  ("}" "द्व")
+ ("E" "म्")
+ ("R" "त्")
+ ("T" "ज्")
+ ("Y" "ल्")
+ ("U" "न्")
+ ("I" "प्")
+ ("O" "व्")
+("P" "च्") 
+ ("D" "क्")
+ ("F" "थ्")
+ ("H" "भ्")
+ ("L" "स्")
+  ("\"" "ष्")
+  ("'" "श्")
+ ("z" "्र")
+ ("Z" "र्") 
+ ("X" "ग्")
+ ("C" "ब्")
+  ("." "ण्")
+  ("?" "घ्")
+  ("/" "ध्"))
+
+  (independent

   ((KP_1) "१")
   ((KP_2) "२")
   ((KP_3) "३")
   ((KP_1) "१")
   ((KP_2) "२")
   ((KP_3) "३")

@@ -45,9 +86,14 @@ Author: Rajesh Ranjan <rranjan@redhat.com>
   ((KP_Multiply) "*")
   ((KP_Add) "+")
   ((KP_Subtract) "-") 
   ((KP_Multiply) "*")
   ((KP_Add) "+")
   ((KP_Subtract) "-") 

- 
-  ("~" "ृ")
- ("`" "`") 
+  ("vk" "आ")
+  ("Wa" "ँ")
+  ("ks" "ो")
+  ("kS" "ौ")
+  ("vAs" "ओ")
+  ("vAS" "औ")
+  ("`" "ृ")
+ ("~" "`") 

  ("!" "!")
   ("1" "१")
  ("@" "/")
  ("!" "!")
   ("1" "१")
  ("@" "/")

@@ -66,65 +112,43 @@ Author: Rajesh Ranjan <rranjan@redhat.com>
   ("8" "८")
  ("(" ";")
   ("9" "९")
   ("8" "८")
  ("(" ";")
   ("9" "९")

-  (")" "द्घ")

   ("0" "०")
   ("_" "ऋ")
  ("-" ".")
   ("+" "़")
   ("=" "त्र")
   ("0" "०")
   ("_" "ऋ")
  ("-" ".")
   ("+" "़")
   ("=" "त्र")

- ("Q" "फ")
- ("q" "ु")
+("q" "ु")

  ("W" "ॅ")
  ("w" "ू")
  ("W" "ॅ")
  ("w" "ू")

- ("E" "म्")
- ("e" "म")
- ("R" "त्")
+ ("Q" "फ")

  ("r" "त")
  ("r" "त")

- ("T" "ज्")
+ ("e" "म")

  ("t" "ज")
  ("t" "ज")

- ("Y" "ल्")

  ("y" "ल")
  ("y" "ल")

- ("U" "न्")

  ("u" "न")
  ("u" "न")

- ("I" "प्")

  ("i" "प")
  ("i" "प")

- ("O" "व्")

  ("o" "व")
  ("o" "व")

- ("P" "च्")

  ("p" "च")
  ("p" "च")

-  ("{" "क्ष्")
-  ("[" "ख्")
-  ("}" "द्व")

  ("]" ",")
   ("|" "द्य")
  ("]" ",")
   ("|" "द्य")

- ("\" "?")
+ ("\\" "?")

  ("A" "।")
  ("A" "।")

- ("a" ".")
+ ("a" "ं")

  ("S" "ै")
  ("s" "े")
  ("S" "ै")
  ("s" "े")

- ("D" "क्")

  ("d" "क")
  ("d" "क")

- ("F" "थ्")

  ("f" "ि")
  ("G" "ळ")
  ("g" "ह")
  ("f" "ि")
  ("G" "ळ")
  ("g" "ह")

- ("H" "भ्")

  ("h" "ी")
  ("J" "श्र")
  ("j" "र")
  ("K" "ज्ञ")
  ("k" "ा")
  ("h" "ी")
  ("J" "श्र")
  ("j" "र")
  ("K" "ज्ञ")
  ("k" "ा")

- ("L" "स्")

  ("l" "स")
   (":" "रू")
   (";" "य")
  ("l" "स")
   (":" "रू")
   (";" "य")

-  ("\"" "ष्")
-  ("'" "श्")
- ("Z" "र्") 
- ("z" "z")
- ("X" "ग्")

  ("x" "ग")
  ("x" "ग")

- ("C" "ब्")

  ("c" "ब")
  ("V" "ट")
  ("v" "अ")
  ("c" "ब")
  ("V" "ट")
  ("v" "अ")

@@ -136,15 +160,34 @@ Author: Rajesh Ranjan <rranjan@redhat.com>
  ("m" "उ")
   ("<" "ढ")
   ("," "ए")
  ("m" "उ")
   ("<" "ढ")
   ("," "ए")

-  (">" "झ")
-  ("." "ण्")
-  ("?" "घ्")
-  ("/" "ध्")
-  ))
+  (">" "झ"))
+
+(dependent
+  ("k" (delete @-) ""))
+  
+ (return
+  ((Return)))
+
+ (backspace
+  ((BackSpace) (undo))))

 
 (state
 
 (state

-  (init
-    (trans)))
+ (init
+  (starter (pushback 1) (shift intermediate)))

 
 

+ (intermediate
+  (consonant (shift second))
+  (independent (shift init))
+  (backspace)
+  (return (shift init)))

 
 

+ (second
+  (consonant)
+  (dependent (shift init))
+  (backspace)
+  (return (shift init))))

 
 

+;; Local Variables:
+;; coding: utf-8
+;; mode: emacs-lisp
+;; End: