2015年10月4日 星期日

balaboLka +autokey 的簡單應用 指定專屬朗讀語音

==============直接加到你的 。ahk 檔中
 AppsKey::            ;以 app key 為熱鍵
  send +{F7}          ; SHIFT+F7 停止朗讀(必須開啟朗讀軟體,並設定熱鍵)
  Clipboard =         ; 先把剪貼簿清空
  Send ^c             ; 把選取字串用〔Ctrl+C〕存入剪貼簿
  ClipWait, 1         ; 等待1秒讓剪貼簿執行存入動作
    Clipboard:=RegExReplace(RegExReplace(Clipboard, "\n\s",""), "(*UCP)\([^\(]*\)", "")  ; 把剪贴板中所有(*) 刪除,刪除空白行
   ;Clipboard:=RegExReplace(RegExReplace(Clipboard, "\n"," "), "(*UCP)\[[^\[]*\]", "")  ; 把剪贴板中所有[*] 刪除
  ClipWait, 1
 Send ^v               ; 把剪貼簿資料〔Ctrl+v〕貼上
 Clipboard = <voice required="Name=VW Hui"><rate absspeed="+3">%Clipboard%</rate></voice>   ;設定語音
  ClipWait, 1
  send +{F9}                  ; SHIFT+F9 貼上到朗讀軟體,並設定熱鍵)
  send ^!{F5}                ; CTRL+ALT+F5 開始朗讀(必須開啟朗讀軟體,並設定熱鍵)
 ; Clipboard := ClipSaved  ; 還原先前的剪貼簿內容
  return

; 另一個


MButton::                       ;指定滑鼠中鍵
  ;ClipSaved := ClipboardAll    ;把目前的剪貼簿內容存起來供後面還原
  Clipboard =                   ; 先把剪貼簿清空
  send +{F7}
  Send ^c                       ; 把選取字串用〔Ctrl+C〕存入剪貼簿
       ClipWait, 1
  ClipSaved := ClipboardAll     ; 把目前的剪貼簿內容存起來供後面還原
      ClipWait, 1               ; 等待1秒讓剪貼簿執行存入動作
  Clipboard:=RegExReplace(Clipboard, "(*UCP)\([^(]*\)", "")  ; 把剪贴板中所有(*) 刪除
   Clipboard = <voice required="Name=VW Misaki"><rate absspeed="-6">%Clipboard%</rate></voice>   ;設定日文語音
  ClipWait, 1
 send ^+{F9}                     ;直接朗讀(必須開啟朗讀軟體)

IfWinActive, PSPad               ;偵測目前的視窗是否為 PSPad編輯軟體 是則執行下面指令
{
 Send ^v                        ; 〔Ctrl+v〕貼上
 Clipboard := ClipSaved         ; 還原先前的剪貼簿內容
}
else                            ;不是則執行下面指令
{
    Clipboard := ClipSaved      ; 還原先前的剪貼簿內容
   
   Send ^v                      ; 把〔Ctrl+v〕貼上
}
  return


  return ========================
這是個AUTOkey 的熱鍵,用來開啟朗讀效果的
這個不用管balaboLka當時的朗讀引擎是哪一個,他會直接指定朗讀引擎
這個就直接指定 日語發音
有時候看到某些外語文字,想要知道他們的發音的時候,這個方式很方便
後面都有注釋了,應該不難應用
PS:如果有還原剪貼簿的動作有時候會失效,所以注釋起來了

沒有留言:

張貼留言