Remap Caps Lock in Windows (escape *and* control) [duplicate]

This script registers a single press on CapsLock as a press that lasts less than 400ms, modify that value as needed.

*CapsLock::
    Send {Blind}{Ctrl Down}
    cDown := A_TickCount
Return

*CapsLock up::
    If ((A_TickCount-cDown)<400)  ; Modify press time as needed (milliseconds)
        Send {Blind}{Ctrl Up}{Esc}
    Else
        Send {Blind}{Ctrl Up}
Return