Middle Paste 2

熊熊想到AHK可以寫入txt,故再次精減流程
  • 在Firefox裡,按中鍵,寫入剪貼簿內容至list.txt,每三次就自動多換一行 
  • 在SMG主畫面,按中鍵,貼上下載碼
  • 在SMG新增下載檔案,按中鍵,自動貼上剪貼簿內容至下載路徑且送出確定
  • 在SMG新增下載檔案,Ctrl + C,自動組成下載路徑,並複製編號部份
  • 在SMG新增下載檔案,Ctrl + Z,跳至『儲存到』
  • Win + Z 開啟list.txt

;開啟list.txt
#z::Run notepad "K:\list.txt"

;Firefox 中鍵新增剪貼簿內容至list.txt
#IfWinActive ahk_class MozillaWindowClass
MButton::
L++
IF ( L = 1 )
{
    ;StringUpper, Clipboard, Clipboard
    FileAppend, %Clipboard%`n, K:\list.txt
    TrayTip, MiddlePaste, 新增編號`n%Clipboard%,1
}
IF ( L = 2 )
{
    IfInString, Clipboard, http://
    {
        FileAppend, %Clipboard%`n, K:\list.txt
        TrayTip, MiddlePaste, 新增網址`n%Clipboard%,1
    }
    Else
    {
        SoundBeep
        TrayTip, MiddlePaste, 格式錯誤,1
    }
}
IF ( L = 3 )
{
    FileAppend, %Clipboard%`n, K:\list.txt
    TrayTip, MiddlePaste, 新增解壓縮密碼,1
    FileAppend, `n, K:\list.txt
    L=0
}
Return

;SMG新增下載檔案 中鍵貼上編號
#IfWinActive ahk_class TAddDownloads.UnicodeClass
MButton::
ControlFocus, 一般設定
Send {TAB 6}
;StringUpper, Clipboard, Clipboard
Send K:\%Clipboard%
Send {Enter}
Return

;SMG新增下載檔案 Ctrl + C 自動組成下載路徑,並複製編號部份,自動轉大寫
#IfWinActive ahk_class TAddDownloads.UnicodeClass
^c::
Send {End}
Send +{Home}
Send ^c
;StringUpper, Clipboard, Clipboard
Send K:\%Clipboard%\
Return

;SMG新增下載檔案 Ctrl + Z 跳至『儲存到』
#IfWinActive ahk_class TAddDownloads.UnicodeClass
^z::
ControlFocus, 一般設定
Send {TAB 6}
Return

;SMG主視窗 中鍵貼上
#IfWinActive ahk_class TMainForm.UnicodeClass
MButton::
Send {F4}
Return