An AHK Script to replace Caps Lock with "A" unless pressing Shift+Caps. Works with OVR Toolkit.

CapsLockShiftA.ahk

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
; #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.

SteamVRRunning()
{
Process, Exist, vrserver.exe
If ErrorLevel = 0
{
return false
}
Else
{
return true
}
}

+CapsLock::
if !SteamVRRunning() {
if GetKeyState("CapsLock", "T") = 1
{
 SetCapsLockState, off
}
else if GetKeyState("CapsLock", "F") = 0
{
 SetCapsLockState, on
}
}
return

$CapsLock::
if !SteamVRRunning() {
if GetKeyState("CapsLock", "T") = 1
{
 Send, A
 SetCapsLockState, on
}
else if GetKeyState("CapsLock", "F") = 0
{
 Send, a
 SetCapsLockState, off
}
}
else
{
if GetKeyState("CapsLock", "T") = 1
{
 SetCapsLockState, off
}
else if GetKeyState("CapsLock", "F") = 0
{
 sendInput {CapsLock}
}
}
return

^CapsLock::
if !SteamVRRunning() {
if GetKeyState("CapsLock", "T") = 1
{
 Send, ^A
 SetCapsLockState, on
}
else if GetKeyState("CapsLock", "F") = 0
{
 Send, ^a
 SetCapsLockState, off
}
}
return

!CapsLock::
if !SteamVRRunning() {
if GetKeyState("CapsLock", "T") = 1
{
 Send, !A
 SetCapsLockState, on
}
else if GetKeyState("CapsLock", "F") = 0
{
 Send, !a
 SetCapsLockState, off
}
}
return