AHK 60% Actions

;AutoHotKey 60% actions Version 1
SetCapsLockState, AlwaysOff

^q::Send !{F4}
return

$f::SendInput {Raw}f
$j::SendInput {Raw}j
$o::SendInput {Raw}o
$x::SendInput {Raw}x
$z::SendInput {Raw}z

$`::
If GetKeyState("CapsLock", "p") OR GetKeyState("ScrollLock", "t")
    Send {Raw}`
else
    Send {Esc}
Return

$w::
If GetKeyState("CapsLock", "p") OR GetKeyState("ScrollLock", "t")
    Send {Up}
else
    SendInput {Raw}w
Return

$a::
If GetKeyState("CapsLock", "p") OR GetKeyState("ScrollLock", "t")
    Send {Left}
else
    SendInput {Raw}a
Return

$s::
If GetKeyState("CapsLock", "p") OR GetKeyState("ScrollLock", "t")
    Send {Down}
else
    SendInput {Raw}s
Return

$d::
If GetKeyState("CapsLock", "p") OR GetKeyState("ScrollLock", "t")
    Send {Right}
else
    SendInput {Raw}d
Return

$p::
If GetKeyState("CapsLock", "p")
    Send {PrintScreen}
else
    Send p
Return

$Backspace::
If GetKeyState("CapsLock", "p")
    Send {Delete}
else
    Send {Backspace}
Return

$[::
If GetKeyState("CapsLock", "p")
    Send {Home}
else
    Send [
Return

$e::
If GetKeyState("CapsLock", "p")
    Send {Home}
else
    SendInput {Raw}e
Return

$r::
If GetKeyState("CapsLock", "p")
    Send {Home}
else
    SendInput {Raw}r
Return

$]::
If GetKeyState("CapsLock", "p")
    Send {Home}
else
    Send ]
Return

$4::
If GetKeyState("CapsLock", "p")
    Send {F4}
else
    Send 4
Return

$5::
If GetKeyState("CapsLock", "p")
    Send {F5}
else
    Send 5
Return

$0::
If GetKeyState("CapsLock", "p")
    Send {F10}
else
    SendInput {Raw}0
Return

$-::
If GetKeyState("CapsLock", "p")
Send {F11}
else
SendInput {Raw}-
Return

$q::
If GetKeyState("CapsLock", "p")
Send {Volume_Mute}
else
Send q
Return

+Tab::
    SetCapsLockState, AlwaysOff
Return