AutoHotkey Community

Send, {APPSKEY}ut

F7:: 
Splashimage,,b w180 h33 x633 Y322 cwAQUA m9 b fs18 zh0, Wait Please...
   clipboard =
winactivate,
SEND, ^c
Sleep, 999
   bak = %clipboard%
Sleep, 366
send, ^l ; URL FIREFOX
Sleep, 99
   Send, ^c
Sleep, 999
   clipboard = %bak%`r`n%clipboard%
Sleep, 999
replacementchar = _
tempclip = %clipboard%
tempfilename =
Loop, parse, tempclip, %a_space%
{
   tempfilename = %tempfilename%%a_space%%a_loopfield%
   IfEqual, a_index, 10, Break
}
stringreplace, tempfilename, tempfilename, \, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, /, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, :, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, *, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, ?, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, ", %replacementchar%, 1
stringreplace, tempfilename, tempfilename, <, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, >, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, |, %replacementchar%, 1
stringreplace, tempfilename, tempfilename, `r`n, %a_space%, 1
FileAppend, %a_yyyy%/%a_mm%/%a_dd%___%a_hour%:%a_min%   `r %tempclip%, E:\3\1\%tempfilename%.txt
;- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 count = 10000
Loop
{
  IfExist,E:\3\1\%count%.txt
    count++
  Else
    break
}
FileAppend, %a_yyyy%/%a_mm%/%a_dd%___%a_hour%:%a_min%---%Clipboard%, E:\3\1\%count%.txt
count++
Splashimage,,b w1000 h633 x13 Y22 cwsilver m9 b fs9 zh0,  %clipboard%
Sleep, 999
Splashimage,,b w480 h33 x233 Y322 cwAQUA m9 b fs18 zh0,    F I L E S   I N   F : 3 \ 1 \ . .
Sleep, 266
SplashImage, Off
Return