AutoHotkey/Shortcuts/CapsNav.ahk at master · denolfe/AutoHotkey · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
;;;;; CapsNav ;;;;;;;

^+CapsLock::CapsLock

CapsLock & h::CapsNav("Left")
CapsLock & j::CapsNav("Down")
CapsLock & k::CapsNav("Up")
CapsLock & l::CapsNav("Right")

CapsLock & n::
CapsLock & Left::CapsNav("Home")
CapsLock & p::
CapsLock & Right::CapsNav("End")

CapsLock & .::
CapsLock & o::CapsNav("Right", "^")
CapsLock & m::CapsNav("Left", "^")

CapsLock & u::CapsNav("PgDn")
CapsLock & i::CapsNav("PgUp")

CapsLock & BackSpace::
	If GetKeyState("alt")
		Send, ^{Delete}
	Else
		Send, {Delete}
Return

; CapsLock & `;::
; CapsLock & ,::
; Return

CapsNav(action, initmod = "", mod = "+")
{
	If ! GetKeyState("alt")
		Send % initmod "{" action "}"
	Else
		Send % mod . initmod "{" action "}"
	SetCapsLockState, AlwaysOff
}

KPSplashOff:
   SplashImage, off
Return