;I'm calling this version 1.0 - sorry, I don't think I'll ever include a changelog
#c::
CB = %Clipboard%
Send ^c
Phrase = %Clipboard%
Clipboard = %CB%
Input, SingleKey, L1 T3
; ////////Replace Tabs and Line Breaks with Spaces
StringReplace, Phrase, Phrase, `r, %A_Space%, All
StringReplace, Phrase, Phrase, `n, %A_Space%, All
StringReplace, Phrase, Phrase, %A_TAB%, %A_Space%, All
; ////////Get rid of multiple spaces
Loop
{
StringReplace, Phrase, Phrase, %A_SPACE%%A_SPACE%, %A_SPACE%, All
StringGetPos, SpaceDouble, Phrase, %A_SPACE%%A_SPACE%, L1
If SpaceDouble < 0
{
Break
}
}
; ////////Ask
If SingleKey = a
{
StringReplace, Phrase, Phrase, %A_SPACE%, +, All
Run
http://www.ask.com/web?q=`%22%Phrase%`%22
}
; ////////Dictionary
Else If SingleKey = d
{
StringReplace, Phrase, Phrase, %A_SPACE%, `%20, All
Run
http://dictionary.re....com/browse/%Phrase% }
; ////////eBay
Else If SingleKey = e
{
StringReplace, Phrase, Phrase, %A_SPACE%, -, All
Run
http://search.ebay.com/%Phrase% }
; ////////Acronym Finder
Else If SingleKey = f
{
StringReplace, Phrase, Phrase, %A_SPACE%, +, All
Run
http://www.acronymfi...asp?Acronym=%Phrase% }
; ////////Google
Else If SingleKey = g
{
StringReplace, Phrase, Phrase, %A_SPACE%, +, All
Run
http://www.google.com/search?q=`%22%Phrase%`%22
}
; ////////PriceGrabber
Else If SingleKey = p
{
StringReplace, Phrase, Phrase, %A_SPACE%, +, All
Run
http://www.pricegrab...orm_keyword=%Phrase% }
; ////////Thesaurus
Else If SingleKey = t
{
StringReplace, Phrase, Phrase, %A_SPACE%, `%20, All
Run
http://thesaurus.ref....com/browse/%Phrase% }
; ////////UPS
Else If SingleKey = u
{
StringReplace, Phrase, Phrase, %A_SPACE%, `%20, All
Run
http://wwwapps.ups.c...st?tracknum=%Phrase% }
; ////////Wikipedia
Else If SingleKey = w
{
StringReplace, Phrase, Phrase, %A_SPACE%, +, All
Run
http://en.wikipedia....ecial:Search?search=`%22%Phrase%`%22
}
Else
{
MsgBox Ended
Exit
}
Reload
return