dirty method Guest
|
Posted: Fri Jan 20, 2006 9:54 pm Post subject: |
|
|
My dirty method:
| Code: |
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
|
|
|