#SingleInstance force
#Persistent
#NoTrayIcon

^CapsLock::
{
    orig_clip := A_Clipboard
    Send "^c"

    Sleep 30

    if (!InStr(A_Clipboard, "`n"))
    {
        if (!(A_Clipboard == StrUpper(A_Clipboard)))
        {
            Send StrUpper(A_Clipboard)
        }
        else
        {
            Send StrLower(A_Clipboard)
        }

    }

    A_Clipboard := orig_clip
}