contrib/109onAX.mayu

   1 #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\r
   2 # \91\8b\8eg\82¢\82Ì\97J\9fT - AX.mayu\r
   3 # Copyright (C) 2002, \8f¼\96{ \94\8e\8bI <matsumoto678@oki.com>\r
   4 #\r
   5 \r
   6 define KBD109onAX\r
   7 \r
   8 def subst  S-*_2                = $QUOTATION_MARK\r
   9 def subst  S-*_6                = $AMPERSAND\r
  10 def subst  S-*_7                = $APOSTROPHE\r
  11 def subst  S-*_8                = $LEFT_PARENTHESIS\r
  12 def subst  S-*_9                = $RIGHT_PARENTHESIS\r
  13 \r
  14 def subst  S-*BackSlash         = $LOW_LINE\r
  15 def subst  S-*_0                = $TILDE # \82±\82ê\82Í\82È\82\82Ä\82à\82¢\82¢\r
  16 \r
  17 def subst  S-*Hyphen            = $EQUALS_SIGN\r
  18 def subst ~S-*Equal             = $CIRCUMFLEX_ACCENT\r
  19 def subst  S-*Equal             = $TILDE\r
  20 def subst ~S-*OpenBracket       = $COMMERCIAL_AT\r
  21 def subst  S-*OpenBracket       = $GRAVE_ACCENT\r
  22 \r
  23 def subst ~S-*CloseBracket      = $LEFT_SQUARE_BRACKET\r
  24 def subst  S-*CloseBracket      = $LEFT_CURLY_BRACKET\r
  25 \r
  26 def subst  S-*Semicolon         = $PLUS_SIGN\r
  27 def subst ~S-*Quote             = $COLON\r
  28 def subst  S-*Quote             = $ASTERISK\r
  29 \r
  30 def subst ~S-*GraveAccent       = $RIGHT_SQUARE_BRACKET\r
  31 def subst  S-*GraveAccent       = $RIGHT_CURLY_BRACKET\r