Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #b::
- Input, ref, V, {enter}{tab}
- If InStr(ErrorLevel, "EndKey:")
- {
- url := "https://api.esv.org/v3/passage/text/?q=" . ref
- url := url . "include-passage-references=false"
- url := url . "&include-first-verse-numbers=false"
- url := url . "&include-verse-numbers=false"
- url := url . "&include-footnotes=false"
- url := url . "&include-footnote-body=false"
- url := url . "&include-short-copyright=false"
- url := url . "&include-copyright=false"
- url := url . "&include-passage-horizontal-lines=true"
- url := url . "&include-headings=false"
- url := url . "&include-short-copyright=true"
- oWhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")
- oWhr.Open("GET", url, 0)
- oWhr.SetRequestHeader("Content-Type", "application/json")
- oWhr.SetRequestHeader("Authorization", "Token XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX")
- Body = {}
- oWhr.Send(Body)
- ClipSaved := ClipboardAll ; backup clipboard
- Clipboard := oWhr.ResponseText
- Send ^v
- Sleep 500
- Clipboard := ClipSaved ; restore clipboard
- ClipSaved = ; free memory
- Return
- }
- Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement