;【作者】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