104on109.mayu

   1 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\r
   2 # \91\8b\8eg\82¢\82Ì\97J\9fT - 104on109.mayu\r
   3 # Copyright (C) 1999-2005, TAGA Nayuta <nayuta@users.sourceforge.net>\r
   4 #\r
   5 \r
   6 define KBD104on109\r
   7 \r
   8 def subst ~S-*\94¼\8ap/\91S\8ap         = $GRAVE_ACCENT\r
   9 def subst  S-*\94¼\8ap/\91S\8ap         = $TILDE\r
  10 def subst  A-\94¼\8ap/\91S\8ap          = $ToggleIME\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  S-*_2                = $COMMERCIAL_AT\r
  15 def subst  S-*_6                = $CIRCUMFLEX_ACCENT\r
  16 def subst  S-*_7                = $AMPERSAND\r
  17 def subst  S-*_8                = $ASTERISK\r
  18 def subst  S-*_9                = $LEFT_PARENTHESIS\r
  19 def subst  S-*_0                = $RIGHT_PARENTHESIS\r
  20 def subst  S-*Hyphen            = $LOW_LINE\r
  21 def subst ~S-*Caret             = $EQUALS_SIGN\r
  22 def subst  S-*Caret             = $PLUS_SIGN\r
  23 def subst ~S-*Atmark            = $LEFT_SQUARE_BRACKET\r
  24 def subst  S-*Atmark            = $LEFT_CURLY_BRACKET\r
  25 def subst ~S-*OpenBracket       = $RIGHT_SQUARE_BRACKET\r
  26 def subst  S-*OpenBracket       = $RIGHT_CURLY_BRACKET\r
  27 def subst ~S-*CloseBracket      = $REVERSE_SOLIDUS\r
  28 def subst  S-*CloseBracket      = $VERTICAL_LINE\r
  29 def subst  S-*Semicolon         = $COLON\r
  30 def subst ~S-*Colon             = $APOSTROPHE\r
  31 def subst  S-*Colon             = $QUOTATION_MARK\r
  32 def subst    *\96³\95Ï\8a·            = *Space\r
  33 def subst    *E0\96³\95Ï\8a·          = *Space\r
  34 def subst    *\95Ï\8a·              = *Space\r
  35 def subst    *\82Ð\82ç\82ª\82È          = *Space\r
  36 def subst    *E0\82Ð\82ç\82ª\82È        = *Space\r
  37 def subst    *\89p\90\94              = S-*\89p\90\94\r
  38 def subst    *E0\89p\90\94            = S-*\89p\90\94\r
  39 def subst *ReverseSolidus       = *RightShift\r
  40 \r
  41 keymap Global\r
  42  mod shift += ReverseSolidus\r