autogui/ahk/uppercase.ahk

MenuString =
(
Press:
1 - Title Case
2 - UPPER CASE
3 - lower case
4 - Sentence case
any else - Cancel
)

^u::                   ; Ctrl-u to activate
  Send ^c
  ToolTip %MenuString%
  Input Key, I L1,,1,2,3,4
  IfEqual Key, 1, StringUpper Clipboard, Clipboard, T  ; Title Case
  IfEqual Key, 2, StringUpper Clipboard, Clipboard     ; UPPER CASE
  IfEqual Key, 3, StringLower Clipboard, Clipboard     ; lower case
  IfEqual Key, 4                                       ; Sentence case
     Clipboard := RegExReplace(Clipboard,"(\w)([^?.:!]*)","$U1$L2")
  IfEqual ErrorLevel, Match, Send ^v
  ToolTip
  return
#notrayicon