[ahk]选中内容 按热键即发音

;~ ?假面丶  23:39:23
;~ 我想这样：
;~ 1. 选中内容 按热键即发音
;~ 2. 如果未选中任何内容，按热键的话就弹出提示窗，手动输入提示内容后，回车再发音

#z::
   clipboard =
   Send ^c
   gosub sound


Return


sound:
var:=clipboard
if (var="")
InputBox,var,请输入,你想说啥
spovice:=ComObjCreate("sapi.spvoice")
spovice.Speak(var)
return