Autohotkey Scripts

From notebook

Revision as of 10:57, 19 July 2018 by Timtak (Talk | contribs)
Jump to: navigation, search

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, underline and italicise and add cease and desist links. Now with keystrokes that put my IME interface into English mode before running the main part of the script.


!1:: { Sleep, 100 clipurl := clipboard Send ^c Sleep, 50 Send {vkF3} clipurl := "<a href=""" . clipurl . """>" . clipboard . "</a>" SendInput {Raw}%clipurl% clipboard := clipurl clipurl =; Send {vkF4} Return }

!b:: { Sleep, 100 clipsave := clipboard Send ^c Sleep, 50 Send {vkF3} clipstrong := "" . clipboard . "" SendInput {Raw}%clipstrong% clipboard := clipsave clipstrong =; Send {vkF4} Return }

!u:: { Sleep, 100 clipsave := clipboard Send ^c Sleep, 50 Send {vkF3} clipunder := "" . clipboard . "" SendInput {Raw}%clipunder% clipboard := clipsave clipunder =; Send {vkF4} Return }

!i:: { Sleep, 100 clipsave := clipboard Send ^c Sleep, 50 Send {vkF3} clipitalic := "" . clipboard . "" SendInput {Raw}%clipitalic% clipboard := clipsave clipitalic =; Send {vkF4} Return }

!o:: textinput := "お取り下げご希望の場合は下記のコメント欄か、http://nihonbunka. comで掲示されるメールアドレスにご一筆ください。" SendInput {Raw}%textinput% Return


!t:: Send {vkF3} 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% Send {vkF4} Return

!s:: { textinput := "お取り下げご希望の場合は下記のコメント欄か、http://souzaisho.comで掲示されるメールアドレスにご一筆ください。" Send {vkF3} SendInput {Raw}%textinput% Send {vkF4} Return }

Personal tools