Surface Book2のキーボード設定 (その2)

以下のように設定したけど、Kinesisのテンキー部分がうまく動いていない。

suburi.hatenablog.com

suburi.hatenablog.com

emacsedit.mayuの設定でテンキー部分が設定されているっぽいので、.mayuで上書き定義した。これで完璧?

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# 窓使いの憂鬱 - dot.mayu
# Copyright (C) 1999-2005, TAGA Nayuta <nayuta@users.sourceforge.net>
#

# まずキーボード定義を読み込む
if ( USE104 )
  include "104.mayu"        # 104 キーボード設定
  if ( USE109on104 )
    include "109on104.mayu" # 104 キーボードを 109 キーボード風に
  endif
else
  include "109.mayu"        # 109 キーボード設定
  if ( USE104on109 )
    include "104on109.mayu" # 109 キーボードを 104 キーボード風に
  endif
endif

if ( USEdefault )
  include   "default.mayu"  # Emacs ライクなさまざまな設定
endif

keymap Global

# このファイルをホームディレクトリにコピーしてから、
# 以下に自分の好みのキーバインディングを設定するとよい。
# このファイル自体を変更しないこと。

# IMEの制御
key A-Space = $ToggleIME    # Alt-' ' でIMEをON/OFF
#key S-SPACE = $ToggleIME       # Shift-' ' でもIMEをON/OFF
key IC-C-m = Enter   # かな漢字変換中でもC-mによる改行を有効にする


# MacOSっぽく、C-1, C-2で2枚の仮想デスクトップを切り替え
key C-_1 = C-W-Left
key C-_2 = C-W-Right


#
# ワンショットモディファイヤ
#
# Space and Shift
mod shift += !!!Space  # リピート有り
key R-*Space = &Ignore

# ESC + LeftControl
mod Control += !!Esc
key ~R-*C-Esc = Esc
key R-*C-Esc = &Ignore

# Enter + RightControl
mod Control += !!Enter
key ~R-*C-Enter = Enter
key R-*C-Enter = &Ignore

# Backspace + Alt
mod Alt += !!!Backspace  # リピート有り
key ~R-*C-Backspace = Backspace
key R-*C-Backspace = &Ignore

# Altを単体で押した場合はAlt-Tabにする  (なぜか右Altはうまく動かないのでAltは両方とも左Altにしておくこと)
mod Alt += !!LeftAlt
key ~R-*A-LeftAlt = A-Tab
key R-*C-LeftAlt = &Ignore

# C-[をEscに
key C-LeftSquareBracket = Esc Escape


#
# SurfaceBookキーボード用
#
# 変換・無変換をSpace and Shiftに
mod shift += !!変換
key R-*変換 = &Ignore
mod shift += !!E0無変換
key R-*E0無変換 = &Ignore

# ひらがなをLeftAltに
# key *E0ひらがな = $ToggleIME  # ひらがな でIMEをON/OFF
def subst    *E0ひらがな    = *LeftAlt
mod Alt += !!E0ひらがな
key ~R-*C-E0ひらがな = A-Tab
key R-*C-E0ひらがな = &Ignore

# 英数をEsc+Ctrlに
def subst    *E0英数      = *Esc
mod Control += !!E0英数
key ~R-*C-E0英数 = Esc
key R-*C-E0英数 = &Ignore

# Enterキーが遠いので「む」キーもEnterとして使用
def key kinesis_sp          =    0x56  # kinesisとの共存用に左手下の |\ は表記通りに使う
def subst *kinesis_sp = *YenSign
def subst *RightSquareBracket = *Enter

# Surface Pen
# def subst *LeftWindows = *RightWindows
def key pen_single = 0x6b  # 0x83 &VK (U-F20)
key pen_single = &VK(U-F20)
def key pen_double = 0x6a  # 0x82 &VK (U-F19)
key pen_double = &VK(U-F19)
def key pen_hold = 0x69    # 0x81 &VK (U-F18)
key pen_hold = &VK(U-F18)

key _0 Num0 = _0
key _1 Num1 = _1
key _2 Num2 = _2
key _3 Num3 = _3
key _4 Num4 = _4
key _5 Num5 = _5
key _6 Num6 = _6
key _7 Num7 = _7
key _8 Num8 = _8
key _9 Num9 = _9
key NumHyphenMinus NumMinus = NumMinus
key NumPlusSign NumPlus = NumPlus
key NumFullStop NumPeriod = Period
key NumLock = NumLock


#
# アプリ固有の設定
#
# web browser
window  Mozilla /:MozillaWindowClass$/ : EmacsEdit
window  Chrome /chrome\.exe:/ : EmacsEdit
window  Edge /ApplicationFrameHost\.exe:/ : EmacsEdit
  key End = C-Tab
  key Home = C-S-Tab

## MS-Office
window  Outlook /OUTLOOK\.exe:/ : EmacsEdit
window  POWERPNT /POWERPNT\.exe:/ : EmacsEdit
window  Excel /EXCEL\.exe:/ : EmacsEdit

## explorer
window  Explorer /Explorer\.exe:/ : EmacsEdit

## Evernote
window  Evernote /Evernote\.exe:/ : EmacsEdit

## Kindle
window  Kindle /Kindle\.exe:/ : EmacsEdit