workaround.mayu

   1 def key E0RightShift E0RShift           = E0-0x36\r
   2 mod shift += E0RShift\r
   3 key *E0RShift = *LShift\r
   4 \r
   5 if ( KBD109 )\r
   6   def key E0\94¼\8ap/\91S\8ap E0\8a¿\8e\9a E0Kanji    = E0-0x29 # \94¼\8ap/\91S\8ap \8a¿\8e\9a\r
   7   def key E0\89p\90\94 E0Eisuu                = E0-0x3a # \89p\90\94 CapsLock \8a¿\8e\9a\94Ô\8d\86\r
   8   def key E0\82Ð\82ç\82ª\82È E0Hiragana         = E0-0x70 # \82Ð\82ç\82ª\82È \83J\83^\83J\83i \83\8d\81[\83}\8e\9a\r
   9 \r
  10   if ( KBD104on109 )\r
  11     def subst ~S-*E0\94¼\8ap/\91S\8ap           = $GRAVE_ACCENT\r
  12     def subst  S-*E0\94¼\8ap/\91S\8ap           = $TILDE\r
  13     def subst  A-E0\94¼\8ap/\91S\8ap            = $ToggleIME\r
  14     def subst    *E0\82Ð\82ç\82ª\82È            = *Space\r
  15     def subst    *E0\89p\90\94                = S-*\89p\90\94\r
  16   endif\r
  17 endif\r
  18 \r
  19 keymap Global\r
  20  if ( KBD109 ) and ( ! KBD104on109 )\r
  21    key *E0\94¼\8ap/\91S\8ap     = *Esc                  # Esc \82Æ\94¼\8ap/\91S\8ap\82Ì\93ü\82ê\91Ö\82¦\r
  22  endif\r
  23  if ( KBD109 )\r
  24    mod control += E0\89p\90\94                        # \89p\90\94\82ð Control \82É\r
  25    key *E0\89p\90\94          = *LControl             #       \81V\r
  26  endif\r
  27 \r
  28 keymap  KeymapDefault = &Default\r
  29  if ( KBD109 )\r
  30    mod control += E0\89p\90\94                        # \89p\90\94\82ð Control \82É\r
  31    key *E0\89p\90\94          = *LControl             #       \81V\r
  32  endif\r
  33 \r
  34 keymap Emacsen : Global\r
  35  if ( MAP-ESCAPE-TO-META )                      # ESC \82ª M- \82É\82È\82é\82Ì\82ð\91j\8e~\82·\82é\r
  36    if ( KBD109 ) and ( ! KBD104on109 )\r
  37      key *E0\94¼\8ap/\91S\8ap   = *Esc\r
  38    endif\r
  39  endif\r
  40 \r
  41 keymap2 EmacsMark\r
  42  if ( MAP-ESCAPE-TO-META )\r
  43    if ( KBD109 ) and ( ! KBD104on109 )\r
  44      key E0\94¼\8ap/\91S\8ap    = &Prefix(EmacsMarkEscape) &EditNextModifier(M-)\r
  45    endif\r
  46  endif\r