Autohotkey Scripts
From notebook
Copy the below in EDIT mode, not straight from this page prior to entering edit mode!
- to remove commas, ampersands and et al. so as to make it easier to search for citations in Zotero
^,::
- blank the clipboard so clipwait will work correctly
- with sending ^, control comma
clipboard := "" send ^c ClipWait, 1 StringReplace, clipboard, clipboard, `,,, All StringReplace, clipboard, clipboard, `&,, All StringReplace, clipboard, clipboard, et al.,, All Return
- for FLickr descriptions to create html links automatically, embolden, and itallicise and add cease and desist links.
javascript:(function(){document.getElementsByTagName("video")[0].playbackRat e%20=%200.5}()); !1:: { Sleep, 100 clipurl := clipboard Send ^c Sleep, 50 clipurl := "<a href=""" . clipurl . """>" . clipboard . "</a>" SendInput {Raw}%clipurl% clipboard := clipurl clipurl =; Return }
!b:: { Sleep, 100 clipsave := clipboard Send ^c Sleep, 50 clipstrong := "" . clipboard . "" SendInput {Raw}%clipstrong% clipboard := clipsave clipstrong =; Return }
!r:: Sleep, 100 clipsave := clipboard Send ^c Sleep, 50 clipstrong := "" . clipboard . "" SendInput {Raw}%clipstrong% clipboard := clipsave clipstrong =; Return
!i::
{
Sleep, 100
clipsave := clipboard
Send ^c
Sleep, 50
clipitalic := "" . clipboard . ""
SendInput {Raw}%clipitalic%
clipboard := clipsave
clipitalic =;
Return
}
!o:: { textinput := "お取り下げご希望の場合は下記のコメント欄か、http://nihonbunka. comで掲示されるメールアドレスにご一筆ください。" SendInput {Raw}%textinput% Return }
!t:: { textinput := "Should you wish that I cease and desist - remove this image from the Net - then please leave a comment or contact me via the email link at http://nihonbunka.com" SendInput {Raw}%textinput% Return }
