[ahk]复制当前文件，并以当前文件夹名称命名

;【作者】sunwind
;【时间】2015年11月2日11:27:22
;【功能】本例是按F4复制当前文件，并以当前文件夹名称命名
;【原理】实现ClipboardPath 功能，还可以自由扩展，比如对rar文件即解压缩，对mp3文件立即播放等等

;热键F4
F4::
ClipSaved := ClipboardAll
Clipboard =
Send, ^c
ClipWait
If !ErrorLevel
{
   FullFileName=%Clipboard%
   Loop, parse, FullFileName, `n, `r
   {
       SplitPath, A_LoopField, name, dir, ext, name_no_ext, drive
       SplitPath,dir, fatherDirName
       FileCopy,%FullFileName%,%dir%\%fatherDirName%.%ext%
   }
}
Clipboard := ClipSaved
ClipSaved =
Return