<p>前から macOS のように Windows でも Ctrl キーを使ったカーソル移動をおこないたいと思っていました。<br>
また macOS のショートカットは Command キーを使うことが多いため、Windows でも各種ショートカットに Windows キーを使うようにしたいと思っていました。</p>
<p>今回これらを実現するべく、レジストリエディターと<a href="https://www.autohotkey.com/">AutoHotkey</a>を使って、キーボードショートカットを望む形にしました。</p>
<h2>レジストリエディターを使って、左の Windows キーを F13 キーに変更する</h2>
<p><a href="http://www.grismar.net/ventrilocapsfix/">Push To Talk Fix - Remapping keys to F13</a>内にある「Remap Left Windows Key to F13」を適用します。<br>
次のレジストリ情報を任意の場所に <code>.reg</code> 形式で保存して実行したあと、PC を再起動すれば左の Windows キーが F13 キーに変わります。</p>
<pre><code>Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Keyboard Layout]
"Scancode Map"=hex:00,00,00,00,00,00,00,00,02,00,00,00,64,00,5b,e0,00,00,00,00
</code></pre>
<h2>AutoHotkey を使ってキーボードショートカットを実装する</h2>
<p>キーボードショートカットの設定は次の通りになりました。</p>
<pre class="language-ahk"><code class="language-ahk">#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
#UseHook, On
#SingleInstance, force
; F13 &#x26; Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.

; macOS like keymap
F13 &#x26; /::^/
F13 &#x26; ,::^,
F13 &#x26; 1::^1
F13 &#x26; 2::^2
F13 &#x26; 3::^3
F13 &#x26; 4::^4
F13 &#x26; 5::^5
F13 &#x26; 6::^6
F13 &#x26; 7::^7
F13 &#x26; 8::^8
F13 &#x26; 9::^9
F13 &#x26; 0::^0
F13 &#x26; a::^a
F13 &#x26; b::^b
F13 &#x26; c::^c
F13 &#x26; f::^f
F13 &#x26; h::^h
F13 &#x26; i::^i
F13 &#x26; k::^k
F13 &#x26; l::^l
F13 &#x26; n::^n
F13 &#x26; p::^p
F13 &#x26; q::!F4
F13 &#x26; r::^r
F13 &#x26; s::^s
F13 &#x26; t::^t
F13 &#x26; v::^v
F13 &#x26; w::^w
F13 &#x26; x::^x
F13 &#x26; z::^z
F13 &#x26; Enter::^Enter
F13 &#x26; Space::#s
; https://superuser.com/questions/1246946/autohotkey-remapping-altshifttab-to-lwinshifttab
F13 &#x26; Tab::
    AltTabMenu := true
    If GetKeyState("Shift","P")
        Send {Alt Down}{Shift Down}{Tab}
    else
        Send {Alt Down}{Tab}
return

#If (AltTabMenu)
    ~*F13 Up::
        Send {Shift Up}{Alt Up}
        AltTabMenu := false
    return
#If

; Windows keymap
F13 &#x26; e::#e
F13 &#x26; Up::#Up
F13 &#x26; Right::#Right
F13 &#x26; Down::#Down
F13 &#x26; Left::#Left
#IfWinNotActive, ahk_exe WindowsTerminal.exe
Return
#IfWinNotActive

; Emacs like keymap
#IfWinNotActive, ahk_exe WindowsTerminal.exe
^p::Send,  {Up}
^f::Send,  {Right}
^n::Send,  {Down}
^b::Send,  {Left}
^+p::Send, {Shift}+{Up}
^+f::Send, {Shift}+{Right}
^+n::Send, {Shift}+{Down}
^+b::Send, {Shift}+{Left}
^a::Send,  {Home}
^e::Send,  {End}
^d::Send,  {Delete}
^h::Send,  {BackSpace}
^m::Send,  {Enter}
^k::Send,  {Shift}+{End}{BackSpace}
Return
#IfWinNotActive
</code></pre>
<p>先ほど左の Windows キーをリマップして作り出した F13 キーをふんだんに使って、Windows の Control キーを使ったキーボードショートカットを F13 キーを使うように変更しています。<br>
Control キーについては Emacs っぽくカーソル移動のショートカットに割り当てています。<br>
Windows Terminal を使っているときはショートカットを無効化したかったため、<a href="https://pouhon.net/ahk-win-active/2812/">[AutoHotKey]#IfWinActive で対象ウインドウを指定する | Output 0.1</a>を参考にしてショートカットを無効化しています。</p>
<h2>まとめ</h2>
<p>Windows をメインで使い始めてだいぶ経ちますが、ようやく思い通りの操作ができるようになって嬉しいです。</p>

学ぶ、考える、書き出す。

タグ「AutoHotKey」の記事一覧