Obter o primeiro URL na pesquisa do Google por texto destacado em qualquer aplicativo

Existe uma maneira de obter o primeiro URL para o texto destacado do google? É como se tivéssemos uma pesquisa integrada por teclado em celulares, mas não em computadores.

É especialmente útil quando eu quero criar um link para um tópico da wikipedia ou site de software no stackoverflow ... etc.

— Parivar Saraff
fonte

Eu apenas criei uma maneira simples de fazer isso. Não é o melhor, mas funciona bem o suficiente para mim agora. Não o personalizei para corresponder à formatação do stackoverflow, pois eu o queria flexível por enquanto. Irá colocá-lo no github mais tarde. Provavelmente precisa ser melhor para que realmente funcione.

Salve o seguinte como Googlesearch.ahk e execute-o usando a autohotkey

; Search google for the highlighted word
; then get the first link address and put it on the Clipboard

^!r:: Reload

#+g::
    bak = %clipboard%
    Send, ^c
    ;clipboard = %bak%`r`n%clipboard%
    Query = %clipboard%
    wb := ComObjCreate("InternetExplorer.Application")
    ;wb := IEGet()
    wb.Visible := false
    wb.Navigate("www.google.com/search?q=" Query)
    While wb.readyState != 4 || wb.document.readyState != "complete" || wb.busy ; wait for the page to load
      sleep 100
    ; loop % (Nodes := wb.document.getElementById("rso").childNodes).length
    ;     Links_urls .= (A_index = 1) ? Nodes[A_index-1].getElementsByTagName("a")[0].href : "`n" . Nodes[A_index-1].getElementsByTagName("a")[0].href
    ; Msgbox %Links_urls%

    Nodes := wb.document.getElementById("rso").childNodes
    First_link := Nodes[0].getElementsByTagName("a")[0].href
    Clipboard = %First_link%
    TrayTip, First Link on Google Search, %First_link% `r`n Ctrl+V to paste the link
return

— Parivar Saraff
fonte